Description


Donne accès au menu contextuel du composant.


Permet de configurer le menu contextuel.




Exemples


// Masque un item du menu
Form1.TableGrid1.dbPopupMenu.Items[0].Visible := False;



// Désactive un item du menu
Form1.TableGrid1.dbPopupMenu.Items[0].Enabled := False;



// Cliquer par script sur le premier élément de menu (la numérotation commence à partir de 0)
Form1.TableGrid1.dbPopupMenu.Items[0].Click;




// Renommer les items du menu
procedure Form1_OnShow (Sender: TObject; Action: string);
begin
    Form1.TableGrid1.dbPopupMenu.Items[0].Caption := 'Afficher l'enregistrement';
    Form1.TableGrid1.dbPopupMenu.Items[1].Caption := 'Effacer l'enregistrement';
    Form1.TableGrid1.dbPopupMenu.Items[3].Caption := 'Copier la cellule';
    Form1.TableGrid1.dbPopupMenu.Items[4].Caption := 'Copier';
    Form1.TableGrid1.dbPopupMenu.Items[5].Caption := 'Copier tout';
    Form1.TableGrid1.dbPopupMenu.Items[7].Caption := 'Rechercher';
end;




// Ajouter des items au menu et aux sous-menus
procedure Form1_OnShow (Sender: TObject; Action: string);
var   SubMenu  : TMenuItem;
      MenuItem : TMenuItem;
begin
   SubMenu := TMenuItem.Create (Form1);
   SubMenu.Caption := 'Sous-menu';
   MenuItem := TMenuItem.Create (Form1);
   MenuItem.Caption := 'Item';
   MenuItem.OnClick := @MenuClick1;
   Form1.TableGrid1.dbPopupMenu.Items.Insert(0, SubMenu);
   Form1.TableGrid1.dbPopupMenu.Items[0].Add(MenuItem);
end;


procedure MenuClick1;
begin
    ShowMessage('Hello depuis le menu');
end;