世界上超准的测试题:谁能帮我把这段代码每句解释一下 DELPHI代码

来源:百度文库 编辑:中科新闻网 时间:2024/05/03 08:07:32
var
hToken: THANDLE;
Tkp:TOKEN_PRIVILEGES;
Nothing:Cardinal;
begin
OpenProcessToken(GetCurrentProcess, TOKEN_ADJUST_PRIVILEGES or TOKEN_QUERY, hToken);
LookupPrivilegeValue(nil, 'SeShutdownPrivilege', tkp.Privileges[0].Luid);
tkp.PrivilegeCount:=1;
tkp.Privileges[0].Attributes:=SE_PRIVILEGE_ENABLED;
AdjustTokenPrivileges(hToken, FALSE, tkp, 0, nil, Nothing);
ExitWindowsEx(EWX_ShutDown, 0)
end;

我知道这是关机代码 希望能帮我把 每1句的解释分析一下给我 谢谢拉

关机代码 大富翁论坛有答案

因为2000,xp关机需要在权限中有关机权限SeShutdownPrivilege

其他的自己看MSDN都比我解释来的好啊