Frequently Asked Component Specific Questions
Options |
|
Display all FAQ items |
Displaying items 1 to 1 of 1, page 1 of 1
<< previous next >>
TMS Advanced Toolbars & MenusProgrammatically adding items to the application menu
This code snippet shows how menu items and submenu items can be programmatically added to the application menu, TAdvPreviewMenu:
begin
AdvPreviewMenu1.MenuItems.BeginUpdate;
with AdvPreviewMenu1.MenuItems.Add do
begin
Caption := 'Mainitem1';
SubMenuCaption := 'Sub menu caption1';
with SubItems.Add do
begin
Title := 'Subitem1';
Notes.Text := 'This is an additional note';
end;
end;
with AdvPreviewMenu1.MenuItems.Add do
begin
Caption := 'Mainitem2';
SubMenuCaption := 'Sub menu caption2';
with SubItems.Add do
begin
Title := 'Subitem2';
Notes.Text := 'This is an additional note';
end;
end;
AdvPreviewMenu1.MenuItems.EndUpdate;
end;