События в RUN-TIME

← →
most © (2002-03-26 10:01) [0]

Кто знает как обработать событие для компанента созданного в RUN-TIME

← →
MBo © (2002-03-26 10:06) [1]

нужно задать
DynButton.OnClick:=Button1Click;

← →
gek (2002-03-26 10:06) [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;

События в RUN-TIME Найти похожие ветки