怎样可以让程序隐藏(100分)

  • 主题发起人 主题发起人 waif
  • 开始时间 开始时间
W

waif

Unregistered / Unconfirmed
GUEST, unregistred user!
要想让程序不出现在WINDOWS里,就算按了CTRL+ALT+DELETE出现的窗口里
也不能出现,请问哪位高手懂啊?教一教啦
 
拜托你提问前检索一下问题,这几天就问了好多次了
 
http://www.gislab.ecnu.edu.cn/delphibbs/DispQ.asp?LID=295084
 
呵呵,现在老问题太多了。
 
检索一下registerserverprocess,昨天才答过。
 
从大富翁抄的:

IconHide1:功能,程序不出现在任务栏
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.

2.Stealth1,功能:程序不出现在ALT+CTRL+DEL
在implementation后添加声明:
function RegisterServiceProcess(dwProcessID, dwType: Integer): Integer; stdcall; external 'KERNEL32.DLL';

RegisterServiceProcess(GetCurrentProcessID, 1);//隐藏
RegisterServiceProcess(GetCurrentProcessID, 0);//显示
用ALT+DEL+CTRL看不见
3:MyRegistry1:让程序会自动运行,用注册表函数即可
 
Headoy说的只能在win98下隐藏,现在win2000已渐渐普及,有否在2000下的方法?
 
其实RegisterServiceProcess也只能在CTRL+ALT+DELETE时隐藏,只要打开系统信息就什
么都看到了。Win2000基于NT技术,好象用Delphi是做不到的。
 
以前有讨论的
 
大富翁里这个的问题提了好多,你花的分太冤枉了!
 
在NT里RegisterServiceProcess用不了啊,有没有其他办法啊?
 
NT下是难的,你可以给他写信:Djsf@Netease.Com 你可要小心点问
 
多人接受答案了。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
827
DelphiTeacher的专栏
D
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
878
DelphiTeacher的专栏
D
后退
顶部