Форум: "Основная";
Текущий архив: 2002.04.11;
Скачать: [xml.tar.bz2];
Внизобработать 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;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.006 c