幻谛

  博客园 :: 首页 :: 新随笔 :: 联系 :: 订阅 :: 管理 ::

随笔分类 -  Delphi实例

摘要:procedure TForm1.GetPrivilege; var NewState: TTokenPrivileges; lpLuid: Int64; ReturnLength: DWord; ToKenHandle: Cardinal; begin //打开一个访问标记 OpenProcessToken(GetCurrentPro... 阅读全文
posted @ 2010-06-06 10:11 幻谛 阅读(197) 评论(0) 推荐(0)