TPopupActionBar的用途是什么？

问题描述：

TPopupActionBar的目的是什么？该手册没有提到这个问题。
如何在GUI中使用它？TPopupActionBar的用途是什么？

它的动作控制弹出对应。弹出属性是TCustomActionPopupMenuEx，它来自[TCustomActionPopupMenu]（http://docwiki.embarcadero.com/Libraries//en/Vcl.ActnMenus.TCustomActionPopupMenu）。 –

在窗体上放置TImagelist，TPopupActionBar和TActionManager。将TActionManager.Images属性设置为TImagelist，然后双击它并添加一些操作（请参阅新标准操作）。将TPopupActionBar的Images属性设置为TImageList。双击TPopupActionBar打开菜单设计器。将操作从TActionManager拖到菜单设计器上，以添加与这些操作相关的新菜单项。将窗体的PopupMenu属性设置为TPopupActionBar。运行您的应用程序并右键单击表单。 –

答

TPopupActionBar是TPopupMenu的一个子类，它通过提供将操作与每个菜单项相关联的选项来扩展TPopupMenu。

使用下面的代码创建一个新的...

procedure TForm1.Button1Click(Sender: TObject); 
var 
    MenuItem: TMenuItem; 
    Action: TCustomAction; 
begin 
    MenuItem := TMenuItem.Create(PopupActionBar1); 
    Action := TFileOpen.Create(PopupActionBar1); 
    Action.Caption := '&Open...'; 
    MenuItem.Action := Action; 
    PopupActionBar1.Items.Add(MenuItem); 

    MenuItem := TMenuItem.Create(PopupActionBar1); 
    Action := TFileOpenWith.Create(PopupActionBar1); 
    Action.Caption := 'Open with...'; 
    MenuItem.Action := Action; 
    PopupActionBar1.Items.Add(MenuItem); 
end;

TPopupActionBar的用途是什么？

相关推荐