Скачать: CL | DM;

Динамическиє собития   Найти похожие ветки 

← →
Oleh ©   (2002-04-12 11:37) [0]

Как обробатвать собития компонентов созданих динамически

---

← →
iZEN   (2002-04-12 12:02) [1]

Просто.
1) Пишешь метод-обработчик события в классе, где нужно поймать событие;

type
TMyHandler = class(...)
protected
procedure OnClickHandler(Sender: TObject);
end;
...
procedure TMyHandler.OnClickHandler(Sender: TObject);
begin
ShowMessage("Поймал событие");
end;

2) Создаёшь динамически компонент и присваиваешь оповестителю компонента свой метод-обработчик.

var bt: TButton;
handler: TMyHandler;
begin
handler := TMyHandler.Create;//создали динамически объект-обработчик
bt := TButton.Create;//создали динамически виз.компонент
bt.Parent := Form1;//положили на форму виз. компонент
bt.OnClick := handler.OnClickHandler;//присвоили метод-обработчик объекта-обработчика "событию" виз. компоненту
end;


---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.015 c