请教高手 Pascal函数,过程问题? 急急急!!!
能详细解释下面函数,过程吗?
ver_platform_win32_nt:
ver_platform_win32_windows:
分别是什么意思?
其中
var
 tkp:token_privileges; 中的token_privileges 表示什么?

解决方案 »

  1.   

    ver_platform_win32_nt:
    ver_platform_win32_windows:Delphi 定义的全局变量,表示操作系统的版本号
      

  2.   

    到windows单元去看看他们的定义你就知道了
    { dwPlatformId defines }
    const
      VER_PLATFORM_WIN32s = 0;
      {$EXTERNALSYM VER_PLATFORM_WIN32s}  VER_PLATFORM_WIN32_WINDOWS = 1;
      {$EXTERNALSYM VER_PLATFORM_WIN32_WINDOWS}  VER_PLATFORM_WIN32_NT = 2;
      {$EXTERNALSYM VER_PLATFORM_WIN32_NT}
      

  3.   

    还有第二个TOKEN_PRIVILEGES = _TOKEN_PRIVILEGES; _TOKEN_PRIVILEGES = record
        PrivilegeCount: DWORD;
        Privileges: array[0..0] of TLUIDAndAttributes;
      end;就是这么回事,明白了?