动态创建菜单的问题(50分)

蛐

蛐蛐

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-09

• #1

我的菜单是从TABLE中来的。
一个MAINMENU，
不确定个MEUNITEM，
以及MENUITEM下又有不确定的MENUITEM。
MENUITM1　MENUITM2　MEITM3　。。。。。
A1　　　　B1　　　　C1　
A2　　　　B2
A3　　　　B3
现在的问题是我想MENUITM这样，不知行不行。
各位有空帮我提前。最近没有条件上网了。

 

A

Adnil

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-09

• #2

这样当然不行了，你只能动态创建Menuitem。

例如
mMenuItem := TMenuItem.Create(Self);
MainMenu.Add(mMenuItem)
....

 

蛐

蛐蛐

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-09

• #3

不行，我真的想动态CREATE　MUNITEM.
大老们，有没有办法。其实我是很急的。

 

J

jqw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-09

• #4

MenuItemArr:Array of TMenuItem;

...
setlength(menuitemarr,200+1);
...

 

W

westboy2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-09

• #5

可以参考一下这个：
for i := 0 to Table.FieldCount - 1 do
begin
TempMenuItem := TMenuItem.Create(self);
TempMenuItem.Name := 'Temp' + IntToStr(i);
TempMenuItem.Caption := Table.Fields.DisplayLabel;
PopupMenu.Items.Add(TempMenuItem);
end;

 

蛐

蛐蛐

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-12

• #6

参照以上各位可以。