Текущий архив: 2002.10.10;
Скачать: CL | DM;
Вниз
Меню из SySTray Найти похожие ветки
← →
Fog © (2002-08-22 11:55) [0]Мне многие пытались объснить как сделать так чтобы из иконки при правом клике вылезало меню... У меня есть следующея процидура
procedure TForm1.IconClick(Message: TMessage);
begin
if message.LParam = WM_LBUTTONDBLCLK then
Form1.Show;
end;
И все работает! Но как мне сделать так чтобы меню выскакивало именно где кликнула мышь...
← →
easy © (2002-08-22 12:04) [1]
procedure TForm1.button1Click(Sender: TObject);
var P : TPoint;
begin
GetCursorPos(p);
SetForegroundWindow(tform1.Handle);
PopupMenu1.Popup(P.X, P.Y);
end;
← →
Игорь Шевченко © (2002-08-22 13:44) [2]Пачеко, Тейксейра "Delphi 5. Руководство разработчика" - там все написано, как вызывать меню из иконки в Tray
← →
s.kaster © (2002-08-26 20:36) [3]есть хорошие компоненты (ABF non-visual)
← →
Song © (2002-08-26 21:31) [4]http://pascal.sources.ru/cgi-bin/forum/YaBB.cgi?board=delphi;action=display;num=1020241631
Страницы: 1 вся ветка
Текущий архив: 2002.10.10;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.013 c
