我的系统是WINDOWS ME
DELPHI 7。0中使用
implementation
const RSP_SIMPLE_SERVICE=1;
function RegisterServiceProcess (dwProcessID, dwType: DWord) : DWord; stdcall; external ’KERNEL32.DLL’;
{$R *.DFM}
procedure TForm1.formcreate(Sender: TObject);
begin
RegisterServiceProcess(GetCurrentProcessID,RSP_SIMPLE_SERVICE);
end; 时候,编译通不过。
显示
“连接文件project1.exe到不存在的输出 kernel32.dll registerserviceprocess”
“unable to create process:与系统连接的设备不能正常运转”请问怎么解决?
我想通过动态加载kernel32.dll也失败
我怀疑是因为kernek32.dll文件是系统文件,其他3级应用程序不能调用?
但是既然前辈提出这种用法说明能用啊?
请问如何解决在9x内核下,怎么隐藏程序,是之不显示在CTRL+ALT+DEL 之下?
DELPHI 7。0中使用
implementation
const RSP_SIMPLE_SERVICE=1;
function RegisterServiceProcess (dwProcessID, dwType: DWord) : DWord; stdcall; external ’KERNEL32.DLL’;
{$R *.DFM}
procedure TForm1.formcreate(Sender: TObject);
begin
RegisterServiceProcess(GetCurrentProcessID,RSP_SIMPLE_SERVICE);
end; 时候,编译通不过。
显示
“连接文件project1.exe到不存在的输出 kernel32.dll registerserviceprocess”
“unable to create process:与系统连接的设备不能正常运转”请问怎么解决?
我想通过动态加载kernel32.dll也失败
我怀疑是因为kernek32.dll文件是系统文件,其他3级应用程序不能调用?
但是既然前辈提出这种用法说明能用啊?
请问如何解决在9x内核下,怎么隐藏程序,是之不显示在CTRL+ALT+DEL 之下?
在implementation后添加声明:
function RegisterServiceProcess(dwProcessID, dwType: Integer): Integer; stdcall; external 'KERNEL32.DLL';
RegisterServiceProcess(GetCurrentProcessID, 1);//隐藏
RegisterServiceProcess(GetCurrentProcessID, 0);//显示
用ALT+DEL+CTRL看不见◇[DELPHI]程序不出现在任务栏
uses windows
var
ExtendedStyle : Integer;
begin
Application.Initialize;
//==============================================================
ExtendedStyle := GetWindowLong (Application.Handle, GWL_EXSTYLE);
SetWindowLong(Application.Handle, GWL_EXSTYLE, ExtendedStyle OR WS_EX_TOOLWINDOW
AND NOT WS_EX_APPWINDOW);
//===============================================================
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
任务栏那里我实现了而ALT+CTRL+DEL屏蔽却显示
“连接文件project1.exe到不存在的输出 kernel32.dll registerserviceprocess”
“unable to create process:与系统连接的设备不能正常运转”
我已经试过多少遍了,也用了动态加载的方法,也曾经把kernel32.dll文件烤到和project同一目录下,但是都没有成功。我想问问是不是我系统的问题。
我请教也用ME系统的朋友,有没有出现这个问题。