Посчитать количество нажатий кнопки

Категория: Delphi/Pascal

2012-11-16 15:03:04

В обработчике события OnClick для обьекта Button написать:

code: #delphi

B]var[/B]
   x: Integer = 0;
...
 
procedure TForm1.Button1Click(Sender: TObject); // это сам оброботчик :)
begin
 
   if x<=100 then Inc(x);
 
end;

автор: Turbosega

Поделиться:

Sample Code