Создание счётчика при нажатии на кнопку

@dmitry95x · Регистрация: 31.05.2017

Есть переменная a , сначала a:=60, как сделать так,чтобы при нажатии на кнопку, число увеличивалось на 1?

@Алекcей · 29.10.2017, 21:59

а чем не устраивает onclick кнопки?

@dmitry95x · 29.10.2017, 22:16 **[ТС]**

Delphi

procedure TForm2.Button3Click(Sender: TObject);
var
a:integer;
b:string;
begin
a:=60;
b:=inttostr(a+1);
edit1.Text:=b;
end;

Вот например код, но он не пашет, просто не считает, вот я и прошу помочь разобраться

Добавлено через 9 минут
Спасибо уже не надо - разобрался)

Delphi

var
a : integer = 60;
procedure TForm2.Button3Click(Sender: TObject);
begin
edit2.Text:=inttostr(a+1);
a:=strtoint(edit2.Text);
end;

@northener · 29.10.2017, 22:17

Он считает, но сразу забывает что посчитал. Потому что переменная a:integer; локальная.

@dmitry95x 2 / 2 / 0 Регистрация: 31.05.2017 Сообщений: 75
		1
	Создание счётчика при нажатии на кнопку 29.10.2017, 21:53. Показов 1403. Ответов 3 Метки нет (Все метки) Есть переменная a , сначала a:=60, как сделать так,чтобы при нажатии на кнопку, число увеличивалось на 1? 0

@Алекcей 548 / 479 / 190 Регистрация: 11.12.2013 Сообщений: 2,494
	29.10.2017, 21:59	2
	а чем не устраивает onclick кнопки? 0

@northener пофигист широкого профиля 4733 / 3167 / 859 Регистрация: 15.07.2013 Сообщений: 18,252
	29.10.2017, 22:17	4
	Он считает, но сразу забывает что посчитал. Потому что переменная a:integer; локальная. 0