分享
 
 
 

再谈如何在WinNT以上系统通过程序快速关机

王朝system·作者佚名  2006-07-20
窄屏简体版  字體: |||超大  

{

文章名 : 再谈如何在WinNT以上系统通过程序快速关机

说明 : 无

作者 : JJony

QQ : 254706028

博客 : http://blog.csdn.net/jzj_jony

空间 : http://jonychen,ys168.com

测试环境 : WinXPSP2/Win2003SP1

声明 : 您可以任意转载,但请注明文章作者和出处

}

再谈如何在WinNT以上系统通过程序快速关机

在上一篇"如何在WinNT以上通过程序快速关机"中我提到了用两种方法来关机,事实上

这两种方法并不是最快的,细心的朋友可能会注意到用这两种方法时,你是可以看到关

机过程的,先关掉你打开的程序,然后是关闭桌面、任务栏,再就是显示系统正在注销

正在关机之类的,今天给大家介绍的方法会从桌面直接关机而不会有关机过程。

就是利用Windows Native API,他们由NTDLL.DLL导出,这些API函数是在Ring3模式最底

层的函数了,我们通常用的API最终都是通过他们来和系统内核Ring0模式打交道的,因此我

们可以绕过普通API而直接使用Windows Native API(注意使用Windows Native API一定要动

态加载),而实现关机的Native API就是NtShutDownSystem和ZwShutDownSystem这两个都可

以,在Ring3模式是一样的,以NtShutDownSystem为例,其原形为:

function NtShutdownSystem( Action : SHUTDOWN_ACTION): Cardinal; stdcall;

只有一个枚举类型的参数Action:执行何种关机操作,其定义为:

type

_SHUTDOWN_ACTION = (

ShutdownNoReboot,//关机不重启

ShutdownReboot, //关机并重启

ShutdownPowerOff);//关机并关闭电源

SHUTDOWN_ACTION = _SHUTDOWN_ACTION;

TShutdownAction = SHUTDOWN_ACTION;

下面为实现关机的完整源代码:

type

_SHUTDOWN_ACTION = (

ShutdownNoReboot,

ShutdownReboot,

ShutdownPowerOff);

SHUTDOWN_ACTION = _SHUTDOWN_ACTION;

TShutdownAction = SHUTDOWN_ACTION;

type

TNtShutdownSystem=function( Action : SHUTDOWN_ACTION): Cardinal; stdcall;

var

h:Hmodule;

NtShutdownSystem:TNtShutdownSystem;

implementation

//获取指定权限

function EnableDebugPrivilege(PName:pchar):Boolean;

var

TokenHandle:THandle;

DebugNameValue:TLargeInteger;

Privileges:TOKEN_PRIVILEGES;

RetLen:Cardinal;

begin

Result:=False;

if not OpenProcessToken(GetCurrentProcess,TOKEN_ADJUST_PRIVILEGES or

TOKEN_QUERY,TokenHandle) then Exit;

if not LookupPrivilegeValue(nil,PName,DebugNameValue) then

begin

CloseHandle(TokenHandle);

Exit;

end;

Privileges.PrivilegeCount:=1;

Privileges.Privileges[0].Luid:=DebugNameValue;

Privileges.Privileges[0].Attributes:=SE_PRIVILEGE_ENABLED;

Result:=AdjustTokenPrivileges(TokenHandle,False,Privileges,SizeOf(Privileges),nil,RetLen);

CloseHandle(TokenHandle);

end;

//动态加载NtShutdownSystem

function LoadNTDll:boolean;

begin

result:=false;

if h>0 then exit;

h:=LoadLibrary('NTDLL.DLL');

if h>0 then

NtShutdownSystem:=GetProcAddress(h,'NtShutdownSystem');

result:=assigned(NtShutdownSystem);

end;

procedure TForm1.FormCreate(Sender: TObject);

begin

h:=0;

if not LoadNTDll then

begin

MessageBoxA(handle,'加载NTShutDownSystem失败','错误',mb_ok);

ExitProcess(0);

end;

end;

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);

begin

if h>0 then FreeLibrary(h);

end;

procedure TForm1.Button5Click(Sender: TObject);

begin

EnableDebugPrivilege('SeShutdownPrivilege');//取关机权限

NTShutDownSystem(ShutdownPowerOff); //关机

end;

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
2023年上半年GDP全球前十五强
 百态   2023-10-24
美众议院议长启动对拜登的弹劾调查
 百态   2023-09-13
上海、济南、武汉等多地出现不明坠落物
 探索   2023-09-06
印度或要将国名改为“巴拉特”
 百态   2023-09-06
男子为女友送行,买票不登机被捕
 百态   2023-08-20
手机地震预警功能怎么开?
 干货   2023-08-06
女子4年卖2套房花700多万做美容:不但没变美脸,面部还出现变形
 百态   2023-08-04
住户一楼被水淹 还冲来8头猪
 百态   2023-07-31
女子体内爬出大量瓜子状活虫
 百态   2023-07-25
地球连续35年收到神秘规律性信号,网友:不要回答!
 探索   2023-07-21
全球镓价格本周大涨27%
 探索   2023-07-09
钱都流向了那些不缺钱的人,苦都留给了能吃苦的人
 探索   2023-07-02
倩女手游刀客魅者强控制(强混乱强眩晕强睡眠)和对应控制抗性的关系
 百态   2020-08-20
美国5月9日最新疫情:美国确诊人数突破131万
 百态   2020-05-09
荷兰政府宣布将集体辞职
 干货   2020-04-30
倩女幽魂手游师徒任务情义春秋猜成语答案逍遥观:鹏程万里
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案神机营:射石饮羽
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案昆仑山:拔刀相助
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案天工阁:鬼斧神工
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案丝路古道:单枪匹马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:与虎谋皮
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:李代桃僵
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:指鹿为马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:小鸟依人
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:千金买邻
 干货   2019-11-12
 
推荐阅读
 
 
 
>>返回首頁<<
 
靜靜地坐在廢墟上,四周的荒凉一望無際,忽然覺得,淒涼也很美
© 2005- 王朝網路 版權所有