关于为菜单项设置快捷键的问题 VCL组件开发及应用http://www.delphi2007.net/DelphiVCL/html/delphi_20061224205210144.html
我想在程序中动态改变菜单项的快捷键，比如我要为菜单“EXIT”设置快捷键“CTRL+E”。这里的“CTRL+E”是存在数据库里的，我要取出来，动态设置。
请问这个该怎么做？
//参考：
procedure TForm1.Button1Click(Sender: TObject);
begin
Exit1.ShortCut := TextToShortCut('CTRL+E');
end;
procedure TForm1.Exit1Click(Sender: TObject);
begin
Close;
end;