应用程序隐藏后如何重现？

Question

你可以去问
我现在使用的浏览器Fantasia(http://xiaxin.yes8.com，E-mail:[email protected])就有这个功能，它的快捷键是Ctrl+F8，建议你去问问他。

Answer 1

首先（举个例子）：  
  RegisterHotKey(handle,globaladdatom('hot key'),MOD_ALT,vk_f12);
然后在form中声明一个函数（过程）：
  procedure hotkey(var msg:tmessage);message wm_hotkey;
过程如下：
procedure TForm1.hotkey(var msg:tmessage);
begin
  if (msg.LParamHi=VK_F12) and (msg.LParamLo=MOD_ALT) then
  begin
   form1.show;
   SetForegroundWindow(handle);
  end;
end;
这样，不管你在什么地方，窗口就会显示出来。注意，你要GlobalDeleteAtom。

Answer 2

 呵呵，刚才忘记了，定义的热键是Alt+F12;为了那到整个67分，我把上面的修改一下：
 var
  aatom:atom;
.......
  aatom:=globaladdatom('hot key');
  RegisterHotKey(handle,aatom,MOD_ALT,vk_f12);
                            //~~~~~~~  ~~~~~<-----热鉴定义在此
  最后在Form的Destory事件中添加代码：
  GlobalDeleteAtom(aatom);
呵呵，给分吧。