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

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

Вопрос с System Tray [D6]


Pvk2002 ©   (2002-09-12 11:17:00) 

Подскажите пожалуйста где можно найти пример создания приложения
и при сворачивание главного окна сворачивать приложение в SysTray.


Song   (2002-09-13 15:06:00) [1]

Пришли мне на мыло (coolsong@mail.ru) модуль или кусок модуля. Я посмотрю. Я же не телепат :)


Pvk2002   (2002-09-13 12:04:00) [2]

непомогло, может изза того что у меня Delphi 7?


Song   (2002-09-13 11:56:00) [3]

Только то что я сказал и ничего больше!


Song   (2002-09-13 11:54:00) [4]

В TApplication.onMinimize напиши:
SendMessage(Handle,WM_SYSCOMMAND,SC_MINIMIZE,0);


Pvk2002   (2002-09-13 11:54:00) [5]

помогите...


Pvk2002   (2002-09-13 10:38:00) [6]

нехочется использовать компонент, и к тому же там надо то всего несколько строк кода


Alibaba   (2002-09-13 10:35:00) [7]

Дык можно просто добавить компонент TTrayIcon в палитру компонентов Delphi и не изобретать велостпед. :)


Pvk2002   (2002-09-13 10:30:00) [8]

TApplication.onMinimize:
...
ShowWindow(Application.MainForm.Handle, SW_HIDE);
ShowWindow(Application.Handle, SW_HIDE);

WM_LBUTTONDOUN/UP:
...
ShowWindow(Application.Handle, SW_SHOWNORMAL);
ShowWindow(Application.MainForm.Handle, SW_SHOWNORMAL);


TTCustomDelphiMaster   (2002-09-12 21:00:00) [9]

Pvk2002 (12.09.02 11:17)
В самом низу страницы.
http://www.delphikingdom.com/helloworld/index.htm

Там еще много чего есть.


Song   (2002-09-12 19:10:00) [10]

Опишите Ваш TApplication.onMinimize и то что у Вас срабатывает по WM_LBUTTONDOWN/UP


Pvk2002   (2002-09-12 18:42:00) [11]

теперь у меня возникла другая проблема, никак не могу решить ее.
отлавил onMinimize, нажимая на иконку в SysTray, приложение восстанавливается, но форма неактивная все перепробовал.


Pvk2002   (2002-09-12 16:43:00) [12]

спасибо


Song   (2002-09-12 16:40:00) [13]

В хэлпе на это событие есть пример.


Pvk2002   (2002-09-12 16:37:00) [14]

если можно чуть поподробнее


Song   (2002-09-12 16:34:00) [15]

Надо отлавливать ещё Application.onMinimize


Pvk2002   (2002-09-12 16:29:00) [16]

обращаюсь к Song, спасибо все хорошо, единственное,
если я нажимаю на кнопку приложения на панели задач,
то приложение сворачивается а в SysTray иконка не попадает.
как быть?


LordOfSilence   (2002-09-12 11:34:00) [17]

C:\Program Files\Borland\CBuilder6\Examples\Controls\Traydemo


Song   (2002-09-12 11:19:00) [18]

http://pascal.sources.ru/cgi-bin/forum/YaBB.cgi?board=delphi;action=display;num=1020241631


Наверх

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