И снова про дочерние формы с кнопкой на панели задач [D7, Win2k, WinXP]
strong © (2005-05-30 15:54:00)
И снова про дочение окна с кнопкой в панели задач. Создаю их
при помощи сл. кода:
procedure TSameForm.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams(Params);
with Params do
begin
ExStyle := ExStyle or WS_EX_APPWINDOW;
WndParent := HWND_DESKTOP;
end;
end;
Все хорошо, пока не задумаешь показать из этого окна любой
диалог, например, OpenDialog. При этом активной становится
почему-то снова главная форма приложения.
В принципе жить не мешает, но выглядит как-то неэстетично.
Может кто знает лекарство от такого поведения?
Ученик (2005-05-30 23:19:00) [1]
>strong (30.05.05 15:54)
Причина, похоже в этом
{ dialogs.pas }
function TOpenDialog.DoExecute(Func: Pointer): Bool;
...
hWndOwner := Application.Handle;
...
Наверх 
ЧАТ |
Орешник |
|
