проблема при сворачивании форм

[Ko$tello]

я разрабатываю приложение с большим количеством форм. все формы Sdi.
проблема заключается в следующем…..
первичная форма сворачивается в панель задач без всяких проблем, а вот все остальные вместо сворачивания минимизируются в полоски и располагаются в левом нижнем углу рабочего стола….
если кто-то сталкивался с такой проблемой, подскажите, как её можно разрешить….

[Jallexe]

насколько я помню их надо убивать Form.Destroy Form.Free
иначе они будут висеть

[zetrix]

насколько я помню их надо убивать Form.Destroy Form.Free
иначе они будут висеть

а это тут при чём? Сворачивание вроде идёт, а не закрывание.

[ZEVS]

попробуй application.minimize

[Ko$tello]

Сообщение от ZEVS

попробуй application.minimize

Application не катит, поскольку этот объект характеризует приложение в целом, а не отдельные формы...

[Jallexe]

может это тебе поможет!!!
Как заставить формы минимизироваться на панель задач с анимацией?

Nomadic советует:

Дело-то вот в чем: Главным окном программы дельфийской является не главная форма, а окно TApplication, которое имеет нулевые размеры, поэтому его не видно. Именно для него показывается иконка на панели задач. Когда пользователь нажимает кнопку минимизации на главной форме, команда минимизации передается этому окну, и сворачивается именно оно, а для остальных просто делается hide. А так как окно TApplication имеет нулевые размеры, то и анимации никакой не видно.
А чтобы этого избежать, необходимо:
В исходном тесте модуля проекта после вызова Application.Initialize выполнить вызов
// В исходном тесте модуля проекта после вызова Application.Initialize
SetWindowLong(Application.Handle, GWL_EXSTYLE, GetWindowLong(Application.Handle, GWL_EXSTYLE) or WS_EX_TOOLWINDOW);


В исходном тексте модуля главной формы перекрыть следующие методы -
// // В классе формы
// Интерфейс
protected
procedure CreateParams(var p: TCreateParams); override;
procedure WMSysCommand(var m: TMessage); message WM_SYSCOMMAND;


// Реализация
procedure TMainForm.CreateParams(var p: TCreateParams);
begin
inherited;
p.WndParent := 0;
end;

procedure TMainForm.WMSysCommand(var m: TMessage);
begin
m.Result := DefWindowProc(Handle, m.Msg, m.wParam, m.lParam);
end;

Вместо SetWindowLong в MDI-приложениях лучше использовать
ShowWindow(Application.Handle, SW_HIDE);

[Ko$tello]

попробовал данный код….
не работает….
ну не то чтобы валились ошибки. приложение запускается…. только ведет себя не так как надо.
вторичные формы все равно не минимизируются в панель задач….

[Virtson]

а если эти формы прjсто прятать, а не сворачивать ?

[Ko$tello]

Сообщение от Virtson

а если эти формы прjсто прятать, а не сворачивать ?

Я же говорю что надо именно сворачивать....
С процессом скрытия не каких проблем нет...