![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
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- смотреть "Интересное о себе".