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

Событие на 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?

---

← →
VMcL ©   (2004-04-01 18:43) [2]

2 [1]

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

---

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

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



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