在进程列表中隐藏掉你的程序???(50分)

  • 主题发起人 主题发起人 byteh
  • 开始时间 开始时间
B

byteh

Unregistered / Unconfirmed
GUEST, unregistred user!
function RegisterServiceProcess(a:longint;const b:longint):dword;stdcall;far;external 'Kernel32.dll' name 'RegisterServiceProcess'; <br><br>procedure TForm1.FormCreate(Sender: TObject); <br>begin <br>&nbsp; RegisterServiceProcess(0,1); <br>end; <br><br>这样做对不对?<br>
 
应该是对的,不过听说98下Application.Title=''也可以,没用过
 
声明<br>function RegisterServiceProcess(dwProcessId,dwType:dword): Integer;stdcall;external 'kernel32.dll';<br>引用<br>RegisterServiceProcess(GetCurrentProcessID,1); &nbsp; &nbsp; &nbsp; //hide
 
implementation<br><br>function RegisterServiceProcess (dwProcessID, dwType: DWord) : DWord; stdcall; external 'KERNEL32.DLL';<br><br>{$R *.DFM}<br><br>procedure TForm1.Button1Click(Sender: TObject);<br>begin<br>&nbsp; RegisterServiceProcess(GetCurrentProcessID,1);<br>end;<br><br>procedure TForm1.Button2Click(Sender: TObject);<br>begin<br>&nbsp; RegisterServiceProcess(GetCurrentProcessID,0);<br>end;
 
win2000 下能行吗?
 
2000下的 huiyugan大虾不是写了一个嘛:<br>http://delphi.mychangshu.com/dispdoc.asp?id=990
 
http://delphi.mychangshu.com/dispdoc.asp?id=990<br><br>
 
最简单的,办程序放在系统目录中
 

Similar threads

后退
顶部