关于GetMenuString

关于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;