怎么把一个小的执行程序修改的可以用热键隐藏?

来源:百度知道 编辑:UC知道 时间:2024/05/21 21:51:15
怎么把一个小的执行程序修改的可以用热键隐藏?
在托盘里都看不见的那种,但是可以用热键呼出的。

谁知道的告诉偶,谢谢先

我用delphi作的:

unit lookpass;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls, bsSkinCtrls, bsSkinBoxCtrls, StdCtrls, Mask;

type
TForm1 = class(TForm)
se1: TbsSkinEdit;
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);
private
id: Integer;//热键表识id
procedure WMHotKey(var Msg : TWMHotKey); message WM_HOTKEY;
//定义捕获Windows消息WM_HOTKEY的钩子函数
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
id:=globaladdatom('myhotkey');//为全局原子表添加一个原子
registerhotkey(handle,id,mod_control,vk_f12);
//定义ctrl+f12为热键
end;
procedure tform1.WMHotKey(var msg:twmhotkey);
var
mo