• remplacer le libellé d'une option de menu par le contenu d'un champ.
• ajouter de l'aide sur une option de menu.
• personnaliser l'apparence d'un menu.
• rendre invisible un menu principal.
• exécuter du code avant l'affichage d'un menu contextuel.
• afficher un menu contextuel grâce à un clic gauche.
• dissocier un menu contextuel d'un champ ou d'une fenêtre.
• récupérer le numéro de la ligne et de la colonne d'une table sur lesquelles un clic droit est réalisé.
• changer de menu contextuel lors de la sélection d'un élément d'un champ Arbre.

• Pour plus de détails sur les menus et sur les options de menu, consultez :
  • Gestion des menus contextuels dans une application.
  • Gestion des menus principaux des fenêtres.
  • Manipuler les options de menu sous l'éditeur.
  • Manipuler les options de menu par programmation.
• Tous ces "Trucs & Astuces" sont utilisables avec les menus principaux et les menus contextuels sauf mention contraire.

Remplacer le libellé d'une option de menu par le contenu d'un champ

• récupérer le contenu du champ.
• modifier le libellé de l'option de menu avec la propriété Libellé ou avec la fonction MenuLibellé.

• Le libellé de l'option de menu "MonOption" doit correspondre à la valeur saisie dans le champ "MonChamp".
  
  MonOption.Libellé = MonChamp
  // Équivalent à : MenuLibellé(MonOption, MonChamp)
• Le libellé de l'option de menu "MonOption" doit correspondre au contenu de la cellule appartenant à la colonne "COL_MaColonne" et à la ligne sélectionnée par l'utilisateur dans le champ Table "TABLE_MaTable" :
  
  MonOption.Libellé = COL_MaColonne[TableSelect(TABLE_MaTable)]
  // Équivalent à :
  // MenuLibellé(MonOption, COL_MaColonne[TableSelect(TABLE_MaTable)])

Ajouter de l'aide sur une option de menu

Personnaliser l'apparence d'un menu

• la couleur de fond d'un menu.
• la police (taille, couleur, ...) des options d'un menu.
• la couleur de fond de l'option survolée.
• la police (taille, couleur, ...) de l'option survolée.

1. Sélectionnez une option de menu.
2. Affichez l'onglet "Style" de la fenêtre de description des options de menu (option "Description de l'option" du menu contextuel).
3. Pour personnaliser :
   • la couleur de fond du menu : sélectionnez "Fond de l'option" dans la combo "Élément" et sélectionnez la couleur de fond de l'option.
   • la police des options du menu : sélectionnez "Texte de l'option" dans la combo "Élément" et sélectionnez les caractéristiques de la police (attributs, taille, couleur, ...)
   • la couleur de fond de l'option survolée : sélectionnez "Fond de l'option (survol)" dans la combo "Élément" et sélectionnez la couleur de fond de l'option survolée.

• soit une couleur prédéfinie. Sélectionnez cette couleur parmi celles proposées dans la combo "Couleur".
• soit une couleur personnalisée. Définissez cette couleur à l'aide du sélecteur de couleurs (bouton "..." à droite de la combo "Couleur").

Par exemple :

Il n'est pas possible de personnaliser l'apparence d'un menu.

Rendre invisible le menu principal d'une fenêtre

Exemple : Les options "principales" du menu suivant sont "Fichiers" et "Impressions".

Pour rendre invisible ce menu principal, saisissez le code suivant :

// Rendre invisibles les options "Fichiers" et "Impressions"
Fichiers.Visible = Faux
Impressions.Visible = Faux
// Équivalent à :
// MenuInvisible(Fichiers)
// MenuInvisible(Impressions)

Exécuter du code avant d'afficher le menu contextuel

1. Affichez le code de l'élément (champ ou fenêtre) associé au menu contextuel (option "Code" du menu contextuel de l'élément).
2. Cliquez sur le lien "Ajouter d'autres événements à xxx" situé à la fin de la fenêtre de code, après le dernier événement.
   
3. Dans la liste des événements optionnels, sélectionnez l'événement "Affichage menu contextuel" et validez.
4. Saisissez dans cet événement optionnel le code à exécuter avant l'affichage du menu contextuel.

Afficher un menu contextuel grâce à un clic gauche

1. Affichez le code du champ "SAI_MonChamp" (option "Code" du menu contextuel du champ).
2. Cliquez sur le lien "Ajouter d'autres événements à xxx" situé à la fin de la fenêtre de code, après le dernier événement.
   
   Dans la liste des événements optionnels, sélectionnez l'événement "Bouton gauche enfoncé" et validez.
3. Dans cet événement optionnel, saisissez le code suivant :
   
   // Associer le menu contextuel au champ
   SAI_MonChamp.MenuContextuel = MonMenu
   // Simuler un clic droit sur le bouton pour appeler
   // le menu contextuel
   SendMessage(Handle(MoiMême), 516, 0, 0)
   SendMessage(Handle(MoiMême), 517, 0, 0)
   // Dissocier le menu contextuel du champ
   SAI_MonChamp.MenuContextuel = ""

Dissocier un menu contextuel d'un champ ou d'une fenêtre

Récupérer le numéro de la ligne et de la colonne d'un champ Table sur lesquelles un clic droit est réalisé

1. Affichez le code du champ "TABLE_MaTable" (option "Code" du menu contextuel du champ).
2. Cliquez sur le lien "Ajouter d'autres événements à xxx" situé à la fin de la fenêtre de code, après le dernier événement.
   
   Dans la liste des événements optionnels, sélectionnez l'événement "Bouton droit enfoncé" et validez.
3. Dans cet événement optionnel, saisissez le code suivant :
   
   // Récupérer la ligne et la colonne sélectionnées par un clic droit
   NumLigneSelect est un entier
   NumColSelect est un entier
   NumLigneSelect = TableInfoXY(MoiMême, tiNumLigne, SourisPosX(), SourisPosY())
   NumColSelect = TableInfoXY(MoiMême, tiNumColonne, SourisPosX(), SourisPosY())
   // Modifier la couleur de la cellule sélectionnée
   TABLE_MaTable[NumLigneSelect][NumColSelect].CouleurFond = BleuClair