一个巨难的问题请教高手高高手！！！(200分)

R

resources2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-01

• #1

[red][/red]一个巨难的问题请教高手高高手！！！

在delphi中runtime生成popup menu的时候，
所有的items被自动加了hotkey。
现在想去掉，怎么办？
注：TMenuItem的AutoHotkey属性调节无效！

 

P

proman

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-01

• #2

不会啊,边个属性设置是有效的啊,我设置就是有效的.

 

D

donkey

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-02

• #3

>>TMenuItem的AutoHotkey属性调节无效！
不是TMenuItem,是TMenu或TPopMenu

 

杜

杜宝

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-02

• #4

设PopupMenu的AutoHotkeys:= maManual;应该可以的!如:
~~~~~~~~~~
procedure TForm1.Button1Click(Sender: TObject);
var
i:Integer;
It:TMenuItem;
begin
aPm:=TPopupMenu.Create(Self);
aPm.AutoHotkeys:= maManual;//在这里!
for i := 0 to 3 do
begin
It:=TMenuItem.Create(Self);
it.Caption:='这是第 '+IntToStr(i) +' 条';
aPm.Items.Add(it);
end;
Self.PopupMenu:=aPm;
end;

 

L

leejoy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-02

• #5

[blue][/blue]只要把TPopupMenu的 AutoHotkeys 属性设置为maManual就可以了；[blue][/blue]

 

K

kindly

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-02

• #6

看我这个帖子
http://www.delphibbs.com/delphibbs/dispq.asp?lid=641812

 

Z

zhaqiong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-02

• #7

清除 PopupMenu 的 shortcut 属性去掉就行了。
包括Action.ShortCut.
我这都过了。
Delphi6 Windows2000AdvSvr

 

Z

zyy04

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-02-26

• #8

接受答案了.