![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Значок в системном лотке [D7, XP]
msteam © (2007-02-05 14:28:00)Как с помощью Delphi создать значок в системном лотке?
unknown (2007-02-06 00:40:00) [1]
> msteam (05.02.07 14:28)
> Как с помощью Delphi создать значок в системном лотке?
О сколько нам открытий чудных... =)))
Плохиш (2007-02-06 00:20:00) [2]
> Elen © (05.02.07 14:35) [5]
>
> > novill
>
> А помоему "в системном лотке" звучит интеллигентнее
Не зачем менять устоявшуюся терминологию ;-)
Anatoly Podgoretsky (2007-02-05 20:38:00) [3]> MSTeam (05.02.2007 14:31:02) [2]
Часы это что то большое, а там маленькое.
clickmaker (2007-02-05 14:38:00) [4]"в системном ларьке" еще лучше
RASkov (2007-02-05 14:38:00) [5]http://www.delphimaster.ru/cgi-bin/faq.pl?look=1&id=988624981&n=15
Как поместить иконку в Tray ?
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;
Elen (2007-02-05 14:35:00) [6]
> novill
А помоему "в системном лотке" звучит интеллигентнее :)
novill (2007-02-05 14:34:00) [7]> [0] msteam (05.02.07 14:28)
Учи терминологию!
Это называется "запудзырить в трей"!
А потом воспользуйся поиском!!!
Elen (2007-02-05 14:33:00) [8]
> msteam
А поиском? Shell_NotifyIcon тут уже обсуждалось :)
MSTeam (2007-02-05 14:31:00) [9]Да, где часы
Johnmen (2007-02-05 14:29:00) [10]Там, где часики?
:)))