![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Помогите разобраться с динамическим созданием процедур...
[lamer]Barmaglot © (2002-08-30 17:46:00)Ситуация такая из программы в runtime создается форма, на форме компонент TImage, TPopUpMenu (благо нашел описание в хелпе) - тут все работает, теперь мне надо обработать события. Тут я и сел. Объясните как создать обработку простейшего события (скажем OnClick) для кнопки, для TPopUpMenu в динамически созданной форме. Желательно с примером...
P.S. Помогите ЛАМЕРУ!!!
[lamer]Barmaglot (2002-08-30 18:01:00) [1]Так просто? А я то мудрил...
В любом случае БОЛЬШОЙ Thanks.
atmospheric (2002-08-30 17:57:00) [2]public
procedure MyClick; //не помню можнет еще надо (Sender: TObject);
var
Form1: TForm;
...
procedure MyClick;
begin
ShowMessage("Hello World");
end;
procedure TForm1.OnCreate();
var
B: TButton;
begin
B:= TButton.Create();
...
B.OnClick := MyClick;
end;
MBo (2002-08-30 17:51:00) [3]только за сегодня было несколько ссылок на статью на Королевстве Дельфи