Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.08.26;
Скачать: CL | DM;

Вниз

Form with TrayIcon   Найти похожие ветки 

 
AlexBeliy ©   (2002-08-16 01:37) [0]

Люди !
Вот какой вопрос. Я использую компонент TrayIcon. Как сделать, чтобы при нажатии на крест в правом верхнем углу (то бишь "закрыть") программа не выходила, не закрывалась, а сворачивалась обратно в трей ?


 
Poirot ©   (2002-08-16 03:04) [1]

//в классе
procedure wmSysCommand(var Message:TMessage); message WM_SYSCOMMAND;

procedure TForm1.wmSysCommand;
begin
case Message.wParam of
SC_CLOSE:{свернуть};
else Inherited;
end;
end;


 
СергейКнязев ©   (2002-08-16 08:51) [2]

Все намного проще в событии OnClose пишешь одну строку: Action := caHide;



Страницы: 1 вся ветка

Текущий архив: 2002.08.26;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.01 c
1-85025
СергейКнязев
2002-08-16 08:55
2002.08.26
Как изнасиловать ХИНТ?


6-85161
heex
2002-06-14 17:38
2002.08.26
все ли в сети закрыли ДАННОЕ приложение.


14-85207
гончий
2002-07-31 13:59
2002.08.26
Господа, как законнектить ICQ днем?!


1-85013
AntonV
2002-08-15 18:29
2002.08.26
Вопрос по файлам


3-84900
etho
2002-08-05 11:26
2002.08.26
Как создать многотабличный отчет в DELPHI.