遍历MainMenu的问题

Question

我要晕了
我想删除MainMenu中某个菜单中符合条件的MenuItem，用如下代码
  for i:=0 to 3 do
  begin
    //Edit3.Text:=Edit3.Text+N11.Items[i].Caption+','
    N11.Delete(i);
  end;假设N11下有四个MenuItem，如果用注释调的那行语句，能看到四个Caption都被输出，但是如果执行该代码，结果是第一个和第三个被删除了，然后报错。如果两行都执行，那么可以在Edit3中看到1和3的Caption，这是什么原因呢？多谢了各位。

Answer 1

我明白了
原来是我太笨了
^_^
每次删除后会自动调整Index的嘛
呵呵
谁第一个顶这分就给谁了

Answer 2

不会吧～～那怎么把菜单遍历到一个树viewtree呢？

Answer 3

var
i:integer;
begin
for i:=0 to self.MainMenu1.Items.Count-1 do
self.MainMenu1.Items.Delete(self.MainMenu1.Items.Count-1);
end;