delphi暴力关机代码

本文整理自网络，侵删。

 {暴力关机代码。}
procedure ShutDownPC; 
asm
PUSH ESP
PUSH 0
PUSH 1 // 1 就是打开相应权限, 0 表示关闭相应权限
PUSH $13 //常量 SE_SHUTDOWN_PRIVILEGE 获得关机权限
CALL RtlAdjustPrivilege
PUSH 0
CALL ZwShutdownSystem
end; 

相关阅读 >>

Delphi 给变量加引号

Delphi idftp连不上ftp服务器的解决方法

Delphi环境下基于spcomm控件开发串口通讯报文字节丢失的问题解决

Delphi 网址链接结尾自动补/

Delphi fmx getapppath 获取app路径

Delphi 生成不重复数字随机码

Delphi webbrowser1 网页提交按钮执行点击事件

Delphi 软件welcome窗口代码

Delphi篇之写托盘图标

Delphi 辨析 field、fielddef、fields、fielddefs、fieldlist、fielddeflist

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi暴力关机代码