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

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

Tray Icon [D5, D6, D7, Win95/98, WinME, NT4, Win2k, WinXP]


sqwer ©   (2004-08-04 21:51:00) 

Здравствуйте! Помогите!!! Как свернуть основное окно программы в трей, если можно, то чтобы некоторые формы проекта можно было вывести на экран!!! Если есть какие-нибудь компоненты, дайте ссылку или скиньте, пожалуйста!!!


XXX   (2004-08-06 10:41:00) [1]

Ищи в сети компонент CoolTrayIcon
в нем куча возможностей, и он сделает черновую работу за тебя.


TUser   (2004-08-05 13:35:00) [2]

О! Давно этого вопроса не было.


grom   (2004-08-05 12:56:00) [3]

http://www.delphimaster.ru/cgi-bin/forum.pl?id=1091136573&n=5


bloodman   (2004-08-05 00:39:00) [4]

function TaskBarAddIcon( hWindow : THandle; ID  : Cardinal;
ICON : hicon; CallbackMessage : Cardinal; Tip  : String ) : Boolean;
var
NID : TNotifyIconData;
begin
FillChar( NID, SizeOf( TNotifyIconData ), 0 );
with NID do begin
 cbSize := SizeOf( TNotifyIconData );
 Wnd   := hWindow;
 uID    := ID;
 uFlags := NIF_MESSAGE or NIF_ICON or NIF_TIP;
 uCallbackMessage := CallbackMessage;
 hIcon  := Icon;
 if Length( Tip ) > 63 then SetLength( Tip, 63 );
 StrPCopy( szTip, Tip );
end;
Result := Shell_NotifyIcon( NIM_ADD, @NID );
end;


начинающий   (2004-08-04 23:49:00) [5]

:) Блин, аж клавиатуру заплевал, так смеялся!!! (Хотя нет - если аж заплевал, то скорее всего не смеялся, а ржал)


sqwer   (2004-08-04 22:26:00) [6]

А что там за параметры?


VMcL   (2004-08-04 21:54:00) [7]

>> sqwer  (04.08.04 21:51)

http://www.delphimaster.ru/cgi-bin/anketa.pl?id=997775670- смотреть "Интересное о себе".


Наверх

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