关于PopMenu 的问题

Question

改变popMenu彩单项的caption属性比如
begin
   PopMenu.n1.Caption:='改变之前';
   PopMenu.n1.Caption:='改变之后';
end;

Answer 1

应该没有“PopMenu.”吧。
  n1.Caption:='改变之前';
  n1.Caption:='改变之后';
要增加：
var menu :TMenuItem;
 menu := TMenuItem.Create(PopMenu);
 menu.Caption := 'test';
 PopMenu.Add(menu);

Answer 2

试试它的items中的方法（其中有add、delete等）

Answer 3

一段代码，能够说明一些问题吧：
procedure TFrmMain.UpdateRecentFilesMenu;
const
  csMenu = '&%d  %s';
  procedure Refresh( Obj: TObject );
  var
    i: integer;
    MenuItem: TMenuItem;
  begin
    if Obj is TMenuItem then
      TMenuItem( Obj ).Clear
    else
      TPopupMenu( Obj ).Items.Clear;
    for i := 0 to FRecentFile.Count - 1 do
    begin
      MenuItem := TMenuItem.Create( Self );
      MenuItem.Caption := Format( csMenu, [i, FRecentFile.Files[i] ] );
      MenuItem.Tag := i;
      MenuItem.OnClick := RecentFileMenu;
      if Obj is TMenuItem then
        TMenuItem( Obj ).Add( MenuItem )
      else
      if obj is TPopupMenu then
        TPopupMenu( Obj ).Items.Add( MenuItem );
    end;
  end;
begin
  Refresh( miReOpen );
  Refresh( ppmnuRecentFiles );
end;

Answer 4

说明：这段代码是用来动态产生 最近打开过那些文件 的菜单的。
     就象Delphi的Reopen一样。
     miReOpen 是主菜单上的一个TMenuItem
     ppmnuRecentFiles 是一个 TPopuUpMenu
     执行后 miReOpen 后面就跟着一级菜单，菜单项为最近打开的文件名称；
     ppmnuRecentFiles 也一样。
     主要看 MenuItem 的操作，至于 FRecentFile, 是提供最近打开文件的列表的一个东西，和动态创建菜单没有
     大的关系。