Frequently Asked Component Specific Questions

Options

Display all FAQ items

Search FAQ items:


Displaying items 1 to 1 of 1, page 1 of 1

<< previous next >>

TAdvMenus
Programmatically adding menu items, submenus to the TAdvMainMenu, TAdvPopupMenu

To add items to a menu, make sure to embed this within Menu.BeginUpdate, Menu.EndUpdate calls

var
mnu,mnus:TMenuItem; 
begin 
  mnu := TMenuItem.Create(advmainmenu1); 
  mnu.Caption := 'New Menu'; 
  mnus := TMenuItem.Create(advmainmenu1);
  mnus.Caption := 'New Sub Menu';
  advmainmenu1.BeginUpdate;
  advmainmenu1.items.Add(mnu);
  advmainmenu1.Items[4].Add(mnus);
  advmainmenu1.EndUpdate;
end;