Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

минимизация приложений с модальными окнами [D5, Win95/98]

Ruslan_i © (2002-09-30 14:58:00)
Ситуация такая: есть программа состоящая из главного и модального окна. При вызове модального окна главное скрывается. Когда пытаюсь свернуть модальное окно, программа сворачивается в прямоугольник над панелью задач.Как сделать так чтобы программа сворачивалась в кнопку на панели задач?

Дмитрий Иванов (2002-10-01 12:48:00) [1]
procedure TModalForm.WMGetSysCommand(var Message : TMessage) ;
begin
if Message.wParam=SC_MINIMIZE then MainForm.Perform(WM_SYSCOMMAND,SC_MINIMIZE,0)
else inherited;
end;

и все ..

Ruslan_i (2002-10-01 10:47:00) [2]
Пробовал. Это отрабатывает только с немодальнымиокнами, к сожалению.

USTAS (2002-10-01 09:23:00) [3]
попробуй вместо
slaveform.WindowState := wsMinimized;
mainform.WindowState := wsMinimized;
сделать
Application.Minimize;

Ruslan_i (2002-10-01 07:26:00) [4]
Спасибо за совет, но все остается как и раньше. Я использую в подчиненном модальном окне вот эту процедуру:

Procedure tslaveform.WMGetSysCommand(var Message :TMessage);
begin
IF (Message.wParam = SC_MINIMIZE) then
begin
slaveform.WindowState := wsMinimized;
mainform.WindowState := wsMinimized;
end
else inherited;
end;

может что не так?
Руслан

Дмитрий Иванов (2002-10-01 02:44:00) [5]
а ты перехвати момент минимизации модального окна и пошли сообщение минимизировать главное окно

pasha_golub (2002-09-30 15:36:00) [6]
программа сворачивается в панель задач только при минимизации ГЛАВНОГО ОКНА.

Наверх

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