![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
События в RUN-TIME [D5, Win95/98, NT4, Win2k]
most © (2002-03-26 10:01:00)Кто знает как обработать событие для компанента созданного в RUN-TIME
MBo (2002-03-26 10:06:00) [1]нужно задать
DynButton.OnClick:=Button1Click;
gek (2002-03-26 10:06:00) [2]private
procedure Onclick_type_c(Sender: TObject);
end;
procedure TMyform.Create(Sender: TObject);
begin
Btn:=TButton.Create(self);
Btn.OnClick:=Onclick_type_c;
..........
...........
end;
procedure TMyform.Onclick_type_c(Sender: TObject);
begin
showmessage("kuku")
end;