Delphi-PRAXiS
Seite 2 von 2     12   

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/)
-   -   PopupMenu SubMenu öffnen (https://www.delphipraxis.net/176473-popupmenu-submenu-oeffnen.html)

EarlyBird 9. Sep 2013 20:38

AW: PopupMenu SubMenu öffnen
 
Sorry da hab ich wohl nicht aufmerksam genug gelesen.
Aber das Hauptmenü bekomme ich ja auch schon ordentlich angezeigt.
Ich dachte jetzt daran aus dem Submenü ein zweites Hauptmenü zu machen und dann an der richtigen Position einzublenden.
Alles im Hauptmenü anzuzeigen ist leider keine Option für mich

Helmi 9. Sep 2013 20:38

AW: PopupMenu SubMenu öffnen
 
vielleicht hilft dir das weiter (was ich jetzt nicht ganz glaube):

http://www.s170867368.online.de/delphi/menpop.php

EarlyBird 9. Sep 2013 20:59

AW: PopupMenu SubMenu öffnen
 
Leider hilft es nicht.
Schade.
Ich bekomme zwar das SubMenü angezeigt aber dafür wird das Hauptmenü ausgeblendet.
Außerdem funktioniert auch das erst wenn ich das zweite mal auf den Submenüeintrag klicke :?:

Delphi-Quellcode:
//die Position stimmt so natürlich auch noch nicht
  PopUpM1.Popup(PopUpM1.PopupPoint.X,PopUpM1.PopupPoint.Y);
  TrackPopupMenu(TMenuItem(Sender).Parent.Handle, TPM_LEFTBUTTON or
    TPM_LEFTALIGN, PopUpM1.PopupPoint.X + 50,PopUpM1.PopupPoint.Y + 40, 0, self.Handle, Nil);

Helmi 9. Sep 2013 21:02

AW: PopupMenu SubMenu öffnen
 
was passiert, wenn du
Delphi-Quellcode:
PopUpM1.Popup(PopUpM1.PopupPoint.X,PopUpM1.PopupPoint.Y);
mal weg lässt?

EarlyBird 9. Sep 2013 21:19

AW: PopupMenu SubMenu öffnen
 
Dann geht das Submenü auf aber das Hauptmenü wird nicht angezeigt.
Das ganze funktioniert dann auch nur einmal.
Beim nächsten Klick ist dann auch das Submenü weg.

Und ich dachte ich mach das mal eben
das muss doch auch irgendwie funktionieren :roll:

Perlsau 10. Sep 2013 03:52

AW: PopupMenu SubMenu öffnen
 
Wie wäre es, den gewünschten SubMenü-Punkten Hotkeys zu verpassen, so daß der Anwender nicht jedesmal diese Submenüs mit der Maus anfahren muß?

EWeiss 10. Sep 2013 06:02

AW: PopupMenu SubMenu öffnen
 
Zitat:

Zitat von Perlsau (Beitrag 1227793)
Wie wäre es, den gewünschten SubMenü-Punkten Hotkeys zu verpassen, so daß der Anwender nicht jedesmal diese Submenüs mit der Maus anfahren muß?

Und nur dann ist es auch möglich über sendkeys die jeweilige funktion des Submenus aufzurufen
ohne es jedesmal mit der Maus aktivieren zu müssen.

Ein Beispiel für diese Methode kannst in meinem ProgCommand Sample finden.
Oder schau mal hier..

Fremde (Eigene) Menüs Fernsteuern

gruss

EarlyBird 10. Sep 2013 12:31

AW: PopupMenu SubMenu öffnen
 
Liste der Anhänge anzeigen (Anzahl: 1)
Vielen Dank für Eure Tipps.
Leider bekomme ich es trotzdem noch nicht richtig hin.

Folgendes klappt aber schon mal:
(nutze die SendKeys.pas danke an EWeiss dafür)

Das Submenü wird angezeigt, allerdings immer erst beim zweiten klick in einen Submenüeintrag.
Beim ersten klick wird nur das "Popup Hauptmenü" angezeigt.
Ab dem zweiten klick wird das Hauptmenü und das Submenü angezeigt, fast so wie ich es haben möchte.
Nur das der Parent auch nicht immer richtig erkannt wird.
Klickt man erst im ersten Submenü und dann im zweiten wird auch das ersteSubmenü aufgerufen.
Sehr eigenartig.

Ich habe mal ein kleines Testprojekt angehangen.
Vielleicht kann es sich ja mal jemand ansehen.
Das wäre echt prima.

EarlyBird 11. Sep 2013 09:10

AW: PopupMenu SubMenu öffnen
 
Es scheint keine befriedigende Lösung zu geben.
Daher werde ich das Problem mit einer eigenen Komponente lösen.

Danke für Eure Hilfe

bcvs 11. Sep 2013 10:42

AW: PopupMenu SubMenu öffnen
 
Das schien mir von Anfang an die beste Lösung zu sein, denn irgendwelche PopupMenus mit Strg offen zu halten ist irgendwie nicht besonders intuitiv.

Vielleicht geht ja was mit einer TreeView-Komponente.


Alle Zeitangaben in WEZ +1. Es ist jetzt 06:05 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz