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 安装apk

Delphi 在unicodestring中使用utf-8字符串

Delphi2010 图片格式转换bmp, png,jpeg, gif, tiff , wmphoto

Delphi concat 连接两个或多个字符串为一个字符串

Delphi windowsapi: muldiv

Delphi monthcalendar1 获取选中日期

Delphi 之 列表框组件(tlistbox)

Delphi xe tbitmap支持gif,成为具有jpg,gif,bmp,ico,gif五种显示功能的图片控件

Delphi 遍历注册表

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

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