怎么把hotkey和API函数registerHotKey()联系起来。

Question

在public里:procedure wmhotkey(var msg:Twmhotkey);message wm_hotkey;
然后再定义一个常量用来存你热键消息,如myhotkey=139;
接着:
procedure Tform1.wmhotkey(var msg:Twmhotkey);
begin
  if msg.hotkey=myhotkey then
   showmessage('发财了！');
end;
   
procedure Tform1.formcreate(sender:Tobject);
begin
  registerhotkey(form1.handle,myhotkey,0,vk_insert);//vk_insert为你想定义的热键代码
end;procedure Tform1.formdestroy(sender:Tobject);
begin
unregisterhotkey(form1.handle,myhotkey);
end;这是把hotkey和registerhotkey联系起来的方法！
这不算是全局热键！

Answer 1

全局要定义全局原子(atom),sorry不太记得了你可以查查有关API的书籍