Delphi-PRAXiS - Delphi cooltrayicon + popupmenue

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)

- - Delphi cooltrayicon + popupmenue (https://www.delphipraxis.net/30628-cooltrayicon-popupmenue.html)

schlumpf1

27. Sep 2004 12:31

cooltrayicon + popupmenue

hi ich hab ne anwendung ohne form die nur aus cooltrayicon und popupmenue (visuell gesehen) besteht.

wie bekomm ich es hin das sich das menue automatisch beim starten der anwendung öffnet?

alcaeus

27. Sep 2004 12:33

Re: cooltrayicon + popupmenue

Hi schlumpf, sieh dir mal Delphi-Referenz durchsuchen

TPopupMenu.Popup an.

Greetz
alcaeus

Akut-Programming

27. Sep 2004 12:34

Re: cooltrayicon + popupmenue

:hi: Schreib den folgenden Code ins OnCreate deiner Anwendung. - Sollte klappen

Delphi-Quellcode:

			PopupMenu.Popup(Mouse.CursorPos.x, Mouse.CursorPos.y ); //PopUp Menü wird an aktueller Maus Position angezeigt
		

oder so...

Delphi-Quellcode:

PopupMenu.Popup(Screen.Width, Screen.Height); // Menü erscheint unten rechts

Gruß,
Sascha

ipworks

27. Sep 2004 12:35

Re: cooltrayicon + popupmenue

Hallo Schlumpf.
TPopUpMenu hat die Methode PopUp.

Delphi-Quellcode:

procedure Popup(X, Y: Integer); virtual;

Grüsse auf Bayern
Peter

schlumpf1

27. Sep 2004 14:54

Re: cooltrayicon + popupmenue

danke... aber ich will es über dem icon und nicht bei der mouse popupen(sry für die schlechte frage stellung)

Akut-Programming

27. Sep 2004 14:57

Re: cooltrayicon + popupmenue

Und wie wärs damit??

Zitat:

Zitat von Akut-Programming

Delphi-Quellcode:

PopupMenu.Popup(Screen.Width, Screen.Height); // Menü erscheint unten rechts

Hänge hinter das "Screen.Height" noch -19 (sollte die Höhe der Taskbar sein) und schon hastes da unten in der Ecke!! :zwinker:

Alle Zeitangaben in WEZ +1. Es ist jetzt 08:04 Uhr.