tkp.PrivilegeCount:=1;这句的注释

Mit1208 2008-10-28 10:06:11
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;



这个是关系系统的代码,但是搞不清楚tkp.PrivilegeCount:=1;这句的意思,请哪位朋友帮我注释一下可以嘛?
...全文
96 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
Mit1208 2008-10-29
  • 打赏
  • 举报
回复
呵呵,我也不知道这个问题该怎么问了
楼上的朋友,说的,我知道,但......无法表达.!
郁闷.
分给你吧.
beifangke 2008-10-29
  • 打赏
  • 举报
回复
tkp是一个对象
PrivilegeCount是他的属性
tkp.PrivilegeCount:=1就是给他赋值为1
Mit1208 2008-10-29
  • 打赏
  • 举报
回复
楼上所说的初实化为1,表示的是什么?
能否说清楚一些呢
chenyq2008 2008-10-29
  • 打赏
  • 举报
回复
tkp.PrivilegeCount初始化为1???

16,749

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 语言基础/算法/系统设计
社区管理员
  • 语言基础/算法/系统设计社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧