делаю программу, столкнулся с простой проблемой. не получается сделать счетчик для кнопки. тоесть нажимаю на кнопку Отчёт например и переменной m:=1. нажимаю еще раз и m:=2 тоесть увеличивается на 1н.
попытался сделать так
Код:
procedure TForm1.Button3Click(Sender: TObject);
var m : integer;
begin
m :=0;
if form1.Button2.Enabled = True then
m := m+1;
form1.Label4.Caption := IntToStr(m);
end;
Пример программы
