Pensez-vous que le menu fourni par Delphi est vraiment peu attrayant à utiliser ? Vous pouvez utiliser le contrôle VCL de Delphi pour implémenter un menu de style IE ! Les fonctionnalités incluent : des boutons flottants, le positionnement par glisser-déposer, des graphiques... qui ne nécessitent aucun contrôle tiers ni beaucoup de programmation !
La mise en œuvre d'un menu de style IE nécessite les étapes suivantes :
1. Définissez un menu ordinaire de la manière habituelle ;
2. Masquez le menu défini de la fenêtre ;
3. Ajoutez CoolBar et ToolBar à la fenêtre comme barre de menu ;
4. Mappez le menu sur le bouton de la barre d'outils ;
5. Programme d'effets spéciaux (facultatif).
La première étape consiste à définir un menu normal de la manière habituelle.
Ajoutez un contrôle TMainMenu à la fenêtre, puis définissez les éléments de menu, les icônes, les touches de raccourci, etc. de la manière habituelle.
La deuxième étape consiste à masquer le menu défini de la fenêtre.
Le menu défini sera automatiquement affiché sur la fenêtre. En effet, lorsqu'un contrôle TMainMenu est ajouté à la fenêtre, la propriété Menu de l'objet TForm est automatiquement définie sur l'objet TMainMenu ajouté. Afin d'utiliser notre propre menu défini, ce menu doit être masqué. Effacez TForm.Menu et le menu défini ne sera pas automatiquement affiché.
La troisième étape consiste à ajouter CoolBar et ToolBar à la fenêtre en tant que barre de menus.
Ajoutez un contrôle TCoolBar à la fenêtre, puis placez un contrôle TToolBar à l'intérieur. Définissez la propriété AutoSize de TCoolBar et TToolBar sur True, définissez la propriété Flat de TToolBar sur True et définissez la propriété ShowCaptions de TToolBar sur True. De cette façon, une barre de menu vide apparaît au-dessus de la fenêtre. Ensuite, nous ajouterons des éléments de menu à cette barre de menus.
La quatrième étape consiste à mapper le menu sur le bouton de la barre d'outils.
Cliquez avec le bouton droit sur TToolBar et sélectionnez Nouveau bouton dans le menu contextuel pour ajouter le premier bouton à la barre de menus. Définissez la propriété AutoSize et la propriété Grouped de ce bouton sur True, puis remplacez la propriété Caption par le texte de l'élément de menu. Par exemple, la propriété Caption peut être définie sur &File. Enfin, définissez la propriété MenuItem de ce bouton sur l'élément de menu correspondant défini dans TMainMenu. Par exemple, la propriété MenuItem peut être définie sur mnuFile. Après ces paramètres, le bouton est lié à l'élément de menu et le menu correspondant apparaîtra lorsque vous cliquerez sur le bouton.
La cinquième étape consiste à programmer des effets spéciaux (facultatif).
Après les quatre étapes précédentes, le nouveau menu peut déjà fonctionner normalement. Cependant, si vous souhaitez implémenter d'autres effets spéciaux, tels que le déplacement et le positionnement de CoolBar, vous devez effectuer un travail de programmation supplémentaire. Ces contenus ne font plus l'objet de cet article et ne seront pas abordés. Les lecteurs intéressés peuvent se référer à l'aide de Delphi.
Les lecteurs sont invités à donner leur propre opinion sur cet article.