关于GetMenuString参数说明请谷歌或百度,网上一堆,在此不多说,
可参考:http://baike.baidu.com/view/1080162.htm
说明一点:该函数获取到名称包含快捷键名称,如:打开(O)
下面是DELPHI的使用方法:关键是该函数的第三个参数,一定要定义成PAnsiChar或PCHAR,否则无法获取菜单项的名称,如:
procedure TForm1.btn1Click(Sender: TObject);
var
LBuffer :PAnsiChar;
//LBuffer :PChar;
begin
GetMem(LBuffer, 1024);
GetMenuString(
FMenueHandle, //菜单句柄
3, //菜单项ID号
LBuffer, //接收缓冲区
1024, //接收最大数
MF_BYCOMMAND);
btn1.Caption:= StrPas(LBuffer);
FreeMem(LBuffer);
end;