Finden Sie, dass die Verwendung des von Delphi bereitgestellten Menüs wirklich unattraktiv ist? Sie können Delphis eigenes VCL-Steuerelement verwenden, um ein Menü im IE-Stil zu implementieren! Zu den Funktionen gehören: schwebende Schaltflächen, Drag-Positionierung, Grafiken ... alles erfordert keine Steuerelemente von Drittanbietern oder viel Programmieraufwand!
Die Implementierung eines Menüs im IE-Stil erfordert die folgenden Schritte:
1. Definieren Sie ein gewöhnliches Menü auf die übliche Weise.
2. Blenden Sie das definierte Menü aus dem Fenster aus.
3. Fügen Sie CoolBar und ToolBar als Menüleiste zum Fenster hinzu;
4. Ordnen Sie das Menü der Symbolleistenschaltfläche zu.
5. Programm für Spezialeffekte (optional).
Der erste Schritt besteht darin, auf normale Weise ein normales Menü zu definieren.
Fügen Sie dem Fenster ein TMainMenu-Steuerelement hinzu und definieren Sie dann auf die übliche Weise Menüelemente, Symbole, Tastenkombinationen usw.
Der zweite Schritt besteht darin, das definierte Menü aus dem Fenster auszublenden.
Das definierte Menü wird automatisch im Fenster angezeigt. Dies liegt daran, dass beim Hinzufügen eines TMainMenu-Steuerelements zum Fenster die Menu-Eigenschaft des TForm-Objekts automatisch auf das hinzugefügte TMainMenu-Objekt gesetzt wird. Um unser eigenes definiertes Menü verwenden zu können, muss dieses Menü ausgeblendet werden. Löschen Sie TForm.Menu und das definierte Menü wird nicht automatisch angezeigt.
Der dritte Schritt besteht darin, CoolBar und ToolBar als Menüleiste zum Fenster hinzuzufügen.
Fügen Sie dem Fenster ein TCoolBar-Steuerelement hinzu und platzieren Sie darin ein TToolBar-Steuerelement. Setzen Sie die AutoSize-Eigenschaft von TCoolBar und TToolBar auf True, die Flat-Eigenschaft von TToolBar auf True und die ShowCaptions-Eigenschaft von TToolBar auf True. Auf diese Weise erscheint über dem Fenster eine leere Menüleiste. Als nächstes fügen wir dieser Menüleiste Menüelemente hinzu.
Der vierte Schritt besteht darin, das Menü der ToolBar-Schaltfläche zuzuordnen.
Klicken Sie mit der rechten Maustaste auf TToolBar und wählen Sie „Neue Schaltfläche“ aus dem Popup-Menü, um die erste Schaltfläche zur Menüleiste hinzuzufügen. Legen Sie die Eigenschaften „AutoSize“ und „Grouped“ dieser Schaltfläche auf „True“ fest und ändern Sie dann die Eigenschaft „Caption“ in den Text des Menüelements. Beispielsweise könnte die Caption-Eigenschaft auf &File festgelegt werden. Setzen Sie abschließend die MenuItem-Eigenschaft dieser Schaltfläche auf den entsprechenden in TMainMenu definierten Menüpunkt. Beispielsweise könnte die Eigenschaft „MenuItem“ auf „mnuFile“ festgelegt werden. Nach diesen Einstellungen wird die Schaltfläche mit dem Menüpunkt verknüpft und das entsprechende Menü wird angezeigt, wenn auf die Schaltfläche geklickt wird.
Der fünfte Schritt besteht darin, Spezialeffekte zu programmieren (optional).
Nach den bisherigen vier Schritten kann das neue Menü bereits normal funktionieren. Wenn Sie jedoch weitere Spezialeffekte implementieren möchten, wie z. B. das Ziehen und Positionieren von CoolBar, ist ein weiterer Programmieraufwand erforderlich. Diese Inhalte sind nicht mehr Gegenstand dieses Artikels und werden nicht weiter besprochen. Interessierte Leser können auf die Hilfe von Delphi verweisen.
Leser können gerne ihre eigene Meinung zu diesem Artikel äußern.