Помощь - Поиск - Пользователи - Календарь
Полная версия: System Tray?
Форум «Всё о Паскале» > Современный Паскаль и другие языки > Делфи
Cybertox
29.05.2004 8:21
Привет!

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

Заранее спасибо всем ответевшим.
CJ
30.05.2004 20:05
Полно компонентов и юнитов для этого. Это все реализуется с помощью WinAPI.
trminator
31.05.2004 0:35
Цитата
Проще всего использовать RxTrayIcon компонент из библиотеки RxLib

procedure TForm1.ApplicationMinimize(Sender : TObject);
begin
RxTrayIcon1.Show; 
ShowWindow(Application.Handle,SW_HIDE); 
end;

procedure TForm1.RxTrayIcon1Click(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
Application.Restore; 

SetForeGroundWindow(Application.MainForm.Handle); 

RxTrayIcon1.Hide; 
 
end;

Автор ответа: Vit

Это -- статья из DRKB, скачать ее -- где-то на delphist.com. Там много чего рассказано smile.gif каждый день пользуюсь почти. Чтобы не переписывать сюда всю статью, добавлю, что также
Цитата
Для изменения значка в трее используется класс TShellNotifyIcon модуля ShellApi
trminator
31.05.2004 0:43
Вот еще можно компонент глянуть: http://www.delphikingdom.ru/asp/viewitem.asp?catalogid=669

случайно наткнулся, сам не пробовал еще smile.gif
BlackShadow
31.05.2004 14:31
А через shellAPI это тоже легко делается. Через Shell_NotifyIcon в TForm1.FormCreate создаётся иконка и вешается на твоё окошко (сообщение NIM_ADD). В окошке добавляешь обработчик типа Procedure OnIcon(Var Message:TMessage);Message WM_MYICONMESSAGE, в которое через lParam передаются и WM_MOUSEMOVE и WM_LBUTTONUO и т. д.. В TForm1.FormDestroy надо удалить это чудо из трея (сообщение NIM_DELETE). А вообще почитай Win32s.hlp от Borland - там это очень внятно описано.

З. Ы. : а вообще ShelAPI - rulezzz smile.gif
P@sh@
31.05.2004 22:19
я лично пользуюсь таким вот небольшим файликом (только это все же компонент, его надо инсталлировать сначала)
CJ
2.06.2004 1:57
А это случайно не юнит Uris'a? smile.gif Не очень удобен. Предлагаю во что!!!
Shadow
2.06.2004 16:01
практически есть все от кнопок на заголовке
до системного трея типа smile.gif
достаточно удобен
Код

JCL+JVCL2BetaFullInstall
Name: JCL+JVCL2BetaFullInstall.zip
URL: http://umn.dl.sourceforge.net/sourceforge/jvcl/JCL+JVCL2BetaFullInstall.zip
Size: 8662184
Create time: 30.05.2004 17:58:44
Complete time: 31.05.2004 00:31:39
Referer:
Description:
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.