Текущий архив: 2002.04.11;
Скачать: CL | DM;
Вниз
обработать OnClick Найти похожие ветки
← →
sammy (2002-03-29 07:11) [0]Создал динамическую кнопку
b := TButton.Create(Self);
b.Parent := Self;
b.Visible:=true;
b.Left:=50;
b.Top:=25;
b.Caption:="ssss";
b.Name :="button1";
не получается обработать OnClick
b.OnClick:=bclick;
где и как надо объявлять bclick?
← →
Song © (2002-03-29 07:14) [1]Эта процедура объявляется также как и все остальные для модуля.
....
Procedure bClick(Sender:TObject);
....
Procedure TForm1.bClick(Sender:TObject);
Begin
End;
← →
sammy (2002-03-29 07:18) [2]thanks!
← →
Anatoly Podgoretsky © (2002-03-29 11:10) [3]Song © (29.03.02 07:14)
Только не модуля, а должна быть методом класса, в примере правильно.
Страницы: 1 вся ветка
Текущий архив: 2002.04.11;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.021 c
