Модалиные формы

← →
Dmitrij_K (2005-06-07 11:10) [0]

Доброго времени суток, уважаемые Мастера.
Возник такой вопрос:
когда открыта модальная форма (Form.ShowModal) при ее сворачивании она сворачивается не в панель задач, а в маленькое окошко, и если нажимать правой кнопкой мышки по панели задач, то не появляется системное меню!
И вот как сделать чтобы сворачивались все открытые формы и работало меню?
Спасибо.

← →
-=XP=- © (2005-06-07 12:33) [1]

Сделать форму немодальной.

← →
Ega23 © (2005-06-07 12:35) [2]

Запретить модальной форме сворачиваться.

← →
Shuma © (2005-06-07 13:35) [3]

Можно сделать так:
type TForm1 = class(TForm) ... procedure SysCommand(var Message: TMessage); message WM_SysCommand; ... end; procedure TForm1.SysCommand(var Message: TMessage); begin if Message.WParam = SC_MINIMIZE then Application.Minimize else inherited; end;

Можно еще в GWL_EX_STYLE прописать WS_EX_APPWINDOW - тогда появится кнопка для додальной формы на панели задач, а сама форма будет сворачиваться как надо.

Модалиные формы Найти похожие ветки