Архив исходников программ, модулей и компонентов на Delphi


Начальная страница

Поиск по базе



Операционная система
Настройка приложения
Взаимодействия приложений
Файлы и директории
Строки и символы
Математика
Базы данных
Интернет и сеть
Мультимедиа
Аппаратная часть
VCL
Другие разделы [0]
 

Количество записей в базе - 537
Сегодня добавлено – 0

Управление приложением



Вернуться к списку функций
 Сворачивает все приложение при сворачивании неглавного окна.

 Прислал: Vemer (Петрозаводск) ( 17 марта 2004 г. )
©  создано на основе примеров на www.delphimaster.ru
 Описание:
Обработчик сообщении. При попытке свернуть окно - сворачивает все приложение. Предназначен для неглавных немодальных окон.

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

 Исходный текст:
{ **** UBPFD *********** by http://kladovka.net.ru/delphibase/ ****
>> Сворачивает все приложение при сворачивании неглавного окна.

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

Зависимости: Как у стандартной формы...
Автор:       Vemer, Vemer@mail.ru, Петрозаводск
Copyright:   создано на основе примеров на www.delphimaster.ru
Дата:        17 марта 2004 г.
***************************************************************** }

Пишем в 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;

Теперь при сворачивании формы сворачиваеться все приложение.


Вернуться к списку функций

Наверх ▲