TMenu auf TControlBar ( verschiebbar?! )

**Stargate3**

Hallo,
hat jemand eine Idee wie ich ein TMenu auf eine TControlBar bekomme um das Menu ( wie in Delphi ) verschieben zu können?

Danke!

Ich hab´s in Delphi 5 so gemacht:

TCoolBar auf die Form
TToolbar als Unterfenster der Coolbar eingefügt
Buttons erstellt, die den Punkten des Hauptmenüs entsprechen (Stil: AutoSize=true)
Die Eigenschaft "MenuItem" mit dem jeweiligen Punkt aus dem Hauptmenü verknüpfen. (Wenn also bspw. dein Datei-Menüpunkt "IDM_FILE" heißt, dann stellst du den für den entsprechenden Toolbar-Knopf ein, und schon poppt das Menü "Datei" auf.)

Voilà. Fertig.

Um mich mit Ayas Worten zu verabschieden:

Oh Reservoir!

**Matze**

Hi!

Deine Lösung, Matze, finde ich wirklich gut, hab's auch so gemacht.

Aber

Aya sagt aber immer: Au'revoir.
Ich weiß schon, dass das ein Scherz von dir ist

Au'revoir

Matze

Stargate3 Registriert seit: 11. Mai 2003 Ort: Greven 31 Beiträge	#1 TMenu auf TControlBar ( verschiebbar?! ) 19. Aug 2003, 18:18 Hallo, hat jemand eine Idee wie ich ein TMenu auf eine TControlBar bekomme um das Menu ( wie in Delphi ) verschieben zu können? Danke!
	Zitat

Matze (Co-Admin) Registriert seit: 7. Jul 2003 Ort: Schwabenländle 14.929 Beiträge Turbo Delphi für Win32	#3 Re: TMenu auf TControlBar ( verschiebbar?! ) 19. Aug 2003, 20:33 Hi! Deine Lösung, Matze, finde ich wirklich gut, hab's auch so gemacht. Aber Aya sagt aber immer: Au'revoir. Ich weiß schon, dass das ein Scherz von dir ist Au'revoir Matze
	Zitat