Application.Handle

← →
Ученик © (2002-09-03 11:51) [0]

Построил тут приложение в режиме Build with runtime packages (vcl, rtl), вообще то ими не пользуюсь (перестроить их проблема), запустил, Application.Handle=0, в принципе понятно, но что обычно рекомендуется ?

← →
Eugene © (2002-09-03 12:03) [1]

В чем собственно вопрос ?

← →
Ученик © (2002-09-03 12:07) [2]

В приложении если Application.Handle=0, то у приложения много проблем, думается, что ему чего то надо присвоить, так вот и вопрос, какой обычно путь предлагают.

← →
Внук © (2002-09-03 12:26) [3]

When writing a DLL that uses VCL forms, assign the window handle of the host EXE’s main window to the DLL’s Application.Handle property. This makes the DLL’s form part of the host application. Never assign to the Handle property in an EXE.

← →
Ученик © (2002-09-03 12:29) [4]

>Внук © (03.09.02 12:26)
Извиняюсь, но ответ не про то, у меня не DLL

← →
Shaman_Naydak © (2002-09-03 12:31) [5]

> Внук
Как раз при использовании пакетов этого делать не надо!

> Ученик

НЕ МОЖЕТ БЫТЬ! А ты уверен, что нигде шаловливыми ручками не сбросил его? Поищи, причем не только в своих модулях, но и в сторонних компонентах

← →
Внук © (2002-09-03 12:33) [6]

>>Ученик © (03.09.02 12:29)
Я тоже извиняюсь :))) Просто две похожие ветки рядом, невнимательно прочитал

← →
Ученик © (2002-09-03 12:42) [7]

Да, вроде нет, Project2.dll и Project1.exe скомпилированы в режиме Build with runtime packages (vcl, rtl), размеры правильные, 17 КБ и 23 КБ, в модуле Project1.exe

procedure Test(ApplicationHandle : HWnd); stdcall; external "Project2.dll";

procedure TForm1.Button1Click(Sender: TObject);
begin
Test(Application.Handle)
end;

коментаришь вызов Test(Application.Handle), все нормально Application.Handle<>0, с ним Application.Handle=0, чудеса ???

Ну, теперь осталось только узнать, что происходит в Project2.dll.
Учти, раз ты компилял с пакетами, в ней уже лежит корректный Application.Handle

Может, где-то что-то подзапарывается при передаче параметров.

А в самой Test что?

В Test мы еще не вошли, т.е. точка останова, стоит на нем и смотрю Application.Handle, а содержимое
http://delphi.mastak.ru/cgi-bin/forum.pl?look=1&id=1031033454&n=0

Application.Handle Найти похожие ветки