怎么动态获取actionmanger里每个action的caption值

如何动态获取actionmanger里每个action的caption值
目的:动态获取actionmanger里每个action的caption值
详细说明:想动态获取actionmanger里每个action的caption值,将其加到listbox的items中,但在单元里编写如下以句却不行
listbox1.items.add(form.actionmanger1.actions[i].caption)提示没有caption这个属性,但在IDE里却有这个属性,为何
另外虽然不能读取formactionmanger1.actions[i].caption,但却有form.action1.caption,frm.action2.caption.....这个东东.
该怎么办呢.

------解决方案--------------------

Delphi(Pascal) code

var
  i : Integer;
begin
  for i:=0 to ActionManager1.ActionCount-1 do
  begin
    ShowMessage((ActionManager1.Actions[i] as TAction).Caption);
  end;

end;