//在初始化的時(shí)候獲取權(quán)限 varhToken: THandle;Tkp: TTokenPrivileges;Zero: DWORD;beginOpenProcessToken(GetCurrentProcess(), TOKEN_ADJUST_PRIVILEGES orTOKEN_QUERY, hToken);LookupPrivilegeValue(nil, 'SeShutdownPrivilege', Tkp.Privileges[0].Luid);Tkp.PrivilegeCount := 1;Tkp.Privileges[0].Attributes := SE_PRIVILEGE_ENABLED;AdjustTokenPrivileges(hToken, False, Tkp, SizeOf(TTokenPrivileges),nil, Zero);end; --------****---------ExitWindowsEx(EWX_SHUTDOWN, 0);//close ExitWindowsEx(EWX_REBOOT, 0);//reoot

ExitWindowsEx(EWX_LOGOFF,0)// 注銷

轉(zhuǎn)載于:https://www.cnblogs.com/xh0626/p/4826220.html

總結(jié)

以上是生活随笔為你收集整理的Delphi 关键 重启 注销的全部內(nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯(cuò)，歡迎將生活随笔推薦給好友。