property dbPopupMenu: TPopupMenu
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;