|
Тема |
Re: Тц, не става ... [re: NDeu] |
|
Автор | Mojo (Нерегистриран) | |
Публикувано | 29.06.04 22:22 |
|
|
Ами последвах вашите съвети, но нищо не се промени - грешката остава същата. Това, което направих, беше да присвоя обекта Application от главната програма към този на DLL-a:
procedure SetApp (AppHandle: THandle); // процедурата в DLL
begin
Application.Handle:=AppHandle;
end;
Предаването става в OnCreate на главната форма:
procedure TForm1.FormCreate(Sender: TObject);
begin
SetApp(Application.Handle);
end;
P.S. Дайте някакъв пример или линк (може и към предната дискусия, че не мога да я окрия), където това е реализирано, ще ми бъде много полезно. 10x!
|
| |
|
|
|