如何在按‘CTRL+ALT+DEL’后看不到正在运行的程序!(50分)

C

cavin

Unregistered / Unconfirmed
GUEST, unregistred user!
如何在按‘CTRL+ALT+DEL’后看不到正在运行的程序!
 
注册为WINDOWS的服务进程就行了。
 
hehe,又有人问这个问题:<br>。。。<br>function RegisterServiceProcess(dwProcessID, dwType: Integer): Integer;stdcall;<br>&nbsp; &nbsp;external 'KERNEL32.DLL';<br>var<br>&nbsp; Form1: TForm1;<br><br>implementation<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;<br>
 
在单元文件的implementation后面加上<br>function RegisterServiceProcess (dwProcessID, dwType: DWord) : DWord; <br>stdcall; external 'KERNEL32.DLL';<br>然后在formcreate 中加上<br>RegisterServiceProcess(GetCurrentProcessID,1);<br>就可以了
 
我怎么没及时看到这问题,&lt;b&gt;(*~!~*)&lt;/b&gt;
 
不过似乎在Windows2000中不行的哟!你们可以试一下
 
beta说的没错, 同意
 
procedure TAppSpy.Chk_HideProcessClick(Sender: TObject);<br>const<br>&nbsp; RSPSIMPLESERVICE &nbsp; &nbsp; = 1;<br>&nbsp; RSPUNREGISTERSERVICE = 0;<br>begin<br>&nbsp; &nbsp;if chk_HideProcess.Checked then<br>&nbsp; &nbsp; &nbsp; RegisterServiceProcess(GetCurrentProcessID, RSPSIMPLESERVICE)<br>&nbsp; &nbsp;else<br>&nbsp; &nbsp; &nbsp; RegisterServiceProcess (GetCurrentProcessID, RSPUNREGISTERSERVICE);<br><br>end;
 
同意beta.
 
NT中不行啊
 
查已答问题,n多遍了
 
来晚了。
 
试了一下,NT下行。<br><br>实际上只要在工程文件中加入一句代码就基本可以了。<br>begin<br>&nbsp; Application.Initialize;<br>&nbsp; Application.CreateForm(TForm1, Form1);<br>&nbsp; Application.ShowMainForm:=False;//加入这一句<br>&nbsp; Application.Run;<br>end.<br><br>运行后按三键后看不到运行的程序,但是在进程中可以看到(指NT下)<br>
 
那么还是可以结束进程啊!
 
同意beta的
 
NT / 2000 是那么好糊弄的吗?连 Windows Service 都可以看见,你还想怎么干?<br>死心吧。
 
NT下隐藏:<br>1/用OPENPRECSS<br>2/注册为服务<br>3/注册为关键进程<br><br>注意三个方法都只能不被关闭而不能隐藏
 
RegisterServiceProcess在NT技术平台中是不行的!
 
不要老<br>RegistryServiceProcess<br>RegistryServiceProcess<br>RegistryServiceProcess<br>难道就没有高手了吗!
 
顶部