首页 > 代码库 > menu菜单属性AutoHotkeys

menu菜单属性AutoHotkeys

2024-09-27 15:38:02   216人阅读

 MyMenu.AutoHotkeys := maManual;      {指定为手动加速键; 默认是自动添加的}

manual  
英[?mænju?l]  美[?mænju?l]  复数：manuals 
基本释义同反义词相关资料adj. 
1.用手的, 手工的 
2.手动的；手控的；用手操作的 
3.手册形式的，像手册的；教范性质的 
4.【法律】实际占有的 
5.体力的 
n. 

参考链接：http://www.cnblogs.com/del/archive/2008/02/04/1064274.html

implementation{$R *.dfm}var  MyMenu: TMainMenu;  Item: TMenuItem;procedure TForm1.FormCreate(Sender: TObject);var  Itemd: TMenuItem;begin  MyMenu := TMainMenu.Create(Self);  MyMenu.AutoHotkeys := maManual;      {指定为手动加速键; 默认是自动添加的}  Self.Menu := MyMenu;  Item := TMenuItem.Create(MyMenu);  Item.Caption := ‘AA‘;                {这个没设加速键}  MyMenu.Items.Add(Item);    Itemd := TMenuItem.Create(MyMenu);    Itemd.Caption := ‘A&1‘;            {指定加速键为: Alt+1}    Item.Add(Itemd);    Itemd := TMenuItem.Create(Item);    Itemd.Caption := ‘A&2‘;            {指定加速键为: Alt+2}    Item.Add(Itemd);end;end.

　　

 

menu菜单属性AutoHotkeys


联系
我们