山寨机中的战斗机！	程序优化工程师到底对IT界有没有贡献

程序运行时，如果用户按下Ctrl+Alt+ Del 看不到我运行的程序如何实现？？

楼主icu（狂奔的蜗牛）2002-08-10 19:04:31 在 Delphi / VCL组件开发及应用提问

100分求救问题点数：100、回复次数：9Top

1 楼hjd_cw（）回复于 2002-08-10 19:12:38 得分 10

在win98里可以用
RegisterServiceProcess
win2k等：作成服务（service）Top

2 楼QLSoft（鬼谷子）回复于 2002-08-10 20:20:34 得分 0

为什么总是有人问这些“完全不可能的事”！Top

3 楼dearplumlxh（李子）回复于 2002-08-10 20:44:45 得分 0

你不会就不要说一定不可能，高手总是有的Top

4 楼wxjh（农民）回复于 2002-08-10 23:42:31 得分 0

RegisterServiceProcessTop

5 楼zhoutler（一代程序巨浆--用浆糊粘贴别人代码巨厉害）回复于 2002-08-10 23:45:56 得分 30

he RegisterServiceProcess function registers or unregisters a service process. A service process continues to run after the user logs off.

DWORD RegisterServiceProcess(DWORD dwProcessId,
DWORD dwType);

Parameters

dwProcessId

Specifies the identifier of the process to register as a service process. Specifies NULL to register the current process.

dwType

Specifies whether the service is to be registered or unregistered. This parameter can be one of the following values.

Value Meaning
RSP_SIMPLE_SERVICE Registers the process as a service process.
RSP_UNREGISTER_SERVICE Unregisters the process as a service process.

Return Value

The return value is 1 if successful or 0 if an error occurs.Top

6 楼qinzm（不归人）回复于 2002-08-11 00:32:26 得分 10

2k:
write driver
hook zwquerysysteminformationTop

7 楼huiwww（十足菜鸟）回复于 2002-08-11 16:33:28 得分 10

有两种方法,一种是标题为空
另一种是调用API 关键是那个文件'kernel32.dll'
具体我明天给你代码Top

8 楼naughtyboy（重归起跑线）回复于 2002-08-11 16:45:17 得分 30

{$R *.DFM}
function RegsiterServiceProcess(dwProcessId:Longint;const dwType:longint):DWORD;stdcall;far;external 'KERNEL32.DLL' name 'RegisterServiceProcess';

procedure TForm1.FormCreate(Sender:TObject);
var
PId:DWORD;
begin
pId:=GetCurrentProcessId();
if 0=RegisterServiceProcess(pId,1) then
Messagebox(self.handle,'不能隐藏进程','错误',MB_OK);
end;
procedure TForm1.Button1Click(Sender:TObject);
begin
Self.hide;
end;
end;Top

9 楼del_c_sharp（武林中传说的摩托牛拉）回复于 2002-08-11 17:19:52 得分 10

98:RegisterServiceProcess
2000：作成服务类型的Top