Ответ...
Уточни поподробнее, какой именно счётчик?
Если я тебя правильно понял ("Тебе нужно узнать, сколько раз нажали на кнопку за время работы приложения"), то это совсем простенькая задача.
Ответ:
Cоздаёшь в качестве переменной "Label1" (Caption = '0'), а в процедуре нажатия кнопки пишешь:
procedure TForm1.Button1Click(Sender: TObject);
begin
Label1.Caption := IntToStr(StrToInt(Label1.Caption) + 1);
end;
|