AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

In einem Popupmenu ein weiteres Popupmenu

Ein Thema von stonimahoni · begonnen am 2. Nov 2005 · letzter Beitrag vom 3. Nov 2005
 
stonimahoni

Registriert seit: 12. Okt 2004
146 Beiträge
 
Delphi 7 Professional
 
#1

In einem Popupmenu ein weiteres Popupmenu

  Alt 2. Nov 2005, 14:31
Hi Leute.


Hab schon bissl gesucht hier und im Inet allgemein, aber nicht so wirklich das pasende gefunden.

Ich habe ein Popupmenu das ich folgendermassen ansteuer :

Delphi-Quellcode:
if (Sender is TbuttonControl) then
   begin
      pt.x := TbuttonControl(Sender).Left + (TbuttonControl(Sender).Width div 2);
      pt.y := TbuttonControl(Sender).Top + (TbuttonControl(Sender).Height div 2);
      o := TbuttonControl(Sender).Parent;
      while Assigned(o) and (o <> Self) do
      begin
         pt := o.ClientToScreen(pt);
         o := o.Parent;
      end;
      PM_Einzeldruck.Popup(pt.x, pt.y);
   end;
Das musste ich so machen, weil es über einen Button aufgerufen wird, der auf einem Panel liegt. Und das Popupmenu soll direkt neben dem Button aufklappen.

Sooo...nun habe ich mehrere Einträge in diesem Menü und würde gern bei bisher zweien ein weiteres Aufklappen ermöglichen. Also eine Art Popup im Popup. (Ich drücke den Button - Popupmenu geht auf - ich klicke auf einen Eintrag - ein weiteres Popupmenu geht auf)
Kann ich das irgendwie realisieren ?



Vielen Dank.


MFG


Carsten
Carsten
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 09:15 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