TrayIcon - PopupMenu - Problem

**moritz**

Hallo

Folgendes Problem bzw. Frage:
Wenn ich über das TrayIcon ein PopupMenu geöffnet habe, soll sich dies bei einem Klick auserhalb wieder schließen. Wie geht das?

Gruß

**Christian Seehase**

Moin Onz,

ich hab's so gelöst, dass ich das Anwendungsfenster mit SetForegroundWindow nach oben hole, bevor ich das Menü öffne:

markieren

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);

//...

**moritz**

Hallo

Das Programm soll sich bei mir jedoch erst öffnen, wenn man im Menu auf "Öffnen" klickt, deswegen ist das etwas umständlich.

Gruß

**Luckie**

Es öffnet sich auch nur dann, wenn man auf deinen Menüpunkt klickt. Bau es ein und probier es aus.

TrayIcon - PopupMenu - Problem

TrayIcon - PopupMenu - Problem

Re: TrayIcon - PopupMenu - Problem

Re: TrayIcon - PopupMenu - Problem

Re: TrayIcon - PopupMenu - Problem

Forumregeln

moritz Registriert seit: 18. Apr 2003 1.037 Beiträge	#3 Re: TrayIcon - PopupMenu - Problem 1. Dez 2003, 07:24 Hallo Das Programm soll sich bei mir jedoch erst öffnen, wenn man im Menu auf "Öffnen" klickt, deswegen ist das etwas umständlich. Gruß "Optimistisch ist diejenige Weltanschauung, die das Sein höher als das Nichts stellt und so die Welt und das Leben als etwas an sich Wertvolles bejaht." Albert Schweitzer
	Zitat

Luckie Registriert seit: 29. Mai 2002 37.621 Beiträge Delphi 2006 Professional	#4 Re: TrayIcon - PopupMenu - Problem 1. Dez 2003, 07:26 Es öffnet sich auch nur dann, wenn man auf deinen Menüpunkt klickt. Bau es ein und probier es aus. Michael Ein Teil meines Codes würde euch verunsichern.
	Zitat