Code:

{ **** UBPFD *********** by kladovka.net.ru ****

>> Сворачивает все приложение при сворачивании неглавного окна.

 

Обработчик сообщении. При попытке свернуть окно - сворачивает все приложение. Предназначен для неглавных немодальных окон.

 

Зависимости: Как у стандартной формы...

Автор:       Vemer, Этот адрес электронной почты защищён от спам-ботов. У вас должен быть включен JavaScript для просмотра., Петрозаводск

Copyright:   создано на основе примеров на www.delphimaster.ru

 

********************************************** }

 

//Пишем в Private формы(неглавной);

Procedure WMSysCommand(var message: TWMSysCommand); message WM_SysCommand;

 

//Пишем в тексте программы:

Procedure TF_Shop.WMSysCommand(var message: TWMSysCommand);

begin

If message.CmdType = SC_MINIMIZE then Application.Minimize

Else Inherited;

End;

 

 

Добавить комментарий

Не использовать не нормативную лексику.

Просьба писать ваши замечания, наблюдения и все остальное,
что поможет улучшить предоставляемую информацию на этом сайте.

ВСЕ КОММЕНТАРИИ МОДЕРИРУЮТСЯ ВРУЧНУЮ, ТАК ЧТО СПАМИТЬ БЕСПОЛЕЗНО!