После нажатии label изменить код кнопки button1.onclick

@Oljas · Регистрация: 21.05.2015

Author24 — интернет-сервис помощи студентам

Как сделать чтобы после нажатии label изменить код кнопки button1.onclick в delphi

@Puporev · 13.06.2016, 15:52

Delphi

var
  Form1: TForm1;
  f:boolean;
implementation
 
{$R *.dfm}
 
procedure TForm1.Button1Click(Sender: TObject);
begin
if f then Edit1.Text:='111111111111'
else Edit1.Text:='888888888888';
end;
 
procedure TForm1.Label1Click(Sender: TObject);
begin
f:=not f;
end;

@Oljas 0 / 0 / 0 Регистрация: 21.05.2015 Сообщений: 1
		1
	После нажатии label изменить код кнопки button1.onclick 13.06.2016, 15:46. Показов 1144. Ответов 1 Метки нет (Все метки) Как сделать чтобы после нажатии label изменить код кнопки button1.onclick в delphi 0

	13.06.2016, 15:52

После нажатии label изменить код кнопки button1.onclick

Решение