| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Событие на Button из DLL? [D6]
LebAlex © (2004-04-01 17:40:00)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;
VMcL (2004-04-01 18:43:00) [1]2 [1]
Вопрос номер раз: кто должен обрабатывать событие - программа или библиотека?
LebAlex (2004-04-01 17:41:00) [2]Вопрос в том, как перехватить событие OnClick объекта Button, который создается на форме приложения из DLL?
| |
