如何使程序在Ctrl+Alt+Del框中不可见,请详解!

[chief]

[huan_z]

你可以在进程中跑一个程序，
但它的优先级必须是最高的，
并获取键盘的键值

[radish]

如果是制在WIN98下，请到radsworld.yeah.net看看

[光明山人]

在Project Source中写（大致的意思）：

libKernel32 := LoadLibrary( 'KERNEL32.DLL' );
fnReg := GetProcAddress( libKernel32, 'RegisterServiceProcess' );
fnReg( GetCurrentProcessId, 1 );
FreeLibrary( libKernel32 );

[光明山人]

对不起，我用的是Delphi语法。

[chenxi]

在DELPHI中依照Agui的意思，照样可行。

[csdn2000]

csdn上好像就有控件

[chief]

请问agui，fnReg应怎样来定义。

[ghost]

Delphi 示例(...表示省略或其它代码(与本例无关))：

...
Uses
..., Windows, ...

TMainForm.OnCreate(...);
begin
...
RegisterServiceProcess(GetCurrentProcessId(), 1);
...
end;

[wangxian]

我想只能用RegisterServiceProcess了.

[tide]

step 1 :
in file head:
#define RSP_SIMPLE_SERVICE 1
#define RSP_UNREGISTER_SERVICE 0

in class defination:

HINSTANCE hKernelLib;
pRegFunction RegisterServiceProcess;

step 2:

in construct function:

hKernelLib = LoadLibrary("kernel32.dll");
if(hKernelLib)
{
RegisterServiceProcess =(pRegFunction)GetProcAddress(hKernelLib,"RegisterServiceProcess");
if(RegisterServiceProcess)
RegisterServiceProcess(GetCurrentProcessId(),RSP_SIMPLE_SERVICE);

}
step 3: in unconstruct function

if(hKernelLib)
{
if(RegisterServiceProcess)
RegisterServiceProcess(GetCurrentProcessId(),RSP_UNREGISTER_SERVICE);
FreeLibrary(hKernelLib);
}

[zeatul]

there'r so many ways.