发信人: zhenbao(闲云孤鹤)
整理人: hunter__fox(2002-03-16 21:48:54), 站内信件
|
【 在 hhw-eboy 的大作中提到:】
:(1)如何能防止在Windows下“Ctrl+Alt+Del”强行关闭程序?
:(2)如何能把程序放入Windows任务栏右下方?
:......
1、 调用WINDOWS API能实现,不显示当然不能结束了!呵!
*-------------------------------------
* 程序: 使当前进程在系统进程列队中
* 显示 或 隐藏
* (在 Ctrl+Alt+Del 中无显示)
* 设计: 红雨
* 时间: 2001年11月10日
*-------------------------------------
Clea
#Define RSP_SIMPLE_SERVICE 1
#Define RSP_UNREGISTER_SERVICE 0
Declare Integer GetCurrentProcessId IN kernel32
Declare Integer RegisterServiceProcess IN kernel32 Integer dwProcessID, Integer dwType
lnProcessId = GetCurrentProcessId()
? "当前进程号: ", lnProcessId
? "隐藏当前进程: ", RegisterServiceProcess(lnProcessId, RSP_SIMPLE_SERVICE)
? "显示当前进程: ", RegisterServiceProcess(lnProcessId, RSP_UNREGISTER_SERVICE)
Clea dlls
Return
---- |
|