Текущий архив: 2006.06.11;
Скачать: CL | DM;
Вниз
Где взять компонент TrayIcon для Delphi7 Найти похожие ветки
← →
Mozaika_81 (2006-05-22 21:24) [0]Добрый вечер, Мастера!
У меня такая вот проблемка: У меня на диске записаны старые компоненты для Delphi 5-6. Тут необхождимо прогу в трей спрятать, а компоненты чета не работают. Наверное не совместимость?
Мастера, пожалуйста дайте ссылочку или скиньте на мыло компонент для Delphi 7.
← →
TUser © (2006-05-22 21:37) [1]www.yandex.ru
← →
Turbid © (2006-05-23 01:18) [2]uses
ShellApi;
← →
Amoeba © (2006-05-23 10:43) [3]http://www.torry.net
← →
Konnor © (2006-05-23 11:33) [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;
А если нужен именно компонент, воспользуйся JEDI... Там все есть
Страницы: 1 вся ветка
Текущий архив: 2006.06.11;
Скачать: CL | DM;
Память: 0.44 MB
Время: 0.01 c