В среде Delphi посадить значёк в трей проще некуда:
FIconData.cbSize := sizeof(TNOTIFYICONDATA); //Размер
FIconData.Wnd := FormTrayIcon.Handle; //указываем владельца
FIconData.hIcon := FIcon.Handle; //Указываем иконку
FIconData.uID := 5; //НУ вы сами догадаитесь
FIconData.szTip := 'TrayIconTest'; //вплывающая подсказка
FIconData.uFlags := NIF_MESSAGE + NIF_ICON + NIF_TIP; //Флаги, значения смотрите в help'е
FIconData.uCallbackMessage := WM_USER+1; //Сообщение, которое возникает при клике на иконке в треи
Shell_NotifyIcon(NIM_ADD, @FIconData)
Чтобы удалить иконку из трея:
Shell_NotifyIcon(NIM_DELETE, @FIconData);