Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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


Dmitrij_K ©   (2005-06-07 11:10:00) 

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


TUser   (2005-06-07 13:44:00) [1]

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


Shuma   (2005-06-07 13:35:00) [2]

Можно сделать так:
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;


Ega23   (2005-06-07 12:35:00) [3]

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


-=XP=-   (2005-06-07 12:33:00) [4]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо