Событие на Button из DLL?

← →
LebAlex (2004-04-01 17:40) [0]

Main.pas
_____________________
procedure TForm1.PlugClick(sender: TObject);
var
PlugExec : procedure (Par:TWinControl);
handle : Thandle;
FileName : string;
begin
FileName:="lyb.dll";
handle := LoadLibrary(Pchar(FileName));
if handle <> 0 then
begin
@plugExec := GetProcAddress(handle,"PluginExec");
PlugExec(Application,Form1,Application.Handle,Button2)
end;

lyb.dpr
_________________________
var
bt:TButton;

procedure PluginExec(Par:TWinControl);
begin
bt:=TButton.Create(Application);
bt.ParentWindow:=Par.Handle;
bt.Left:=10;
bt.Top:=50;
bt.Caption:="Click";

bt.OnClick:= ???

end;

← →
LebAlex (2004-04-01 17:41) [1]

Вопрос в том, как перехватить событие OnClick объекта Button, который создается на форме приложения из DLL?

2 [1]

Вопрос номер раз: кто должен обрабатывать событие - программа или библиотека?

Событие на Button из DLL? Найти похожие ветки