IPB
ЛогинПароль:

> ВНИМАНИЕ!

Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.

Наладить общение поможет, если вы подпишитесь по почте на новые темы в этом форуме.

 
 Ответить  Открыть новую тему 
> System Tray?
сообщение
Сообщение #1


Гость






Привет!

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

Заранее спасибо всем ответевшим.

Сообщение отредактировано: Cybertox -
 К началу страницы 
+ Ответить 
сообщение
Сообщение #2


Пионер
**

Группа: Пользователи
Сообщений: 84
Пол: Мужской

Репутация: -  2  +


Полно компонентов и юнитов для этого. Это все реализуется с помощью WinAPI.


--------------------
* Origin: "It's MY LIFE!!! © Jhon Bon Jovi"
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #3


Четыре квадратика
****

Группа: Пользователи
Сообщений: 579
Пол: Мужской

Репутация: -  4  +


Цитата
Проще всего использовать 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


--------------------
Закон добровольного труда Зимерги:
Люди всегда согласны сделать работу, когда необходимость в этом уже отпала
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #4


Четыре квадратика
****

Группа: Пользователи
Сообщений: 579
Пол: Мужской

Репутация: -  4  +


Вот еще можно компонент глянуть: http://www.delphikingdom.ru/asp/viewitem.asp?catalogid=669

случайно наткнулся, сам не пробовал еще smile.gif


--------------------
Закон добровольного труда Зимерги:
Люди всегда согласны сделать работу, когда необходимость в этом уже отпала
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #5


Гость






А через 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
 К началу страницы 
+ Ответить 
сообщение
Сообщение #6


Бывалый
***

Группа: Пользователи
Сообщений: 180
Пол: Мужской

Репутация: -  2  +


я лично пользуюсь таким вот небольшим файликом (только это все же компонент, его надо инсталлировать сначала)


Прикрепленные файлы
Прикрепленный файл  TrayIcon.pas ( 8.59 килобайт ) Кол-во скачиваний: 203
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #7


Пионер
**

Группа: Пользователи
Сообщений: 84
Пол: Мужской

Репутация: -  2  +


А это случайно не юнит Uris'a? smile.gif Не очень удобен. Предлагаю во что!!!


--------------------
* Origin: "It's MY LIFE!!! © Jhon Bon Jovi"
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #8


Lonely_Raven
****

Группа: Пользователи
Сообщений: 640
Пол: Мужской

Репутация: -  1  +


практически есть все от кнопок на заголовке
до системного трея типа 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:


--------------------
Программа делает то что вы ей приказали а не то что бы ВАМ хотелось бы.
МЕРФИ
---------------------
RTFM - Read the fucking manual
---------------------
http://www.livejournal.com/users/lonley_raven/
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 30.11.2020 21:55
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name