Форум: "WinAPI";
Текущий архив: 2004.03.14;
Скачать: [xml.tar.bz2];
ВнизИкона в трее Найти похожие ветки
← →
rustamus (2004-01-06 10:59) [0]Скажите пожалуйста, как подключить к иконе в трее контекстное меню? Заранее благодарен.
← →
AbrosimovA (2004-01-06 11:34) [1]
private
procedure NotifyIcon(var Msg : TMessage);message WM_USER + 100;
procedure TForm1.NotifyIcon(var Msg : TMessage);
var P: TPoint;
begin
case Msg.LParam of
WM_LBUTTONDBLCLK :
begin
ShowWindow(Application.Handle,SW_SHOW);
Application.Restore;
Shell_NotifyIcon(NIM_DELETE,@TrayIcon);
end;
WM_RBUTTONDOWN :
begin
GetCursorPos(P);
PopupMenu1.Popup(P.X, P.Y); //Вывод контекстного меню
end;
end;
end;
Страницы: 1 вся ветка
Форум: "WinAPI";
Текущий архив: 2004.03.14;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.011 c