![]() |
PopupMenu-Item->Rechtsklick
Hallo zusammen,
ich habe ein Problem mit dem PopupMenu, ist es irgendwie möglich, wenn man auf ein Item rechts-klickt, ein weiteres PopupMenu anzuzeigen, bei normalem linksklick soll die aktion ausgefürt werden? Also, sowas wie das Favoritenmenü im IE... Wenn ja, wie? Danke schonmal... |
Re: PopupMenu-Item->Rechtsklick
Moin Gothic Mike,
Zitat:
|
Re: PopupMenu-Item->Rechtsklick
Hi,
Zitat:
das mit dem FavMenu war nur als Beispiel... |
Re: PopupMenu-Item->Rechtsklick
Was hälst Du von einem Untermenü? Geht zwar auch von alleine auf, aber vielleicht ist das ja für Dich ok.
Gruß, teebee |
Re: PopupMenu-Item->Rechtsklick
Dann erhält der Benutzer aber den Eindruck, nicht auf das Element klicken zu können...
|
Re: PopupMenu-Item->Rechtsklick
hmm du könntest das ganze vertstecken :D ist ein bisschen aufwand aber schau mal:
du brauchst ein TMainMenu(wenn nicht eh schon vorhanden) und 2 Popupmenus In das Mainmenu machst du einen versteckten eintrag welcehr das 2 Popup auffahrt. und wenn du beim ersten den einen Menüeintrag anklickst dann öffnet sich das Popup :) .. musst halt die Koordinaten abfragen.. geht sicher leichter aber ES GEHT :D so gehts einfach :
Delphi-Quellcode:
Start1 ist ein Eintrag im ersten Popup ;)var X1,Y1 : Integer; implementation {$R *.dfm} procedure TForm1.START1Click(Sender: TObject); begin Popupmenu2.Popup(X1+Form1.left+20,Y1+Form1.top+40); end; procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); begin X1 := X; Y1 := Y; end; |
Re: PopupMenu-Item->Rechtsklick
Hallo zusammen,
also die Position des Popupmenüs würde ich anders ermitteln:
Delphi-Quellcode:
Wäre es nicht auch überlegenswert die Komponente TMenuItem um das Ereignis OnMouseDown zu erweitern??
var p : TPoint;
begin if GetCursorPos(p) then PopupMenu1.Popup(p.X, p.Y); |
Re: PopupMenu-Item->Rechtsklick
Moin Zusammen,
auf jeden Fall lassen sich nicht beide gleichzeitig anzeigen, da normalerweise nur ein Popupmenü zur Zeit im System angezeigt werden kann. Am besten hiesse das wohl mit "normalen" Forms so etwas nachzubauen. |
Re: PopupMenu-Item->Rechtsklick
Hallo zusammen,
Zitat:
das mit dem untermenu fält flach, weil das ganze soll von der bedienung her so sein, wie's Startmenü oder das Favoritenmenü... Danke an alle, die mir geantwortet haben! |
Re: PopupMenu-Item->Rechtsklick
Moin Gothic Mike,
Zitat:
Das sind doch ganz normale Untermenüs :gruebel: |
Alle Zeitangaben in WEZ +1. Es ist jetzt 21:52 Uhr. |
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 by Thomas Breitkreuz