|
(Co-Admin)
Registriert seit: 29. Mai 2002
Ort: Hamburg
11.116 Beiträge
Delphi 11 Alexandria
|
Re: TrayIcon - PopupMenu - Problem
30. Nov 2003, 21:16
Moin Onz,
ich hab's so gelöst, dass ich das Anwendungsfenster mit SetForegroundWindow nach oben hole, bevor ich das Menü öffne:
Delphi-Quellcode:
procedure TfrmMAIN.WndProc(var msg : TMessage);
begin
if msg.Msg = FdwTBNAMessage then begin
case msg.LParam of
WM_RBUTTONUP : begin
SetForegroundWindow(self.Handle);
//...
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
|