delphi - 如何在设计时从自定义 TComponentEditor 显示 ActionList 编辑器

Question

我有一个 TComponentEditor 后代，我将其注册到 TActionList 以提供一些自定义选项。

回到 D2007，我可以通过从 ActnEdit 单元调用 ShowActionListDesigner 来显示默认的 ActionList 编辑器。只需将 designide.dcp 添加到所需的包即可:

procedure TMyActionListEditor.ExecuteVerb(Index: Integer); 
begin   
  if Index=1 then
    //do some stuff    
  else
    ActnEdit.ShowActionListDesigner(Designer, Component as TCustomActionList); 
end;

现在在XE5中我尝试了其他包，例如vcldesigner.dcp，但我似乎找不到哪个包包含ActnEdt。奇怪的是它在 FMXReg.pas 内部使用。

是否有不同的方法来调用标准 TActionList 编辑器窗口？

Answer 1

ShowActionListDesigner 方法位于 Actnedit 单元中，该单元是 dclstd 包的一部分。