Delphi 7 | Как сделать значок моей программы в трее ?

http://delphi.int.ru/ - здесь есть компонент CoolTrayIcon. ОООООООООООООЧЕНЬ хорошо себя зарекомендовал, когда я программировал на Delphi. В Delphi 2007 кажется есть стандартный компонент для работы с иконками в трее.. .И в RXLib кажись есть....ТОчно не помню. Но вопросы по CoolTrayIcon можно послать на malto:oxygen.linux@gmail.com либо в архиве раскопать демо приложение

Компоненты для этого есть специальные. Просто так долго.

Меню: Project - Options - Application - Icon
Удачи)

Меню - Project - Opions - Aplication

добавляем в uses shellapi и там такая функция:
Весь API System Tray состоит из 1 (одной) функции:
function Shell_NotifyIcon(dwMessage: DWORD;
IpData: PNotifylconData): BOOL; PNotifylconData = TNotifylconData; TNotifylconData = record
cbSize: DWORD;
Wnd: HWND;
uID: UINT;
uFlags: UINT;
uCallbackMessage: UINT;
hlcon: HICON;
szTip: array [0..63] of AnsiChar;
end;
Параметр dwMessage определяет одну из операций: NIM_ADD означает добавление значка в область, NIM_DELETE — удаление, NIM_MODIFY — изменение.
Ход операции зависит от того, какие поля структуры TNotifyiconData будут заполнены.
Обязательным для заполнения является поле cbsize — там содержится размер структуры. Поле wnd должно содержать дескриптор окна, которое будет оповещаться о событиях, связанных со значком. Идентификатор сообщения Windows, которое вы хотите получать от системы о перемещениях мыши над значком, запишите в поле uCallbackMessage. Если вы хотите, чтобы при этих перемещениях над вашим значком показывалась подсказка, то задайте ее текст в поле szTip. В поле UID задается номер значка — каждое приложение может поместить на System Tray сколько угодно значков. Дальнейшие операции вы будете производить, задавая этот номер. Дескриптор помещаемого значка должен быть задан в поле hIcon. Здесь вы можете задать значок, связанный с вашим приложением, или загрузить свой — из ресурсов.