开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Windows编程 > 查看源码
JwaLM.pas
资源名称：win32api.zip　[点击查看]
上传用户：davidchvip
上传日期：2009-07-28
资源大小：1749k
文件大小：407k
源码类别：

Windows编程

开发平台：

Delphi

JwaLM.pas：源码内容
  1.   ALERT_MESSAGE_EVENT         = 'MESSAGE';
  2.   {$EXTERNALSYM ALERT_ERRORLOG_EVENT}
  3.   ALERT_ERRORLOG_EVENT        = 'ERRORLOG';
  4.   {$EXTERNALSYM ALERT_ADMIN_EVENT}
  5.   ALERT_ADMIN_EVENT           = 'ADMIN';
  6.   {$EXTERNALSYM ALERT_USER_EVENT}
  7.   ALERT_USER_EVENT            = 'USER';
  9. //      Bitmap masks for prjob_status field of PRINTJOB.
  11. // 2-7 bits also used in device status
  13.   {$EXTERNALSYM PRJOB_QSTATUS}
  14.   PRJOB_QSTATUS       = $3;         // Bits 0,1
  15.   {$EXTERNALSYM PRJOB_DEVSTATUS}
  16.   PRJOB_DEVSTATUS     = $1fc;       // 2-8 bits
  17.   {$EXTERNALSYM PRJOB_COMPLETE}
  18.   PRJOB_COMPLETE      = $4;         // Bit 2
  19.   {$EXTERNALSYM PRJOB_INTERV}
  20.   PRJOB_INTERV        = $8;         // Bit 3
  21.   {$EXTERNALSYM PRJOB_ERROR}
  22.   PRJOB_ERROR         = $10;        // Bit 4
  23.   {$EXTERNALSYM PRJOB_DESTOFFLINE}
  24.   PRJOB_DESTOFFLINE   = $20;        // Bit 5
  25.   {$EXTERNALSYM PRJOB_DESTPAUSED}
  26.   PRJOB_DESTPAUSED    = $40;        // Bit 6
  27.   {$EXTERNALSYM PRJOB_NOTIFY}
  28.   PRJOB_NOTIFY        = $80;        // BIT 7
  29.   {$EXTERNALSYM PRJOB_DESTNOPAPER}
  30.   PRJOB_DESTNOPAPER   = $100;       // BIT 8
  31.   {$EXTERNALSYM PRJOB_DELETED}
  32.   PRJOB_DELETED       = $8000;      // BIT 15
  34. //      Values of PRJOB_QSTATUS bits in prjob_status field of PRINTJOB.
  36.   {$EXTERNALSYM PRJOB_QS_QUEUED}
  37.   PRJOB_QS_QUEUED                 = 0;
  38.   {$EXTERNALSYM PRJOB_QS_PAUSED}
  39.   PRJOB_QS_PAUSED                 = 1;
  40.   {$EXTERNALSYM PRJOB_QS_SPOOLING}
  41.   PRJOB_QS_SPOOLING               = 2;
  42.   {$EXTERNALSYM PRJOB_QS_PRINTING}
  43.   PRJOB_QS_PRINTING               = 3;
  45. // Translated from LMSHARE.H
  47. // Function Prototypes - Share
  49. function NetShareAdd(servername: LPTSTR; level: DWORD; const buf: Pointer;
  50.   parm_err: PDWORD): NET_API_STATUS; stdcall;
  51. {$EXTERNALSYM NetShareAdd}
  53. function NetShareEnum(servername: LPTSTR; level: DWORD; var butptr: Pointer;
  54.   prefmaxlen: DWORD; var entriesread: DWORD; var totalentries: DWORD;
  55.   resume_handle: PDWORD): NET_API_STATUS; stdcall;
  56. {$EXTERNALSYM NetShareEnum}
  58. function NetShareEnumSticky(servername: LPTSTR; level: DWORD; var butptr: Pointer;
  59.   prefmaxlen: DWORD; var entriesread: DWORD; var totalentries: DWORD;
  60.   resume_handle: PDWORD): NET_API_STATUS; stdcall;
  61. {$EXTERNALSYM NetShareEnumSticky}
  63. function NetShareGetInfo(servername: LPWSTR; netname: LPWSTR; level: DWORD;
  64.   var butptr: Pointer): NET_API_STATUS; stdcall;
  65. {$EXTERNALSYM NetShareGetInfo}
  67. function NetShareSetInfo(servername: LPTSTR; netname: LPTSTR; leve: DWORD;
  68.   const buf: Pointer; parm_err: PDWORD): NET_API_STATUS; stdcall;
  69. {$EXTERNALSYM NetShareSetInfo}
  71. function NetShareDel(servername: LPTSTR; netname: LPTSTR;
  72.   reserved: DWORD): NET_API_STATUS; stdcall;
  73. {$EXTERNALSYM NetShareDel}
  75. function NetShareDelSticky(servername: LPTSTR; netname: LPTSTR;
  76.   reserved: DWORD): NET_API_STATUS; stdcall;
  77. {$EXTERNALSYM NetShareDelSticky}
  79. function NetShareCheck(servername: LPTSTR; device: LPTSTR;
  80.   var _type: DWORD): NET_API_STATUS; stdcall;
  81. {$EXTERNALSYM NetShareCheck}
  83. // Data Structures - Share
  85. type
  86.   PShareInfo0 = ^TShareInfo0;
  87.   {$EXTERNALSYM _SHARE_INFO_0}
  88.   _SHARE_INFO_0 = record
  89.     shi0_netname: LPTSTR;
  90.   end;
  91.   TShareInfo0 = _SHARE_INFO_0;
  92.   {$EXTERNALSYM SHARE_INFO_0}
  93.   SHARE_INFO_0 = _SHARE_INFO_0;
  95.   PShareInfo1 = ^TShareInfo1;
  96.   {$EXTERNALSYM _SHARE_INFO_1}
  97.   _SHARE_INFO_1 = record
  98.     shi1_netname: LPTSTR;
  99.     shi1_type: DWORD;
  100.     shi1_remark: LPTSTR;
  101.   end;
  102.   TShareInfo1 = _SHARE_INFO_1;
  103.   {$EXTERNALSYM SHARE_INFO_1}
  104.   SHARE_INFO_1 = _SHARE_INFO_1;
  106.   PShareInfo2 = ^TShareInfo2;
  107.   {$EXTERNALSYM _SHARE_INFO_2}
  108.   _SHARE_INFO_2 = record
  109.     shi2_netname: LPTSTR;
  110.     shi2_type: DWORD;
  111.     shi2_remark: LPTSTR;
  112.     shi2_permissions: DWORD;
  113.     shi2_max_uses: DWORD;
  114.     shi2_current_uses: DWORD;
  115.     shi2_path: LPTSTR;
  116.     shi2_passwd: LPTSTR;
  117.   end;
  118.   TShareInfo2 = _SHARE_INFO_2;
  119.   {$EXTERNALSYM SHARE_INFO_2}
  120.   SHARE_INFO_2 = _SHARE_INFO_2;
  122.   PShareInfo501 = ^TShareInfo501;
  123.   {$EXTERNALSYM _SHARE_INFO_501}
  124.   _SHARE_INFO_501 = record
  125.     shi501_netname: LPTSTR;
  126.     shi501_type: DWORD;
  127.     shi501_remark: LPTSTR;
  128.     shi501_flags: DWORD;
  129.   end;
  130.   TShareInfo501 = _SHARE_INFO_501;
  131.   {$EXTERNALSYM SHARE_INFO_501}
  132.   SHARE_INFO_501 = _SHARE_INFO_501;
  134.   PShareInfo502 = ^TShareInfo502;
  135.   {$EXTERNALSYM _SHARE_INFO_502}
  136.   _SHARE_INFO_502 = record
  137.     shi502_netname: LPTSTR;
  138.     shi502_type: DWORD;
  139.     shi502_remark: LPTSTR;
  140.     shi502_permissions: DWORD;
  141.     shi502_max_uses: DWORD;
  142.     shi502_current_uses: DWORD;
  143.     shi502_path: LPTSTR;
  144.     shi502_passwd: LPTSTR;
  145.     shi502_reserved: DWORD;
  146.     shi502_security_descriptor: PSECURITY_DESCRIPTOR;
  147.   end;
  148.   TShareInfo502 = _SHARE_INFO_502;
  149.   {$EXTERNALSYM SHARE_INFO_502}
  150.   SHARE_INFO_502 = _SHARE_INFO_502;
  152.   PShareInfo1004 = ^TShareInfo1004;
  153.   {$EXTERNALSYM _SHARE_INFO_1004}
  154.   _SHARE_INFO_1004 = record
  155.     shi1004_remark: LPTSTR;
  156.   end;
  157.   TShareInfo1004 = _SHARE_INFO_1004;
  158.   {$EXTERNALSYM SHARE_INFO_1004}
  159.   SHARE_INFO_1004 = _SHARE_INFO_1004;
  161.   PShareInfo1005 = ^TShareInfo1005;
  162.   {$EXTERNALSYM _SHARE_INFO_1005}
  163.   _SHARE_INFO_1005 = record
  164.     shi1005_flags: DWORD;
  165.   end;
  166.   TShareInfo1005 = _SHARE_INFO_1005;
  167.   {$EXTERNALSYM SHARE_INFO_1005}
  168.   SHARE_INFO_1005 = _SHARE_INFO_1005;
  170.   PShareInfo1006 = ^TShareInfo1006;
  171.   {$EXTERNALSYM _SHARE_INFO_1006}
  172.   _SHARE_INFO_1006 = record
  173.     shi1006_max_uses: DWORD;
  174.   end;
  175.   TShareInfo1006 = _SHARE_INFO_1006;
  176.   {$EXTERNALSYM SHARE_INFO_1006}
  177.   SHARE_INFO_1006 = _SHARE_INFO_1006;
  179.   PShareInfo1501 = ^TShareInfo1501;
  180.   {$EXTERNALSYM _SHARE_INFO_1501}
  181.   _SHARE_INFO_1501 = record
  182.     shi1501_reserved: DWORD;
  183.     shi1501_security_descriptor: PSECURITY_DESCRIPTOR;
  184.   end;
  185.   TShareInfo1501 = _SHARE_INFO_1501;
  186.   {$EXTERNALSYM SHARE_INFO_1501}
  187.   SHARE_INFO_1501 = _SHARE_INFO_1501;
  189. // Values for parm_err parameter.
  191. const
  192.   {$EXTERNALSYM SHARE_NETNAME_PARMNUM}
  193.   SHARE_NETNAME_PARMNUM = 1;
  194.   {$EXTERNALSYM SHARE_TYPE_PARMNUM}
  195.   SHARE_TYPE_PARMNUM = 3;
  196.   {$EXTERNALSYM SHARE_REMARK_PARMNUM}
  197.   SHARE_REMARK_PARMNUM = 4;
  198.   {$EXTERNALSYM SHARE_PERMISSIONS_PARMNUM}
  199.   SHARE_PERMISSIONS_PARMNUM = 5;
  200.   {$EXTERNALSYM SHARE_MAX_USES_PARMNUM}
  201.   SHARE_MAX_USES_PARMNUM = 6;
  202.   {$EXTERNALSYM SHARE_CURRENT_USES_PARMNUM}
  203.   SHARE_CURRENT_USES_PARMNUM = 7;
  204.   {$EXTERNALSYM SHARE_PATH_PARMNUM}
  205.   SHARE_PATH_PARMNUM = 8;
  206.   {$EXTERNALSYM SHARE_PASSWD_PARMNUM}
  207.   SHARE_PASSWD_PARMNUM = 9;
  208.   {$EXTERNALSYM SHARE_FILE_SD_PARMNUM}
  209.   SHARE_FILE_SD_PARMNUM = 501;
  211. // Single-field infolevels for NetShareSetInfo.
  213.   {$EXTERNALSYM SHARE_REMARK_INFOLEVEL}
  214.   SHARE_REMARK_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SHARE_REMARK_PARMNUM);
  215.   {$EXTERNALSYM SHARE_MAX_USES_INFOLEVEL}
  216.   SHARE_MAX_USES_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SHARE_MAX_USES_PARMNUM);
  217.   {$EXTERNALSYM SHARE_FILE_SD_INFOLEVEL}
  218.   SHARE_FILE_SD_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SHARE_FILE_SD_PARMNUM);
  220.   {$EXTERNALSYM SHI1_NUM_ELEMENTS}
  221.   SHI1_NUM_ELEMENTS = 4;
  222.   {$EXTERNALSYM SHI2_NUM_ELEMENTS}
  223.   SHI2_NUM_ELEMENTS = 10;
  225. // Share types (shi1_type and shi2_type fields).
  227.   {$EXTERNALSYM STYPE_DISKTREE}
  228.   STYPE_DISKTREE = 0;
  229.   {$EXTERNALSYM STYPE_PRINTQ}
  230.   STYPE_PRINTQ = 1;
  231.   {$EXTERNALSYM STYPE_DEVICE}
  232.   STYPE_DEVICE = 2;
  233.   {$EXTERNALSYM STYPE_IPC}
  234.   STYPE_IPC = 3;
  236.   {$EXTERNALSYM STYPE_SPECIAL}
  237.   STYPE_SPECIAL = $80000000;
  239.   {$EXTERNALSYM SHI_USES_UNLIMITED}
  240.   SHI_USES_UNLIMITED = DWORD(-1);
  242. // Flags values for the 501 and 1005 levels
  244.   {$EXTERNALSYM SHI1005_FLAGS_DFS}
  245.   SHI1005_FLAGS_DFS      = $01;        // Share is in the DFS
  246.   {$EXTERNALSYM SHI1005_FLAGS_DFS_ROOT}
  247.   SHI1005_FLAGS_DFS_ROOT = $02;        // Share is root of DFS
  249.   {$EXTERNALSYM CSC_MASK}
  250.   CSC_MASK               = $30;    // Used to mask off the following states
  252.   {$EXTERNALSYM CSC_CACHE_MANUAL_REINT}
  253.   CSC_CACHE_MANUAL_REINT = $00;    // No automatic file by file reintegration
  254.   {$EXTERNALSYM CSC_CACHE_AUTO_REINT}
  255.   CSC_CACHE_AUTO_REINT   = $10;    // File by file reintegration is OK
  256.   {$EXTERNALSYM CSC_CACHE_VDO}
  257.   CSC_CACHE_VDO          = $20;    // no need to flow opens
  258.   {$EXTERNALSYM CSC_CACHE_NONE}
  259.   CSC_CACHE_NONE         = $30;    // no CSC for this share
  261. // The subset of 1005 infolevel flags that can be set via the API
  263.   {$EXTERNALSYM SHI1005_VALID_FLAGS_SET}
  264.   SHI1005_VALID_FLAGS_SET = CSC_MASK;
  266. // SESSION API
  268. // Function Prototypes Session
  270. function NetSessionEnum(servername: LPTSTR; UncClientName: LPTSTR;
  271.   username: LPTSTR; level: DWORD; var bufptr: Pointer; prefmaxlen: DWORD;
  272.   var entriesread: DWORD; var totalentries: DWORD;
  273.   resume_handle: PDWORD): NET_API_STATUS; stdcall;
  274. {$EXTERNALSYM NetSessionEnum}
  276. function NetSessionDel(servername: LPTSTR; UncClientName: LPTSTR;
  277.   username: LPTSTR): NET_API_STATUS; stdcall;
  278. {$EXTERNALSYM NetSessionDel}
  280. function NetSessionGetInfo(servername: LPTSTR; UncClientName: LPTSTR;
  281.   username: LPTSTR; level: DWORD; var bufptr: Pointer): NET_API_STATUS; stdcall;
  282. {$EXTERNALSYM NetSessionGetInfo}
  284. // Data Structures - Session
  286. type
  287.   PSessionInfo0 = ^TSessionInfo0;
  288.   {$EXTERNALSYM _SESSION_INFO_0}
  289.   _SESSION_INFO_0 = record
  290.     sesi0_cname: LPTSTR;                // client name (no backslashes)
  291.   end;
  292.   TSessionInfo0 = _SESSION_INFO_0;
  293.   {$EXTERNALSYM SESSION_INFO_0}
  294.   SESSION_INFO_0 = _SESSION_INFO_0;
  296.   PSessionInfo1 = ^TSessionInfo1;
  297.   {$EXTERNALSYM _SESSION_INFO_1}
  298.   _SESSION_INFO_1 = record
  299.     sesi1_cname: LPTSTR;                // client name (no backslashes)
  300.     sesi1_username: LPTSTR;
  301.     sesi1_num_opens: DWORD;
  302.     sesi1_time: DWORD;
  303.     sesi1_idle_time: DWORD;
  304.     sesi1_user_flags: DWORD;
  305.   end;
  306.   TSessionInfo1 = _SESSION_INFO_1;
  307.   {$EXTERNALSYM SESSION_INFO_1}
  308.   SESSION_INFO_1 = _SESSION_INFO_1;
  310.   PSessionInfo2 = ^TSessionInfo2;
  311.   {$EXTERNALSYM _SESSION_INFO_2}
  312.   _SESSION_INFO_2 = record
  313.     sesi2_cname: LPTSTR;                // client name (no backslashes)
  314.     sesi2_username: LPTSTR;
  315.     sesi2_num_opens: DWORD;
  316.     sesi2_time: DWORD;
  317.     sesi2_idle_time: DWORD;
  318.     sesi2_user_flags: DWORD;
  319.     sesi2_cltype_name: LPTSTR;
  320.   end;
  321.   TSessionInfo2 = _SESSION_INFO_2;
  322.   {$EXTERNALSYM SESSION_INFO_2}
  323.   SESSION_INFO_2 = _SESSION_INFO_2;
  325.   PSessionInfo10 = ^TSessionInfo10;
  326.   {$EXTERNALSYM _SESSION_INFO_10}
  327.   _SESSION_INFO_10 = record
  328.     sesi10_cname: LPTSTR;               // client name (no backslashes)
  329.     sesi10_username: LPTSTR;
  330.     sesi10_time: DWORD;
  331.     sesi10_idle_time: DWORD;
  332.   end;
  333.   TSessionInfo10 = _SESSION_INFO_10;
  334.   {$EXTERNALSYM SESSION_INFO_10}
  335.   SESSION_INFO_10 = _SESSION_INFO_10;
  337.   PSessionInfo502 = ^TSessionInfo502;
  338.   {$EXTERNALSYM _SESSION_INFO_502}
  339.   _SESSION_INFO_502 = record
  340.     sesi502_cname: LPTSTR;              // client name (no backslashes)
  341.     sesi502_username: LPTSTR;
  342.     sesi502_num_opens: DWORD;
  343.     sesi502_time: DWORD;
  344.     sesi502_idle_time: DWORD;
  345.     sesi502_user_flags: DWORD;
  346.     sesi502_cltype_name: LPTSTR;
  347.     sesi502_transport: LPTSTR;
  348.   end;
  349.   TSessionInfo502 = _SESSION_INFO_502;
  350.   {$EXTERNALSYM SESSION_INFO_502}
  351.   SESSION_INFO_502 = _SESSION_INFO_502;
  353. // Bits defined in sesi1_user_flags.
  355. const
  356.   {$EXTERNALSYM SESS_GUEST}
  357.   SESS_GUEST        = $00000001;  // session is logged on as a guest
  358.   {$EXTERNALSYM SESS_NOENCRYPTION}
  359.   SESS_NOENCRYPTION = $00000002;  // session is not using encryption
  361.   {$EXTERNALSYM SESI1_NUM_ELEMENTS}
  362.   SESI1_NUM_ELEMENTS = 8;
  363.   {$EXTERNALSYM SESI2_NUM_ELEMENTS}
  364.   SESI2_NUM_ELEMENTS = 9;
  366. // CONNECTION API
  368. // Function Prototypes - CONNECTION
  370. function NetConnectionEnum(servername: LPWSTR; qualifier: LPWSTR;
  371.   level: DWORD; var bufptr: Pointer; prefmaxlen: DWORD; var entriesread: DWORD;
  372.   var totalentries: DWORD; resume_handle: PDWORD): NET_API_STATUS; stdcall;
  373. {$EXTERNALSYM NetConnectionEnum}
  375. // Data Structures - CONNECTION
  377. type
  378.   PConnectionInfo0 = ^TConnectionInfo0;
  379.   {$EXTERNALSYM _CONNECTION_INFO_0}
  380.   _CONNECTION_INFO_0 = record
  381.     coni0_id: DWORD;
  382.   end;
  383.   TConnectionInfo0 = _CONNECTION_INFO_0;
  384.   {$EXTERNALSYM CONNECTION_INFO_0}
  385.   CONNECTION_INFO_0 = _CONNECTION_INFO_0;
  387.   PConnectionInfo1 = ^TConnectionInfo1;
  388.   {$EXTERNALSYM _CONNECTION_INFO_1}
  389.   _CONNECTION_INFO_1 = record
  390.     coni1_id: DWORD;
  391.     coni1_type: DWORD;
  392.     coni1_num_opens: DWORD;
  393.     coni1_num_users: DWORD;
  394.     coni1_time: DWORD;
  395.     coni1_username: LPWSTR;
  396.     coni1_netname: LPWSTR;
  397.   end;
  398.   TConnectionInfo1 = _CONNECTION_INFO_1;
  399.   {$EXTERNALSYM CONNECTION_INFO_1}
  400.   CONNECTION_INFO_1 = _CONNECTION_INFO_1;
  402. // FILE API
  404. // Function Prototypes - FILE
  406. function NetFileClose(servername: LPTSTR; fileid: DWORD): NET_API_STATUS; stdcall;
  407. {$EXTERNALSYM NetFileClose}
  409. function NetFileEnum(servername: LPTSTR; basepath: LPTSTR; username: LPTSTR;
  410.   level: DWORD; var bufptr: Pointer; prefmaxlen: DWORD; var entriesread: DWORD;
  411.   var totalentries: DWORD; resume_handle: PDWORD): NET_API_STATUS; stdcall;
  412. {$EXTERNALSYM NetFileEnum}
  414. function NetFileGetInfo(servername: LPTSTR; fileid: DWORD; level: DWORD;
  415.   bufptr: Pointer): NET_API_STATUS; stdcall;
  416. {$EXTERNALSYM NetFileGetInfo}
  418. // Data Structures - File
  420. // File APIs are available at information levels 2 & 3 only. Levels 0 &
  421. // 1 are not supported.
  423. type
  424.   PFileInfo2 = ^TFileInfo2;
  425.   {$EXTERNALSYM _FILE_INFO_2}
  426.   _FILE_INFO_2 = record
  427.     fi2_id: DWORD;
  428.   end;
  429.   TFileInfo2 = _FILE_INFO_2;
  430.   {$EXTERNALSYM FILE_INFO_2}
  431.   FILE_INFO_2 = _FILE_INFO_2;
  433.   PFileInfo3 = ^TFileInfo3;
  434.   {$EXTERNALSYM _FILE_INFO_3}
  435.   _FILE_INFO_3 = record
  436.     fi3_id: DWORD;
  437.     fi3_permissions: DWORD;
  438.     fi3_num_locks: DWORD;
  439.     fi3_pathname: LPTSTR;
  440.     fi3_username: LPTSTR;
  441.   end;
  442.   TFileInfo3 = _FILE_INFO_3;
  443.   {$EXTERNALSYM FILE_INFO_3}
  444.   FILE_INFO_3 = _FILE_INFO_3;
  446. // bit values for permissions
  448. const
  449.   {$EXTERNALSYM PERM_FILE_READ}
  450.   PERM_FILE_READ   = $01; // user has read access
  451.   {$EXTERNALSYM PERM_FILE_WRITE}
  452.   PERM_FILE_WRITE  = $02; // user has write access
  453.   {$EXTERNALSYM PERM_FILE_CREATE}
  454.   PERM_FILE_CREATE = $04; // user has create access
  456. // Translated from LMMSG.H
  458. {$EXTERNALSYM NetMessageNameAdd}
  459. function NetMessageNameAdd(servername, msgname: LPCWSTR): NET_API_STATUS; stdcall;
  461. {$EXTERNALSYM NetMessageNameEnum}
  462. function NetMessageNameEnum(servername: LPCWSTR; level: DWORD; bufptr: Pointer;
  463.   prefmaxlen: DWORD; var entriesread: DWORD; var totalentries: DWORD;
  464.   resume_handle: PDWORD): NET_API_STATUS; stdcall;
  466. {$EXTERNALSYM NetMessageNameGetInfo}
  467. function NetMessageNameGetInfo(servername: LPCWSTR; msgname: LPCWSTR;
  468.   level: DWORD; var bufptr: Pointer): NET_API_STATUS; stdcall;
  470. {$EXTERNALSYM NetMessageNameDel}
  471. function NetMessageNameDel(servername, msgname: LPCWSTR): NET_API_STATUS; stdcall;
  473. {$EXTERNALSYM NetMessageBufferSend}
  474. function NetMessageBufferSend(servername: LPCWSTR; msgname: LPCWSTR;
  475.   fromname: LPCWSTR; buf: Pointer; buflen: DWORD): NET_API_STATUS; stdcall;
  477. type
  478.   PMsgInfo0 = ^TMsgInfo0;
  479.   {$EXTERNALSYM _MSG_INFO_0}
  480.   _MSG_INFO_0 = record
  481.     msgi0_name: LPWSTR;
  482.   end;
  483.   TMsgInfo0 = _MSG_INFO_0;
  484.   {$EXTERNALSYM MSG_INFO_0}
  485.   MSG_INFO_0 = _MSG_INFO_0;
  487.   PMsgInfo1 = ^TMsgInfo1;
  488.   {$EXTERNALSYM _MSG_INFO_1}
  489.   _MSG_INFO_1 = record
  490.     msgi1_name: LPWSTR;
  491.     msgi1_forward_flag: DWORD;
  492.     msgi1_forward: LPWSTR;
  493.   end;
  494.   TMsgInfo1 = _MSG_INFO_1;
  495.   {$EXTERNALSYM MSG_INFO_1}
  496.   MSG_INFO_1 = _MSG_INFO_1;
  499. // Values for msgi1_forward_flag.
  501. const
  502.   {$EXTERNALSYM MSGNAME_NOT_FORWARDED}
  503.   MSGNAME_NOT_FORWARDED   = $00;    // Name not forwarded
  504.   {$EXTERNALSYM MSGNAME_FORWARDED_TO}
  505.   MSGNAME_FORWARDED_TO    = $04;    // Name forward to remote station
  506.   {$EXTERNALSYM MSGNAME_FORWARDED_FROM}
  507.   MSGNAME_FORWARDED_FROM  = $10;    // Name forwarded from remote station
  509. // Translated from LMREMUTL.H
  511. function NetRemoteTOD(UncServerName: LPCWSTR; BufferPtr: Pointer): NET_API_STATUS; stdcall;
  512. {$EXTERNALSYM NetRemoteTOD}
  514. function NetRemoteComputerSupports(UncServerName: LPCWSTR; OptionsWanted: DWORD;
  515.   var OptionsSupported: DWORD): NET_API_STATUS; stdcall;
  516. {$EXTERNALSYM NetRemoteComputerSupports}
  518. type
  519.   PTimeOfDayInfo = ^TTimeOfDayInfo;
  520.   _TIME_OF_DAY_INFO = record
  521.     tod_elapsedt: DWORD;
  522.     tod_msecs: DWORD;
  523.     tod_hours: DWORD;
  524.     tod_mins: DWORD;
  525.     tod_secs: DWORD;
  526.     tod_hunds: DWORD;
  527.     tod_timezone: LongInt;
  528.     tod_tinterval: DWORD;
  529.     tod_day: DWORD;
  530.     tod_month: DWORD;
  531.     tod_year: DWORD;
  532.     tod_weekday: DWORD;
  533.   end;
  534.   {$EXTERNALSYM _TIME_OF_DAY_INFO}
  535.   TTimeOfDayInfo = _TIME_OF_DAY_INFO;
  536.   TIME_OF_DAY_INFO = _TIME_OF_DAY_INFO;
  537.   {$EXTERNALSYM TIME_OF_DAY_INFO}
  539. // Mask bits for use with NetRemoteComputerSupports:
  541. const
  542.   SUPPORTS_REMOTE_ADMIN_PROTOCOL  = $00000002;
  543.   {EXTERNALSYM SUPPORTS_REMOTE_ADMIN_PROTOCOL}
  544.   SUPPORTS_RPC                    = $00000004;
  545.   {EXTERNALSYM SUPPORTS_RPC}
  546.   SUPPORTS_SAM_PROTOCOL           = $00000008;
  547.   {EXTERNALSYM SUPPORTS_SAM_PROTOCOL}
  548.   SUPPORTS_UNICODE                = $00000010;
  549.   {EXTERNALSYM SUPPORTS_UNICODE}
  550.   SUPPORTS_LOCAL                  = $00000020;
  551.   {EXTERNALSYM SUPPORTS_LOCAL}
  552.   SUPPORTS_ANY                    = $FFFFFFFF;
  553.   {EXTERNALSYM SUPPORTS_ANY}
  555. // Flag bits for RxRemoteApi:
  557.   NO_PERMISSION_REQUIRED  = $00000001;      // set if use NULL session;
  558.   {EXTERNALSYM NO_PERMISSION_REQUIRED}
  559.   ALLOCATE_RESPONSE       = $00000002;      // set if RxRemoteApi allocates response buffer;
  560.   {EXTERNALSYM ALLOCATE_RESPONSE}
  561.   USE_SPECIFIC_TRANSPORT  = $80000000;
  562.   {EXTERNALSYM USE_SPECIFIC_TRANSPORT}
  564. // Translated from LMREPL.H
  566. // Replicator Configuration APIs
  568. const
  569.   REPL_ROLE_EXPORT        = 1;
  570.   {$EXTERNALSYM REPL_ROLE_EXPORT}
  571.   REPL_ROLE_IMPORT        = 2;
  572.   {$EXTERNALSYM REPL_ROLE_IMPORT}
  573.   REPL_ROLE_BOTH          = 3;
  574.   {$EXTERNALSYM REPL_ROLE_BOTH}
  576.   REPL_INTERVAL_INFOLEVEL         = (PARMNUM_BASE_INFOLEVEL + 0);
  577.   {$EXTERNALSYM REPL_INTERVAL_INFOLEVEL}
  578.   REPL_PULSE_INFOLEVEL            = (PARMNUM_BASE_INFOLEVEL + 1);
  579.   {$EXTERNALSYM REPL_PULSE_INFOLEVEL}
  580.   REPL_GUARDTIME_INFOLEVEL        = (PARMNUM_BASE_INFOLEVEL + 2);
  581.   {$EXTERNALSYM REPL_GUARDTIME_INFOLEVEL}
  582.   REPL_RANDOM_INFOLEVEL           = (PARMNUM_BASE_INFOLEVEL + 3);
  583.   {$EXTERNALSYM REPL_RANDOM_INFOLEVEL}
  585. type
  586.   PReplInfo0 = ^TReplInfo0;
  587.   _REPL_INFO_0 = record
  588.     rp0_role: DWORD;
  589.     rp0_exportpath: LPWSTR;
  590.     rp0_exportlist: LPWSTR;
  591.     rp0_importpath: LPWSTR;
  592.     rp0_importlist: LPWSTR;
  593.     rp0_logonusername: LPWSTR;
  594.     rp0_interval: DWORD;
  595.     rp0_pulse: DWORD;
  596.     rp0_guardtime: DWORD;
  597.     rp0_random: DWORD;
  598.   end;
  599.   {$EXTERNALSYM _REPL_INFO_0}
  600.   TReplInfo0 = _REPL_INFO_0;
  601.   REPL_INFO_0 = _REPL_INFO_0;
  602.   {$EXTERNALSYM REPL_INFO_0}
  604.   PReplInfo1000 = ^TReplInfo1000;
  605.   _REPL_INFO_1000 = record
  606.     rp1000_interval: DWORD;
  607.   end;
  608.   {$EXTERNALSYM _REPL_INFO_1000}
  609.   TReplInfo1000 = _REPL_INFO_1000;
  610.   REPL_INFO_1000 = _REPL_INFO_1000;
  611.   {$EXTERNALSYM REPL_INFO_1000}
  613.   PReplInfo1001 = ^TReplInfo1001;
  614.   _REPL_INFO_1001 = record
  615.     rp1001_pulse: DWORD;
  616.   end;
  617.   {$EXTERNALSYM _REPL_INFO_1001}
  618.   TReplInfo1001 = _REPL_INFO_1001;
  619.   REPL_INFO_1001 = _REPL_INFO_1001;
  620.   {$EXTERNALSYM REPL_INFO_1001}
  622.   PReplInfo1002 = ^TReplInfo1002;
  623.   _REPL_INFO_1002 = record
  624.     rp1002_guardtime: DWORD;
  625.   end;
  626.   {$EXTERNALSYM _REPL_INFO_1002}
  627.   TReplInfo1002 = _REPL_INFO_1002;
  628.   REPL_INFO_1002 = _REPL_INFO_1002;
  629.   {$EXTERNALSYM REPL_INFO_1002}
  631.   PReplInfo1003 = ^TReplInfo1003;
  632.   _REPL_INFO_1003 = record
  633.     rp1003_random: DWORD;
  634.   end;
  635.   {$EXTERNALSYM _REPL_INFO_1003}
  636.   TReplInfo1003 = _REPL_INFO_1003;
  637.   REPL_INFO_1003 = _REPL_INFO_1003;
  638.   {$EXTERNALSYM REPL_INFO_1003}
  640. function NetReplGetInfo(servername: LPCWSTR; level: DWORD; bufptr: Pointer): NET_API_STATUS; stdcall;
  641. {$EXTERNALSYM NetReplGetInfo}
  643. function NetReplSetInfo(servername: LPCWSTR; level: DWORD; const buf: Pointer;
  644.   parm_err: PDWORD): NET_API_STATUS; stdcall;
  645. {$EXTERNALSYM NetReplSetInfo}
  647. // Replicator Export Directory APIs
  649. const
  650.   REPL_INTEGRITY_FILE     = 1;
  651.   {$EXTERNALSYM REPL_INTEGRITY_FILE}
  652.   REPL_INTEGRITY_TREE     = 2;
  653.   {$EXTERNALSYM REPL_INTEGRITY_TREE}
  655.   REPL_EXTENT_FILE        = 1;
  656.   {$EXTERNALSYM REPL_EXTENT_FILE}
  657.   REPL_EXTENT_TREE        = 2;
  658.   {$EXTERNALSYM REPL_EXTENT_TREE}
  660.   REPL_EXPORT_INTEGRITY_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + 0);
  661.   {$EXTERNALSYM REPL_EXPORT_INTEGRITY_INFOLEVEL}
  662.   REPL_EXPORT_EXTENT_INFOLEVEL    = (PARMNUM_BASE_INFOLEVEL + 1);
  663.   {$EXTERNALSYM REPL_EXPORT_EXTENT_INFOLEVEL}
  665. type
  666.   PReplEdirInfo0 = ^TReplEdirInfo0;
  667.   _REPL_EDIR_INFO_0 = record
  668.     rped0_dirname: LPWSTR;
  669.   end;
  670.   {$EXTERNALSYM _REPL_EDIR_INFO_0}
  671.   TReplEdirInfo0 = _REPL_EDIR_INFO_0;
  672.   REPL_EDIR_INFO_0 = _REPL_EDIR_INFO_0;
  673.   {$EXTERNALSYM REPL_EDIR_INFO_0}
  675.   PReplEdirInfo1 = ^TReplEdirInfo1;
  676.   _REPL_EDIR_INFO_1 = record
  677.     rped1_dirname: LPWSTR;
  678.     rped1_integrity: DWORD;
  679.     rped1_extent: DWORD;
  680.   end;
  681.   {$EXTERNALSYM _REPL_EDIR_INFO_1}
  682.   TReplEdirInfo1 = _REPL_EDIR_INFO_1;
  683.   REPL_EDIR_INFO_1 = _REPL_EDIR_INFO_1;
  684.   {$EXTERNALSYM REPL_EDIR_INFO_1}
  686.   PReplEdirInfo2 = ^TReplEdirInfo2;
  687.   _REPL_EDIR_INFO_2 = record
  688.     rped2_dirname: LPWSTR;
  689.     rped2_integrity: DWORD;
  690.     rped2_extent: DWORD;
  691.     rped2_lockcount: DWORD;
  692.     rped2_locktime: DWORD;
  693.   end;
  694.   {$EXTERNALSYM _REPL_EDIR_INFO_2}
  695.   TReplEdirInfo2 = _REPL_EDIR_INFO_2;
  696.   REPL_EDIR_INFO_2 = _REPL_EDIR_INFO_2;
  697.   {$EXTERNALSYM REPL_EDIR_INFO_2}
  699.   PReplEdirInfo1000 = ^TReplEdirInfo1000;
  700.   _REPL_EDIR_INFO_1000 = record
  701.     rped1000_integrity: DWORD;
  702.   end;
  703.   {$EXTERNALSYM _REPL_EDIR_INFO_1000}
  704.   TReplEdirInfo1000 = _REPL_EDIR_INFO_1000;
  705.   REPL_EDIR_INFO_1000 = _REPL_EDIR_INFO_1000;
  706.   {$EXTERNALSYM REPL_EDIR_INFO_1000}
  708.   PReplEdirInfo1001 = ^TReplEdirInfo1001;
  709.   _REPL_EDIR_INFO_1001 = record
  710.     rped1001_extent: DWORD;
  711.   end;
  712.   {$EXTERNALSYM _REPL_EDIR_INFO_1001}
  713.   TReplEdirInfo1001 = _REPL_EDIR_INFO_1001;
  714.   REPL_EDIR_INFO_1001 = _REPL_EDIR_INFO_1001;
  715.   {$EXTERNALSYM REPL_EDIR_INFO_1001}
  718. function NetReplExportDirAdd(servername: LPCWSTR; level: DWORD; buf: Pointer;
  719.   parm_err: PDWORD): NET_API_STATUS; stdcall;
  720. {$EXTERNALSYM NetReplExportDirAdd}
  722. function NetReplExportDirDel(servername, dirname: LPCWSTR): NET_API_STATUS; stdcall;
  723. {$EXTERNALSYM NetReplExportDirDel}
  725. function NetReplExportDirEnum(servername: LPCWSTR; level: DWORD; bufptr: Pointer;
  726.   prefmaxlen: DWORD; var entriesread: DWORD; var totalentries: DWORD;
  727.   resumehandle: PDWORD): NET_API_STATUS; stdcall;
  728. {$EXTERNALSYM NetReplExportDirEnum}
  730. function NetReplExportDirGetInfo(servername: LPCWSTR; dirname: LPCWSTR;
  731.   level: DWORD; bufptr: Pointer): NET_API_STATUS; stdcall;
  732. {$EXTERNALSYM NetReplExportDirGetInfo}
  734. function NetReplExportDirSetInfo(servername: LPCWSTR; dirname: LPCWSTR;
  735.   level: DWORD; const buf: Pointer; parm_err: PDWORD): NET_API_STATUS; stdcall;
  736. {$EXTERNALSYM NetReplExportDirSetInfo}
  738. function NetReplExportDirLock(servername, dirname: LPCWSTR): NET_API_STATUS; stdcall;
  739. {$EXTERNALSYM NetReplExportDirLock}
  741. function NetReplExportDirUnlock(servername: LPCWSTR; dirname: LPCWSTR;
  742.   unlockforce: DWORD): NET_API_STATUS; stdcall;
  743. {$EXTERNALSYM NetReplExportDirUnlock}
  745. const
  746.   REPL_UNLOCK_NOFORCE     = 0;
  747.   {$EXTERNALSYM REPL_UNLOCK_NOFORCE}
  748.   REPL_UNLOCK_FORCE       = 1;
  749.   {$EXTERNALSYM REPL_UNLOCK_FORCE}
  751. // Replicator Import Directory APIs
  753. type
  754.   PReplIdirInfo0 = ^TReplIdirInfo0;
  755.   _REPL_IDIR_INFO_0 = record
  756.     rpid0_dirname: LPWSTR;
  757.   end;
  758.   {$EXTERNALSYM _REPL_IDIR_INFO_0}
  759.   TReplIdirInfo0 = _REPL_IDIR_INFO_0;
  760.   REPL_IDIR_INFO_0 = _REPL_IDIR_INFO_0;
  761.   {$EXTERNALSYM REPL_IDIR_INFO_0}
  763.   PReplIdirInfo1 = ^TReplIdirInfo1;
  764.   _REPL_IDIR_INFO_1 = record
  765.     rpid1_dirname: LPWSTR;
  766.     rpid1_state: DWORD;
  767.     rpid1_mastername: LPWSTR;
  768.     rpid1_last_update_time: DWORD;
  769.     rpid1_lockcount: DWORD;
  770.     rpid1_locktime: DWORD;
  771.   end;
  772.   {$EXTERNALSYM _REPL_IDIR_INFO_1}
  773.   TReplIdirInfo1 = _REPL_IDIR_INFO_1;
  774.   REPL_IDIR_INFO_1 = _REPL_IDIR_INFO_1;
  775.   {$EXTERNALSYM REPL_IDIR_INFO_1}
  777. function NetReplImportDirAdd(servername: LPCWSTR; level: DWORD; buf: Pointer;
  778.   parm_err: PDWORD): NET_API_STATUS; stdcall;
  779. {$EXTERNALSYM NetReplImportDirAdd}
  781. function NetReplImportDirDel(servername, dirname: LPCWSTR): NET_API_STATUS; stdcall;
  782. {$EXTERNALSYM NetReplImportDirDel}
  784. function NetReplImportDirEnum(servername: LPCWSTR; level: DWORD; bufptr: Pointer;
  785.   prefmaxlen: DWORD; var entriesread: DWORD; var totalentries: DWORD;
  786.   resumehandle: PDWORD): NET_API_STATUS; stdcall;
  787. {$EXTERNALSYM NetReplImportDirEnum}
  789. function NetReplImportDirGetInfo(servername, dirname: LPCWSTR; level: DWORD;
  790.   bufptr: Pointer): NET_API_STATUS; stdcall;
  791. {$EXTERNALSYM NetReplImportDirGetInfo}
  793. function NetReplImportDirLock(servername, dirname: LPCWSTR): NET_API_STATUS; stdcall;
  794. {$EXTERNALSYM NetReplImportDirLock}
  796. function NetReplImportDirUnlock(servername: LPCWSTR; dirname: LPCWSTR;
  797.   unlockforce: DWORD): NET_API_STATUS; stdcall;
  798. {$EXTERNALSYM NetReplImportDirUnlock}
  800. const
  801.   REPL_STATE_OK                   = 0;
  802.   {$EXTERNALSYM REPL_STATE_OK}
  803.   REPL_STATE_NO_MASTER            = 1;
  804.   {$EXTERNALSYM REPL_STATE_NO_MASTER}
  805.   REPL_STATE_NO_SYNC              = 2;
  806.   {$EXTERNALSYM REPL_STATE_NO_SYNC}
  807.   REPL_STATE_NEVER_REPLICATED     = 3;
  808.   {$EXTERNALSYM REPL_STATE_NEVER_REPLICATED}
  810. // Translated from LMSERVER.H
  812. // Function Prototypes - SERVER
  814. function NetServerEnum(servername: LPCWSTR; level: DWORD; var bufptr: Pointer;
  815.   prefmaxlen: DWORD; var entriesread: DWORD; var totalentries: DWORD;
  816.   servertype: DWORD; domain: LPCWSTR; resume_handle: PDWORD): NET_API_STATUS; stdcall;
  817. {$EXTERNALSYM NetServerEnum}
  819. function NetServerEnumEx(ServerName: LPCWSTR; Level: DWORD; var Bufptr: Pointer;
  820.   PrefMaxlen: DWORD; var EntriesRead: DWORD; var totalentries: DWORD;
  821.   servertype: DWORD; domain, FirstNameToReturn: LPCWSTR): NET_API_STATUS; stdcall;
  822. {$EXTERNALSYM NetServerEnumEx}
  824. function NetServerGetInfo(servername: LPWSTR; level: DWORD;
  825.   var bufptr: Pointer): NET_API_STATUS; stdcall;
  826. {$EXTERNALSYM NetServerGetInfo}
  828. function NetServerSetInfo(servername: LPWSTR; level: DWORD; buf: Pointer;
  829.   ParmError: PDWORD): NET_API_STATUS; stdcall;
  830. {$EXTERNALSYM NetServerSetInfo}
  832. // Temporary hack function.
  834. function NetServerSetInfoCommandLine(argc: Word; argv: LPWSTR): NET_API_STATUS; stdcall;
  835. {$EXTERNALSYM NetServerSetInfoCommandLine}
  837. function NetServerDiskEnum(servername: LPWSTR; level: DWORD; bufptr: Pointer;
  838.   prefmaxlen: DWORD; var entriesread: DWORD; var totalentries: DWORD;
  839.   resume_handle: PDWORD): NET_API_STATUS; stdcall;
  840. {$EXTERNALSYM NetServerDiskEnum}
  842. function NetServerComputerNameAdd(ServerName: LPWSTR; EmulatedDomainName: LPWSTR;
  843.   EmulatedServerName: LPWSTR): NET_API_STATUS; stdcall;
  844. {$EXTERNALSYM NetServerComputerNameAdd}
  846. function NetServerComputerNameDel(ServerName, EmulatedServerName: LPWSTR): NET_API_STATUS; stdcall;
  847. {$EXTERNALSYM NetServerComputerNameDel}
  849. function NetServerTransportAdd(servername: LPWSTR; level: DWORD;
  850.   bufptr: Pointer): NET_API_STATUS; stdcall;
  851. {$EXTERNALSYM NetServerTransportAdd}
  853. function NetServerTransportAddEx(servername: LPWSTR; level: DWORD;
  854.   bufptr: Pointer): NET_API_STATUS; stdcall;
  855. {$EXTERNALSYM NetServerTransportAddEx}
  857. function NetServerTransportDel(servername: LPWSTR; level: DWORD;
  858.   bufptr: Pointer): NET_API_STATUS; stdcall;
  859. {$EXTERNALSYM NetServerTransportDel}
  861. function NetServerTransportEnum(servername: LPWSTR; level: DWORD; bufptr: Pointer;
  862.   prefmaxlen: DWORD; var entriesread: DWORD; var totalentries: DWORD;
  863.   resumehandle: PDWORD): NET_API_STATUS; stdcall;
  864. {$EXTERNALSYM NetServerTransportEnum}
  866. // The following function can be called by Win NT services to register
  867. // their service type.  This function is exported from advapi32.dll.
  868. // Therefore, if this is the only function called by that service, then
  869. // it is not necessary to link to netapi32.lib.
  871. function SetServiceBits(hServiceStatus: SERVICE_STATUS_HANDLE;
  872.   dwServiceBits: DWORD; bSetBitsOn: BOOL; bUpdateImmediately: BOOL): BOOL; stdcall;
  873. {$EXTERNALSYM SetServiceBits}
  875. // Data Structures - SERVER
  877. type
  878.   PServerInfo100 = ^TServerInfo100;
  879.   _SERVER_INFO_100 = record
  880.     sv100_platform_id: DWORD;
  881.     sv100_name: LPWSTR;
  882.   end;
  883.   {$EXTERNALSYM _SERVER_INFO_100}
  884.   TServerInfo100 = _SERVER_INFO_100;
  885.   SERVER_INFO_100 = _SERVER_INFO_100;
  886.   {$EXTERNALSYM SERVER_INFO_100}
  888.   PServerInfo101 = ^TServerInfo101;
  889.   _SERVER_INFO_101 = record
  890.     sv101_platform_id: DWORD;
  891.     sv101_name: LPWSTR;
  892.     sv101_version_major: DWORD;
  893.     sv101_version_minor: DWORD;
  894.     sv101_type: DWORD;
  895.     sv101_comment: LPWSTR;
  896.   end;
  897.   {$EXTERNALSYM _SERVER_INFO_101}
  898.   TServerInfo101 = _SERVER_INFO_101;
  899.   SERVER_INFO_101 = _SERVER_INFO_101;
  900.   {$EXTERNALSYM SERVER_INFO_101}
  902.   PServerInfo102 = ^TServerInfo102;
  903.   _SERVER_INFO_102 = record
  904.      sv102_platform_id: DWORD;
  905.      sv102_name: LPWSTR;
  906.      sv102_version_major: DWORD;
  907.      sv102_version_minor: DWORD;
  908.      sv102_type: DWORD;
  909.      sv102_comment: LPWSTR;
  910.      sv102_users: DWORD;
  911.      sv102_disc: LongInt;
  912.      sv102_hidden: BOOL;
  913.      sv102_announce: DWORD;
  914.      sv102_anndelta: DWORD;
  915.      sv102_licenses: DWORD;
  916.      sv102_userpath: LPWSTR;
  917.   end;
  918.   {$EXTERNALSYM _SERVER_INFO_102}
  919.   TServerInfo102 = _SERVER_INFO_102;
  920.   SERVER_INFO_102 = _SERVER_INFO_102;
  921.   {$EXTERNALSYM SERVER_INFO_102}
  923.   PServerInfo402 = ^TServerInfo402;
  924.   _SERVER_INFO_402 = record
  925.      sv402_ulist_mtime: DWORD;
  926.      sv402_glist_mtime: DWORD;
  927.      sv402_alist_mtime: DWORD;
  928.      sv402_alerts: LPWSTR;
  929.      sv402_security: DWORD;
  930.      sv402_numadmin: DWORD;
  931.      sv402_lanmask: DWORD;
  932.      sv402_guestacct: LPWSTR;
  933.      sv402_chdevs: DWORD;
  934.      sv402_chdevq: DWORD;
  935.      sv402_chdevjobs: DWORD;
  936.      sv402_connections: DWORD;
  937.      sv402_shares: DWORD;
  938.      sv402_openfiles: DWORD;
  939.      sv402_sessopens: DWORD;
  940.      sv402_sessvcs: DWORD;
  941.      sv402_sessreqs: DWORD;
  942.      sv402_opensearch: DWORD;
  943.      sv402_activelocks: DWORD;
  944.      sv402_numreqbuf: DWORD;
  945.      sv402_sizreqbuf: DWORD;
  946.      sv402_numbigbuf: DWORD;
  947.      sv402_numfiletasks: DWORD;
  948.      sv402_alertsched: DWORD;
  949.      sv402_erroralert: DWORD;
  950.      sv402_logonalert: DWORD;
  951.      sv402_accessalert: DWORD;
  952.      sv402_diskalert: DWORD;
  953.      sv402_netioalert: DWORD;
  954.      sv402_maxauditsz: DWORD;
  955.      sv402_srvheuristics: LPWSTR;
  956.   end;
  957.   {$EXTERNALSYM _SERVER_INFO_402}
  958.   TServerInfo402 = _SERVER_INFO_402;
  959.   SERVER_INFO_402 = _SERVER_INFO_402;
  960.   {$EXTERNALSYM SERVER_INFO_402}
  962.   PServerInfo403 = ^TServerInfo403;
  963.   _SERVER_INFO_403 = record
  964.      sv403_ulist_mtime: DWORD;
  965.      sv403_glist_mtime: DWORD;
  966.      sv403_alist_mtime: DWORD;
  967.      sv403_alerts: LPWSTR;
  968.      sv403_security: DWORD;
  969.      sv403_numadmin: DWORD;
  970.      sv403_lanmask: DWORD;
  971.      sv403_guestacct: LPWSTR;
  972.      sv403_chdevs: DWORD;
  973.      sv403_chdevq: DWORD;
  974.      sv403_chdevjobs: DWORD;
  975.      sv403_connections: DWORD;
  976.      sv403_shares: DWORD;
  977.      sv403_openfiles: DWORD;
  978.      sv403_sessopens: DWORD;
  979.      sv403_sessvcs: DWORD;
  980.      sv403_sessreqs: DWORD;
  981.      sv403_opensearch: DWORD;
  982.      sv403_activelocks: DWORD;
  983.      sv403_numreqbuf: DWORD;
  984.      sv403_sizreqbuf: DWORD;
  985.      sv403_numbigbuf: DWORD;
  986.      sv403_numfiletasks: DWORD;
  987.      sv403_alertsched: DWORD;
  988.      sv403_erroralert: DWORD;
  989.      sv403_logonalert: DWORD;
  990.      sv403_accessalert: DWORD;
  991.      sv403_diskalert: DWORD;
  992.      sv403_netioalert: DWORD;
  993.      sv403_maxauditsz: DWORD;
  994.      sv403_srvheuristics: LPWSTR;
  995.      sv403_auditedevents: DWORD;
  996.      sv403_autoprofile: DWORD;
  997.      sv403_autopath: LPWSTR;
  998.   end;
  999.   {$EXTERNALSYM _SERVER_INFO_403}
  1000.   TServerInfo403 = _SERVER_INFO_403;
  1001.   SERVER_INFO_403 = _SERVER_INFO_403;
  1002.   {$EXTERNALSYM SERVER_INFO_403}
  1004.   PServerInfo502 = ^TServerInfo502;
  1005.   _SERVER_INFO_502 = record
  1006.     sv502_sessopens: DWORD;
  1007.     sv502_sessvcs: DWORD;
  1008.     sv502_opensearch: DWORD;
  1009.     sv502_sizreqbuf: DWORD;
  1010.     sv502_initworkitems: DWORD;
  1011.     sv502_maxworkitems: DWORD;
  1012.     sv502_rawworkitems: DWORD;
  1013.     sv502_irpstacksize: DWORD;
  1014.     sv502_maxrawbuflen: DWORD;
  1015.     sv502_sessusers: DWORD;
  1016.     sv502_sessconns: DWORD;
  1017.     sv502_maxpagedmemoryusage: DWORD;
  1018.     sv502_maxnonpagedmemoryusage: DWORD;
  1019.     sv502_enablesoftcompat: BOOL;
  1020.     sv502_enableforcedlogoff: BOOL;
  1021.     sv502_timesource: BOOL;
  1022.     sv502_acceptdownlevelapis: BOOL;
  1023.     sv502_lmannounce: BOOL;
  1024.   end;
  1025.   {$EXTERNALSYM _SERVER_INFO_502}
  1026.   TServerInfo502 = _SERVER_INFO_502;
  1027.   SERVER_INFO_502 = _SERVER_INFO_502;
  1028.   {$EXTERNALSYM SERVER_INFO_502}
  1030.   PServerInfo503 = ^TServerInfo503;
  1031.   _SERVER_INFO_503 = record
  1032.     sv503_sessopens: DWORD;
  1033.     sv503_sessvcs: DWORD;
  1034.     sv503_opensearch: DWORD;
  1035.     sv503_sizreqbuf: DWORD;
  1036.     sv503_initworkitems: DWORD;
  1037.     sv503_maxworkitems: DWORD;
  1038.     sv503_rawworkitems: DWORD;
  1039.     sv503_irpstacksize: DWORD;
  1040.     sv503_maxrawbuflen: DWORD;
  1041.     sv503_sessusers: DWORD;
  1042.     sv503_sessconns: DWORD;
  1043.     sv503_maxpagedmemoryusage: DWORD;
  1044.     sv503_maxnonpagedmemoryusage: DWORD;
  1045.     sv503_enablesoftcompat: BOOL;
  1046.     sv503_enableforcedlogoff: BOOL;
  1047.     sv503_timesource: BOOL;
  1048.     sv503_acceptdownlevelapis: BOOL;
  1049.     sv503_lmannounce: BOOL;
  1050.     sv503_domain: LPWSTR;
  1051.     sv503_maxcopyreadlen: DWORD;
  1052.     sv503_maxcopywritelen: DWORD;
  1053.     sv503_minkeepsearch: DWORD;
  1054.     sv503_maxkeepsearch: DWORD;
  1055.     sv503_minkeepcomplsearch: DWORD;
  1056.     sv503_maxkeepcomplsearch: DWORD;
  1057.     sv503_threadcountadd: DWORD;
  1058.     sv503_numblockthreads: DWORD;
  1059.     sv503_scavtimeout: DWORD;
  1060.     sv503_minrcvqueue: DWORD;
  1061.     sv503_minfreeworkitems: DWORD;
  1062.     sv503_xactmemsize: DWORD;
  1063.     sv503_threadpriority: DWORD;
  1064.     sv503_maxmpxct: DWORD;
  1065.     sv503_oplockbreakwait: DWORD;
  1066.     sv503_oplockbreakresponsewait: DWORD;
  1067.     sv503_enableoplocks: BOOL;
  1068.     sv503_enableoplockforceclose: BOOL;
  1069.     sv503_enablefcbopens: BOOL;
  1070.     sv503_enableraw: BOOL;
  1071.     sv503_enablesharednetdrives: BOOL;
  1072.     sv503_minfreeconnections: DWORD;
  1073.     sv503_maxfreeconnections: DWORD;
  1074.   end;
  1075.   {$EXTERNALSYM _SERVER_INFO_503}
  1076.   TServerInfo503 = _SERVER_INFO_503;
  1077.   SERVER_INFO_503 = _SERVER_INFO_503;
  1078.   {$EXTERNALSYM SERVER_INFO_503}
  1080.   PServerInfo599 = ^TServerInfo599;
  1081.   _SERVER_INFO_599 = record
  1082.     sv599_sessopens: DWORD;
  1083.     sv599_sessvcs: DWORD;
  1084.     sv599_opensearch: DWORD;
  1085.     sv599_sizreqbuf: DWORD;
  1086.     sv599_initworkitems: DWORD;
  1087.     sv599_maxworkitems: DWORD;
  1088.     sv599_rawworkitems: DWORD;
  1089.     sv599_irpstacksize: DWORD;
  1090.     sv599_maxrawbuflen: DWORD;
  1091.     sv599_sessusers: DWORD;
  1092.     sv599_sessconns: DWORD;
  1093.     sv599_maxpagedmemoryusage: DWORD;
  1094.     sv599_maxnonpagedmemoryusage: DWORD;
  1095.     sv599_enablesoftcompat: BOOL;
  1096.     sv599_enableforcedlogoff: BOOL;
  1097.     sv599_timesource: BOOL;
  1098.     sv599_acceptdownlevelapis: BOOL;
  1099.     sv599_lmannounce: BOOL;
  1100.     sv599_domain: LPWSTR;
  1101.     sv599_maxcopyreadlen: DWORD;
  1102.     sv599_maxcopywritelen: DWORD;
  1103.     sv599_minkeepsearch: DWORD;
  1104.     sv599_maxkeepsearch: DWORD;
  1105.     sv599_minkeepcomplsearch: DWORD;
  1106.     sv599_maxkeepcomplsearch: DWORD;
  1107.     sv599_threadcountadd: DWORD;
  1108.     sv599_numblockthreads: DWORD;
  1109.     sv599_scavtimeout: DWORD;
  1110.     sv599_minrcvqueue: DWORD;
  1111.     sv599_minfreeworkitems: DWORD;
  1112.     sv599_xactmemsize: DWORD;
  1113.     sv599_threadpriority: DWORD;
  1114.     sv599_maxmpxct: DWORD;
  1115.     sv599_oplockbreakwait: DWORD;
  1116.     sv599_oplockbreakresponsewait: DWORD;
  1117.     sv599_enableoplocks: BOOL;
  1118.     sv599_enableoplockforceclose: BOOL;
  1119.     sv599_enablefcbopens: BOOL;
  1120.     sv599_enableraw: BOOL;
  1121.     sv599_enablesharednetdrives: BOOL;
  1122.     sv599_minfreeconnections: DWORD;
  1123.     sv599_maxfreeconnections: DWORD;
  1124.     sv599_initsesstable: DWORD;
  1125.     sv599_initconntable: DWORD;
  1126.     sv599_initfiletable: DWORD;
  1127.     sv599_initsearchtable: DWORD;
  1128.     sv599_alertschedule: DWORD;
  1129.     sv599_errorthreshold: DWORD;
  1130.     sv599_networkerrorthreshold: DWORD;
  1131.     sv599_diskspacethreshold: DWORD;
  1132.     sv599_reserved: DWORD;
  1133.     sv599_maxlinkdelay: DWORD;
  1134.     sv599_minlinkthroughput: DWORD;
  1135.     sv599_linkinfovalidtime: DWORD;
  1136.     sv599_scavqosinfoupdatetime: DWORD;
  1137.     sv599_maxworkitemidletime: DWORD;
  1138.   end;
  1139.   {$EXTERNALSYM _SERVER_INFO_599}
  1140.   TServerInfo599 = _SERVER_INFO_599;
  1141.   SERVER_INFO_599 = _SERVER_INFO_599;
  1142.   {$EXTERNALSYM SERVER_INFO_599}
  1144.   PServerInfo598 = ^TServerInfo598;
  1145.   _SERVER_INFO_598 = record
  1146.     sv598_maxrawworkitems: DWORD;
  1147.     sv598_maxthreadsperqueue: DWORD;
  1148.     sv598_producttype: DWORD;
  1149.     sv598_serversize: DWORD;
  1150.     sv598_connectionlessautodisc: DWORD;
  1151.     sv598_sharingviolationretries: DWORD;
  1152.     sv598_sharingviolationdelay: DWORD;
  1153.     sv598_maxglobalopensearch: DWORD;
  1154.     sv598_removeduplicatesearches: DWORD;
  1155.     sv598_lockviolationoffset: DWORD;
  1156.     sv598_lockviolationdelay: DWORD;
  1157.     sv598_mdlreadswitchover: DWORD;
  1158.     sv598_cachedopenlimit: DWORD;
  1159.     sv598_otherqueueaffinity: DWORD;
  1160.     sv598_restrictnullsessaccess: BOOL;
  1161.     sv598_enablewfw311directipx: BOOL;
  1162.     sv598_queuesamplesecs: DWORD;
  1163.     sv598_balancecount: DWORD;
  1164.     sv598_preferredaffinity: DWORD;
  1165.     sv598_maxfreerfcbs: DWORD;
  1166.     sv598_maxfreemfcbs: DWORD;
  1167.     sv598_maxfreelfcbs: DWORD;
  1168.     sv598_maxfreepagedpoolchunks: DWORD;
  1169.     sv598_minpagedpoolchunksize: DWORD;
  1170.     sv598_maxpagedpoolchunksize: DWORD;
  1171.     sv598_sendsfrompreferredprocessor: BOOL;
  1172.     sv598_cacheddirectorylimit: DWORD;
  1173.     sv598_maxcopylength: DWORD;
  1174.     sv598_enablecompression: BOOL;
  1175.     sv598_autosharewks: BOOL;
  1176.     sv598_autoshareserver: BOOL;
  1177.     sv598_enablesecuritysignature: BOOL;
  1178.     sv598_requiresecuritysignature: BOOL;
  1179.     sv598_minclientbuffersize: DWORD;
  1180.     sv598_serverguid: TGUID;
  1181.     sv598_ConnectionNoSessionsTimeout: DWORD;
  1182.     sv598_IdleThreadTimeOut: DWORD;
  1183.     sv598_enableW9xsecuritysignature: BOOL;
  1184.   end;
  1185.   {$EXTERNALSYM _SERVER_INFO_598}
  1186.   TServerInfo598 = _SERVER_INFO_598;
  1187.   SERVER_INFO_598 = _SERVER_INFO_598;
  1188.   {$EXTERNALSYM SERVER_INFO_598}
  1190.   PServerInfo1005 = ^TServerInfo1005;
  1191.   _SERVER_INFO_1005 = record
  1192.     sv1005_comment: LPWSTR;
  1193.   end;
  1194.   {$EXTERNALSYM _SERVER_INFO_1005}
  1195.   TServerInfo1005 = _SERVER_INFO_1005;
  1196.   SERVER_INFO_1005 = _SERVER_INFO_1005;
  1197.   {$EXTERNALSYM SERVER_INFO_1005}
  1199.   PServerInfo1107 = ^TServerInfo1107;
  1200.   _SERVER_INFO_1107 = record
  1201.     sv1107_users: DWORD;
  1202.   end;
  1203.   {$EXTERNALSYM _SERVER_INFO_1107}
  1204.   TServerInfo1107 = _SERVER_INFO_1107;
  1205.   SERVER_INFO_1107 = _SERVER_INFO_1107;
  1206.   {$EXTERNALSYM SERVER_INFO_1107}
  1208.   PServerInfo1010 = ^TServerInfo1010;
  1209.   _SERVER_INFO_1010 = record
  1210.     sv1010_disc: LongInt;
  1211.   end;
  1212.   {$EXTERNALSYM _SERVER_INFO_1010}
  1213.   TServerInfo1010 = _SERVER_INFO_1010;
  1214.   SERVER_INFO_1010 = _SERVER_INFO_1010;
  1215.   {$EXTERNALSYM SERVER_INFO_1010}
  1217.   PServerInfo1016 = ^TServerInfo1016;
  1218.   _SERVER_INFO_1016 = record
  1219.     sv1016_hidden: BOOL;
  1220.   end;
  1221.   {$EXTERNALSYM _SERVER_INFO_1016}
  1222.   TServerInfo1016 = _SERVER_INFO_1016;
  1223.   SERVER_INFO_1016 = _SERVER_INFO_1016;
  1224.   {$EXTERNALSYM SERVER_INFO_1016}
  1226.   PServerInfo1017 = ^TServerInfo1017;
  1227.   _SERVER_INFO_1017 = record
  1228.     sv1017_announce: DWORD;
  1229.   end;
  1230.   {$EXTERNALSYM _SERVER_INFO_1017}
  1231.   TServerInfo1017 = _SERVER_INFO_1017;
  1232.   SERVER_INFO_1017 = _SERVER_INFO_1017;
  1233.   {$EXTERNALSYM SERVER_INFO_1017}
  1235.   PServerInfo1018 = ^TServerInfo1018;
  1236.   _SERVER_INFO_1018 = record
  1237.     sv1018_anndelta: DWORD;
  1238.   end;
  1239.   {$EXTERNALSYM _SERVER_INFO_1018}
  1240.   TServerInfo1018 = _SERVER_INFO_1018;
  1241.   SERVER_INFO_1018 = _SERVER_INFO_1018;
  1242.   {$EXTERNALSYM SERVER_INFO_1018}
  1244.   PServerInfo1501 = ^TServerInfo1501;
  1245.   _SERVER_INFO_1501 = record
  1246.     sv1501_sessopens: DWORD;
  1247.   end;
  1248.   {$EXTERNALSYM _SERVER_INFO_1501}
  1249.   TServerInfo1501 = _SERVER_INFO_1501;
  1250.   SERVER_INFO_1501 = _SERVER_INFO_1501;
  1251.   {$EXTERNALSYM SERVER_INFO_1501}
  1253.   PServerInfo1502 = ^TServerInfo1502;
  1254.   _SERVER_INFO_1502 = record
  1255.     sv1502_sessvcs: DWORD;
  1256.   end;
  1257.   {$EXTERNALSYM _SERVER_INFO_1502}
  1258.   TServerInfo1502 = _SERVER_INFO_1502;
  1259.   SERVER_INFO_1502 = _SERVER_INFO_1502;
  1260.   {$EXTERNALSYM SERVER_INFO_1502}
  1262.   PServerInfo1503 = ^TServerInfo1503;
  1263.   _SERVER_INFO_1503 = record
  1264.     sv1503_opensearch: DWORD;
  1265.   end;
  1266.   {$EXTERNALSYM _SERVER_INFO_1503}
  1267.   TServerInfo1503 = _SERVER_INFO_1503;
  1268.   SERVER_INFO_1503 = _SERVER_INFO_1503;
  1269.   {$EXTERNALSYM SERVER_INFO_1503}
  1271.   PServerInfo1506 = ^TServerInfo1506;
  1272.   _SERVER_INFO_1506 = record
  1273.     sv1506_maxworkitems: DWORD;
  1274.   end;
  1275.   {$EXTERNALSYM _SERVER_INFO_1506}
  1276.   TServerInfo1506 = _SERVER_INFO_1506;
  1277.   SERVER_INFO_1506 = _SERVER_INFO_1506;
  1278.   {$EXTERNALSYM SERVER_INFO_1506}
  1280.   PServerInfo1509 = ^TServerInfo1509;
  1281.   _SERVER_INFO_1509 = record
  1282.     sv1509_maxrawbuflen: DWORD;
  1283.   end;
  1284.   {$EXTERNALSYM _SERVER_INFO_1509}
  1285.   TServerInfo1509 = _SERVER_INFO_1509;
  1286.   SERVER_INFO_1509 = _SERVER_INFO_1509;
  1287.   {$EXTERNALSYM SERVER_INFO_1509}
  1289.   PServerInfo1510 = ^TServerInfo1510;
  1290.   _SERVER_INFO_1510 = record
  1291.     sv1510_sessusers: DWORD;
  1292.   end;
  1293.   {$EXTERNALSYM _SERVER_INFO_1510}
  1294.   TServerInfo1510 = _SERVER_INFO_1510;
  1295.   SERVER_INFO_1510 = _SERVER_INFO_1510;
  1296.   {$EXTERNALSYM SERVER_INFO_1510}
  1298.   PServerInfo1511 = ^TServerInfo1511;
  1299.   _SERVER_INFO_1511 = record
  1300.     sv1511_sessconns: DWORD;
  1301.   end;
  1302.   {$EXTERNALSYM _SERVER_INFO_1511}
  1303.   TServerInfo1511 = _SERVER_INFO_1511;
  1304.   SERVER_INFO_1511 = _SERVER_INFO_1511;
  1305.   {$EXTERNALSYM SERVER_INFO_1511}
  1307.   PServerInfo1512 = ^TServerInfo1512;
  1308.   _SERVER_INFO_1512 = record
  1309.     sv1512_maxnonpagedmemoryusage: DWORD;
  1310.   end;
  1311.   {$EXTERNALSYM _SERVER_INFO_1512}
  1312.   TServerInfo1512 = _SERVER_INFO_1512;
  1313.   SERVER_INFO_1512 = _SERVER_INFO_1512;
  1314.   {$EXTERNALSYM SERVER_INFO_1512}
  1316.   PServerInfo1513 = ^TServerInfo1513;
  1317.   _SERVER_INFO_1513 = record
  1318.     sv1513_maxpagedmemoryusage: DWORD;
  1319.   end;
  1320.   {$EXTERNALSYM _SERVER_INFO_1513}
  1321.   TServerInfo1513 = _SERVER_INFO_1513;
  1322.   SERVER_INFO_1513 = _SERVER_INFO_1513;
  1323.   {$EXTERNALSYM SERVER_INFO_1513}
  1325.   PServerInfo1514 = ^TServerInfo1514;
  1326.   _SERVER_INFO_1514 = record
  1327.     sv1514_enablesoftcompat: BOOL;
  1328.   end;
  1329.   {$EXTERNALSYM _SERVER_INFO_1514}
  1330.   TServerInfo1514 = _SERVER_INFO_1514;
  1331.   SERVER_INFO_1514 = _SERVER_INFO_1514;
  1332.   {$EXTERNALSYM SERVER_INFO_1514}
  1334.   PServerInfo1515 = ^TServerInfo1515;
  1335.   _SERVER_INFO_1515 = record
  1336.     sv1515_enableforcedlogoff: BOOL;
  1337.   end;
  1338.   {$EXTERNALSYM _SERVER_INFO_1515}
  1339.   TServerInfo1515 = _SERVER_INFO_1515;
  1340.   SERVER_INFO_1515 = _SERVER_INFO_1515;
  1341.   {$EXTERNALSYM SERVER_INFO_1515}
  1343.   PServerInfo1516 = ^TServerInfo1516;
  1344.   _SERVER_INFO_1516 = record
  1345.     sv1516_timesource: BOOL;
  1346.   end;
  1347.   {$EXTERNALSYM _SERVER_INFO_1516}
  1348.   TServerInfo1516 = _SERVER_INFO_1516;
  1349.   SERVER_INFO_1516 = _SERVER_INFO_1516;
  1350.   {$EXTERNALSYM SERVER_INFO_1516}
  1352.   PServerInfo1518 = ^TServerInfo1518;
  1353.   _SERVER_INFO_1518 = record
  1354.     sv1518_lmannounce: BOOL;
  1355.   end;
  1356.   {$EXTERNALSYM _SERVER_INFO_1518}
  1357.   TServerInfo1518 = _SERVER_INFO_1518;
  1358.   SERVER_INFO_1518 = _SERVER_INFO_1518;
  1359.   {$EXTERNALSYM SERVER_INFO_1518}
  1361.   PServerInfo1520 = ^TServerInfo1520;
  1362.   _SERVER_INFO_1520 = record
  1363.     sv1520_maxcopyreadlen: DWORD;
  1364.   end;
  1365.   {$EXTERNALSYM _SERVER_INFO_1520}
  1366.   TServerInfo1520 = _SERVER_INFO_1520;
  1367.   SERVER_INFO_1520 = _SERVER_INFO_1520;
  1368.   {$EXTERNALSYM SERVER_INFO_1520}
  1370.   PServerInfo1521 = ^TServerInfo1521;
  1371.   _SERVER_INFO_1521 = record
  1372.     sv1521_maxcopywritelen: DWORD;
  1373.   end;
  1374.   {$EXTERNALSYM _SERVER_INFO_1521}
  1375.   TServerInfo1521 = _SERVER_INFO_1521;
  1376.   SERVER_INFO_1521 = _SERVER_INFO_1521;
  1377.   {$EXTERNALSYM SERVER_INFO_1521}
  1379.   PServerInfo1522 = ^TServerInfo1522;
  1380.   _SERVER_INFO_1522 = record
  1381.     sv1522_minkeepsearch: DWORD;
  1382.   end;
  1383.   {$EXTERNALSYM _SERVER_INFO_1522}
  1384.   TServerInfo1522 = _SERVER_INFO_1522;
  1385.   SERVER_INFO_1522 = _SERVER_INFO_1522;
  1386.   {$EXTERNALSYM SERVER_INFO_1522}
  1388.   PServerInfo1523 = ^TServerInfo1523;
  1389.   _SERVER_INFO_1523 = record
  1390.     sv1523_maxkeepsearch: DWORD;
  1391.   end;
  1392.   {$EXTERNALSYM _SERVER_INFO_1523}
  1393.   TServerInfo1523 = _SERVER_INFO_1523;
  1394.   SERVER_INFO_1523 = _SERVER_INFO_1523;
  1395.   {$EXTERNALSYM SERVER_INFO_1523}
  1397.   PServerInfo1524 = ^TServerInfo1524;
  1398.   _SERVER_INFO_1524 = record
  1399.     sv1524_minkeepcomplsearch: DWORD;
  1400.   end;
  1401.   {$EXTERNALSYM _SERVER_INFO_1524}
  1402.   TServerInfo1524 = _SERVER_INFO_1524;
  1403.   SERVER_INFO_1524 = _SERVER_INFO_1524;
  1404.   {$EXTERNALSYM SERVER_INFO_1524}
  1406.   PServerInfo1525 = ^TServerInfo1525;
  1407.   _SERVER_INFO_1525 = record
  1408.     sv1525_maxkeepcomplsearch: DWORD;
  1409.   end;
  1410.   {$EXTERNALSYM _SERVER_INFO_1525}
  1411.   TServerInfo1525 = _SERVER_INFO_1525;
  1412.   SERVER_INFO_1525 = _SERVER_INFO_1525;
  1413.   {$EXTERNALSYM SERVER_INFO_1525}
  1415.   PServerInfo1528 = ^TServerInfo1528;
  1416.   _SERVER_INFO_1528 = record
  1417.     sv1528_scavtimeout: DWORD;
  1418.   end;
  1419.   {$EXTERNALSYM _SERVER_INFO_1528}
  1420.   TServerInfo1528 = _SERVER_INFO_1528;
  1421.   SERVER_INFO_1528 = _SERVER_INFO_1528;
  1422.   {$EXTERNALSYM SERVER_INFO_1528}
  1424.   PServerInfo1529 = ^TServerInfo1529;
  1425.   _SERVER_INFO_1529 = record
  1426.     sv1529_minrcvqueue: DWORD;
  1427.   end;
  1428.   {$EXTERNALSYM _SERVER_INFO_1529}
  1429.   TServerInfo1529 = _SERVER_INFO_1529;
  1430.   SERVER_INFO_1529 = _SERVER_INFO_1529;
  1431.   {$EXTERNALSYM SERVER_INFO_1529}
  1433.   PServerInfo1530 = ^TServerInfo1530;
  1434.   _SERVER_INFO_1530 = record
  1435.     sv1530_minfreeworkitems: DWORD;
  1436.   end;
  1437.   {$EXTERNALSYM _SERVER_INFO_1530}
  1438.   TServerInfo1530 = _SERVER_INFO_1530;
  1439.   SERVER_INFO_1530 = _SERVER_INFO_1530;
  1440.   {$EXTERNALSYM SERVER_INFO_1530}
  1442.   PServerInfo1533 = ^TServerInfo1533;
  1443.   _SERVER_INFO_1533 = record
  1444.     sv1533_maxmpxct: DWORD;
  1445.   end;
  1446.   {$EXTERNALSYM _SERVER_INFO_1533}
  1447.   TServerInfo1533 = _SERVER_INFO_1533;
  1448.   SERVER_INFO_1533 = _SERVER_INFO_1533;
  1449.   {$EXTERNALSYM SERVER_INFO_1533}
  1451.   PServerInfo1534 = ^TServerInfo1534;
  1452.   _SERVER_INFO_1534 = record
  1453.     sv1534_oplockbreakwait: DWORD;
  1454.   end;
  1455.   {$EXTERNALSYM _SERVER_INFO_1534}
  1456.   TServerInfo1534 = _SERVER_INFO_1534;
  1457.   SERVER_INFO_1534 = _SERVER_INFO_1534;
  1458.   {$EXTERNALSYM SERVER_INFO_1534}
  1460.   PServerInfo1535 = ^TServerInfo1535;
  1461.   _SERVER_INFO_1535 = record
  1462.     sv1535_oplockbreakresponsewait: DWORD;
  1463.   end;
  1464.   {$EXTERNALSYM _SERVER_INFO_1535}
  1465.   TServerInfo1535 = _SERVER_INFO_1535;
  1466.   SERVER_INFO_1535 = _SERVER_INFO_1535;
  1467.   {$EXTERNALSYM SERVER_INFO_1535}
  1469.   PServerInfo1536 = ^TServerInfo1536;
  1470.   _SERVER_INFO_1536 = record
  1471.     sv1536_enableoplocks: BOOL;
  1472.   end;
  1473.   {$EXTERNALSYM _SERVER_INFO_1536}
  1474.   TServerInfo1536 = _SERVER_INFO_1536;
  1475.   SERVER_INFO_1536 = _SERVER_INFO_1536;
  1476.   {$EXTERNALSYM SERVER_INFO_1536}
  1478.   PServerInfo1537 = ^TServerInfo1537;
  1479.   _SERVER_INFO_1537 = record
  1480.     sv1537_enableoplockforceclose: BOOL;
  1481.   end;
  1482.   {$EXTERNALSYM _SERVER_INFO_1537}
  1483.   TServerInfo1537 = _SERVER_INFO_1537;
  1484.   SERVER_INFO_1537 = _SERVER_INFO_1537;
  1485.   {$EXTERNALSYM SERVER_INFO_1537}
  1487.   PServerInfo1538 = ^TServerInfo1538;
  1488.   _SERVER_INFO_1538 = record
  1489.     sv1538_enablefcbopens: BOOL;
  1490.   end;
  1491.   {$EXTERNALSYM _SERVER_INFO_1538}
  1492.   TServerInfo1538 = _SERVER_INFO_1538;
  1493.   SERVER_INFO_1538 = _SERVER_INFO_1538;
  1494.   {$EXTERNALSYM SERVER_INFO_1538}
  1496.   PServerInfo1539 = ^TServerInfo1539;
  1497.   _SERVER_INFO_1539 = record
  1498.     sv1539_enableraw: BOOL;
  1499.   end;
  1500.   {$EXTERNALSYM _SERVER_INFO_1539}
  1501.   TServerInfo1539 = _SERVER_INFO_1539;
  1502.   SERVER_INFO_1539 = _SERVER_INFO_1539;
  1503.   {$EXTERNALSYM SERVER_INFO_1539}
  1505.   PServerInfo1540 = ^TServerInfo1540;
  1506.   _SERVER_INFO_1540 = record
  1507.     sv1540_enablesharednetdrives: BOOL;
  1508.   end;
  1509.   {$EXTERNALSYM _SERVER_INFO_1540}
  1510.   TServerInfo1540 = _SERVER_INFO_1540;
  1511.   SERVER_INFO_1540 = _SERVER_INFO_1540;
  1512.   {$EXTERNALSYM SERVER_INFO_1540}
  1514.   PServerInfo1541 = ^TServerInfo1541;
  1515.   _SERVER_INFO_1541 = record
  1516.     sv1541_minfreeconnections: BOOL;
  1517.   end;
  1518.   {$EXTERNALSYM _SERVER_INFO_1541}
  1519.   TServerInfo1541 = _SERVER_INFO_1541;
  1520.   SERVER_INFO_1541 = _SERVER_INFO_1541;
  1521.   {$EXTERNALSYM SERVER_INFO_1541}
  1523.   PServerInfo1542 = ^TServerInfo1542;
  1524.   _SERVER_INFO_1542 = record
  1525.     sv1542_maxfreeconnections: BOOL;
  1526.   end;
  1527.   {$EXTERNALSYM _SERVER_INFO_1542}
  1528.   TServerInfo1542 = _SERVER_INFO_1542;
  1529.   SERVER_INFO_1542 = _SERVER_INFO_1542;
  1530.   {$EXTERNALSYM SERVER_INFO_1542}
  1532.   PServerInfo1543 = ^TServerInfo1543;
  1533.   _SERVER_INFO_1543 = record
  1534.     sv1543_initsesstable: DWORD;
  1535.   end;
  1536.   {$EXTERNALSYM _SERVER_INFO_1543}
  1537.   TServerInfo1543 = _SERVER_INFO_1543;
  1538.   SERVER_INFO_1543 = _SERVER_INFO_1543;
  1539.   {$EXTERNALSYM SERVER_INFO_1543}
  1541.   PServerInfo1544 = ^TServerInfo1544;
  1542.   _SERVER_INFO_1544 = record
  1543.     sv1544_initconntable: DWORD;
  1544.   end;
  1545.   {$EXTERNALSYM _SERVER_INFO_1544}
  1546.   TServerInfo1544 = _SERVER_INFO_1544;
  1547.   SERVER_INFO_1544 = _SERVER_INFO_1544;
  1548.   {$EXTERNALSYM SERVER_INFO_1544}
  1550.   PServerInfo1545 = ^TServerInfo1545;
  1551.   _SERVER_INFO_1545 = record
  1552.     sv1545_initfiletable: DWORD;
  1553.   end;
  1554.   {$EXTERNALSYM _SERVER_INFO_1545}
  1555.   TServerInfo1545 = _SERVER_INFO_1545;
  1556.   SERVER_INFO_1545 = _SERVER_INFO_1545;
  1557.   {$EXTERNALSYM SERVER_INFO_1545}
  1559.   PServerInfo1546 = ^TServerInfo1546;
  1560.   _SERVER_INFO_1546 = record
  1561.     sv1546_initsearchtable: DWORD;
  1562.   end;
  1563.   {$EXTERNALSYM _SERVER_INFO_1546}
  1564.   TServerInfo1546 = _SERVER_INFO_1546;
  1565.   SERVER_INFO_1546 = _SERVER_INFO_1546;
  1566.   {$EXTERNALSYM SERVER_INFO_1546}
  1568.   PServerInfo1547 = ^TServerInfo1547;
  1569.   _SERVER_INFO_1547 = record
  1570.     sv1547_alertschedule: DWORD;
  1571.   end;
  1572.   {$EXTERNALSYM _SERVER_INFO_1547}
  1573.   TServerInfo1547 = _SERVER_INFO_1547;
  1574.   SERVER_INFO_1547 = _SERVER_INFO_1547;
  1575.   {$EXTERNALSYM SERVER_INFO_1547}
  1577.   PServerInfo1548 = ^TServerInfo1548;
  1578.   _SERVER_INFO_1548 = record
  1579.     sv1548_errorthreshold: DWORD;
  1580.   end;
  1581.   {$EXTERNALSYM _SERVER_INFO_1548}
  1582.   TServerInfo1548 = _SERVER_INFO_1548;
  1583.   SERVER_INFO_1548 = _SERVER_INFO_1548;
  1584.   {$EXTERNALSYM SERVER_INFO_1548}
  1586.   PServerInfo1549 = ^TServerInfo1549;
  1587.   _SERVER_INFO_1549 = record
  1588.     sv1549_networkerrorthreshold: DWORD;
  1589.   end;
  1590.   {$EXTERNALSYM _SERVER_INFO_1549}
  1591.   TServerInfo1549 = _SERVER_INFO_1549;
  1592.   SERVER_INFO_1549 = _SERVER_INFO_1549;
  1593.   {$EXTERNALSYM SERVER_INFO_1549}
  1595.   PServerInfo1550 = ^TServerInfo1550;
  1596.   _SERVER_INFO_1550 = record
  1597.     sv1550_diskspacethreshold: DWORD;
  1598.   end;
  1599.   {$EXTERNALSYM _SERVER_INFO_1550}
  1600.   TServerInfo1550 = _SERVER_INFO_1550;
  1601.   SERVER_INFO_1550 = _SERVER_INFO_1550;
  1602.   {$EXTERNALSYM SERVER_INFO_1550}
  1604.   PServerInfo1552 = ^TServerInfo1552;
  1605.   _SERVER_INFO_1552 = record
  1606.     sv1552_maxlinkdelay: DWORD;
  1607.   end;
  1608.   {$EXTERNALSYM _SERVER_INFO_1552}
  1609.   TServerInfo1552 = _SERVER_INFO_1552;
  1610.   SERVER_INFO_1552 = _SERVER_INFO_1552;
  1611.   {$EXTERNALSYM SERVER_INFO_1552}
  1613.   PServerInfo1553 = ^TServerInfo1553;
  1614.   _SERVER_INFO_1553 = record
  1615.     sv1553_minlinkthroughput: DWORD;
  1616.   end;
  1617.   {$EXTERNALSYM _SERVER_INFO_1553}
  1618.   TServerInfo1553 = _SERVER_INFO_1553;
  1619.   SERVER_INFO_1553 = _SERVER_INFO_1553;
  1620.   {$EXTERNALSYM SERVER_INFO_1553}
  1622.   PServerInfo1554 = ^TServerInfo1554;
  1623.   _SERVER_INFO_1554 = record
  1624.     sv1554_linkinfovalidtime: DWORD;
  1625.   end;
  1626.   {$EXTERNALSYM _SERVER_INFO_1554}
  1627.   TServerInfo1554 = _SERVER_INFO_1554;
  1628.   SERVER_INFO_1554 = _SERVER_INFO_1554;
  1629.   {$EXTERNALSYM SERVER_INFO_1554}
  1631.   PServerInfo1555 = ^TServerInfo1555;
  1632.   _SERVER_INFO_1555 = record
  1633.     sv1555_scavqosinfoupdatetime: DWORD;
  1634.   end;
  1635.   {$EXTERNALSYM _SERVER_INFO_1555}
  1636.   TServerInfo1555 = _SERVER_INFO_1555;
  1637.   SERVER_INFO_1555 = _SERVER_INFO_1555;
  1638.   {$EXTERNALSYM SERVER_INFO_1555}
  1640.   PServerInfo1556 = ^TServerInfo1556;
  1641.   _SERVER_INFO_1556 = record
  1642.     sv1556_maxworkitemidletime: DWORD;
  1643.   end;
  1644.   {$EXTERNALSYM _SERVER_INFO_1556}
  1645.   TServerInfo1556 = _SERVER_INFO_1556;
  1646.   SERVER_INFO_1556 = _SERVER_INFO_1556;
  1647.   {$EXTERNALSYM SERVER_INFO_1556}
  1649.   PServerInfo1557 = ^TServerInfo1557;
  1650.   _SERVER_INFO_1557 = record
  1651.     sv1557_maxrawworkitems: DWORD;
  1652.   end;
  1653.   {$EXTERNALSYM _SERVER_INFO_1557}
  1654.   TServerInfo1557 = _SERVER_INFO_1557;
  1655.   SERVER_INFO_1557 = _SERVER_INFO_1557;
  1656.   {$EXTERNALSYM SERVER_INFO_1557}
  1658.   PServerInfo1560 = ^TServerInfo1560;
  1659.   _SERVER_INFO_1560 = record
  1660.     sv1560_producttype: DWORD;
  1661.   end;
  1662.   {$EXTERNALSYM _SERVER_INFO_1560}
  1663.   TServerInfo1560 = _SERVER_INFO_1560;
  1664.   SERVER_INFO_1560 = _SERVER_INFO_1560;
  1665.   {$EXTERNALSYM SERVER_INFO_1560}
  1667.   PServerInfo1561 = ^TServerInfo1561;
  1668.   _SERVER_INFO_1561 = record
  1669.     sv1561_serversize: DWORD;
  1670.   end;
  1671.   {$EXTERNALSYM _SERVER_INFO_1561}
  1672.   TServerInfo1561 = _SERVER_INFO_1561;
  1673.   SERVER_INFO_1561 = _SERVER_INFO_1561;
  1674.   {$EXTERNALSYM SERVER_INFO_1561}
  1676.   PServerInfo1562 = ^TServerInfo1562;
  1677.   _SERVER_INFO_1562 = record
  1678.     sv1562_connectionlessautodisc: DWORD;
  1679.   end;
  1680.   {$EXTERNALSYM _SERVER_INFO_1562}
  1681.   TServerInfo1562 = _SERVER_INFO_1562;
  1682.   SERVER_INFO_1562 = _SERVER_INFO_1562;
  1683.   {$EXTERNALSYM SERVER_INFO_1562}
  1685.   PServerInfo1563 = ^TServerInfo1563;
  1686.   _SERVER_INFO_1563 = record
  1687.     sv1563_sharingviolationretries: DWORD;
  1688.   end;
  1689.   {$EXTERNALSYM _SERVER_INFO_1563}
  1690.   TServerInfo1563 = _SERVER_INFO_1563;
  1691.   SERVER_INFO_1563 = _SERVER_INFO_1563;
  1692.   {$EXTERNALSYM SERVER_INFO_1563}
  1694.   PServerInfo1564 = ^TServerInfo1564;
  1695.   _SERVER_INFO_1564 = record
  1696.     sv1564_sharingviolationdelay: DWORD;
  1697.   end;
  1698.   {$EXTERNALSYM _SERVER_INFO_1564}
  1699.   TServerInfo1564 = _SERVER_INFO_1564;
  1700.   SERVER_INFO_1564 = _SERVER_INFO_1564;
  1701.   {$EXTERNALSYM SERVER_INFO_1564}
  1703.   PServerInfo1565 = ^TServerInfo1565;
  1704.   _SERVER_INFO_1565 = record
  1705.     sv1565_maxglobalopensearch: DWORD;
  1706.   end;
  1707.   {$EXTERNALSYM _SERVER_INFO_1565}
  1708.   TServerInfo1565 = _SERVER_INFO_1565;
  1709.   SERVER_INFO_1565 = _SERVER_INFO_1565;
  1710.   {$EXTERNALSYM SERVER_INFO_1565}
  1712.   PServerInfo1566 = ^TServerInfo1566;
  1713.   _SERVER_INFO_1566 = record
  1714.     sv1566_removeduplicatesearches: BOOL;
  1715.   end;
  1716.   {$EXTERNALSYM _SERVER_INFO_1566}
  1717.   TServerInfo1566 = _SERVER_INFO_1566;
  1718.   SERVER_INFO_1566 = _SERVER_INFO_1566;
  1719.   {$EXTERNALSYM SERVER_INFO_1566}
  1721.   PServerInfo1567 = ^TServerInfo1567;
  1722.   _SERVER_INFO_1567 = record
  1723.     sv1567_lockviolationretries: DWORD;
  1724.   end;
  1725.   {$EXTERNALSYM _SERVER_INFO_1567}
  1726.   TServerInfo1567 = _SERVER_INFO_1567;
  1727.   SERVER_INFO_1567 = _SERVER_INFO_1567;
  1728.   {$EXTERNALSYM SERVER_INFO_1567}
  1730.   PServerInfo1568 = ^TServerInfo1568;
  1731.   _SERVER_INFO_1568 = record
  1732.     sv1568_lockviolationoffset: DWORD;
  1733.   end;
  1734.   {$EXTERNALSYM _SERVER_INFO_1568}
  1735.   TServerInfo1568 = _SERVER_INFO_1568;
  1736.   SERVER_INFO_1568 = _SERVER_INFO_1568;
  1737.   {$EXTERNALSYM SERVER_INFO_1568}
  1739.   PServerInfo1569 = ^TServerInfo1569;
  1740.   _SERVER_INFO_1569 = record
  1741.     sv1569_lockviolationdelay: DWORD;
  1742.   end;
  1743.   {$EXTERNALSYM _SERVER_INFO_1569}
  1744.   TServerInfo1569 = _SERVER_INFO_1569;
  1745.   SERVER_INFO_1569 = _SERVER_INFO_1569;
  1746.   {$EXTERNALSYM SERVER_INFO_1569}
  1748.   PServerInfo1570 = ^TServerInfo1570;
  1749.   _SERVER_INFO_1570 = record
  1750.     sv1570_mdlreadswitchover: DWORD;
  1751.   end;
  1752.   {$EXTERNALSYM _SERVER_INFO_1570}
  1753.   TServerInfo1570 = _SERVER_INFO_1570;
  1754.   SERVER_INFO_1570 = _SERVER_INFO_1570;
  1755.   {$EXTERNALSYM SERVER_INFO_1570}
  1757.   PServerInfo1571 = ^TServerInfo1571;
  1758.   _SERVER_INFO_1571 = record
  1759.     sv1571_cachedopenlimit: DWORD;
  1760.   end;
  1761.   {$EXTERNALSYM _SERVER_INFO_1571}
  1762.   TServerInfo1571 = _SERVER_INFO_1571;
  1763.   SERVER_INFO_1571 = _SERVER_INFO_1571;
  1764.   {$EXTERNALSYM SERVER_INFO_1571}
  1766.   PServerInfo1572 = ^TServerInfo1572;
  1767.   _SERVER_INFO_1572 = record
  1768.     sv1572_criticalthreads: DWORD;
  1769.   end;
  1770.   {$EXTERNALSYM _SERVER_INFO_1572}
  1771.   TServerInfo1572 = _SERVER_INFO_1572;
  1772.   SERVER_INFO_1572 = _SERVER_INFO_1572;
  1773.   {$EXTERNALSYM SERVER_INFO_1572}
  1775.   PServerInfo1573 = ^TServerInfo1573;
  1776.   _SERVER_INFO_1573 = record
  1777.     sv1573_restrictnullsessaccess: DWORD;
  1778.   end;
  1779.   {$EXTERNALSYM _SERVER_INFO_1573}
  1780.   TServerInfo1573 = _SERVER_INFO_1573;
  1781.   SERVER_INFO_1573 = _SERVER_INFO_1573;
  1782.   {$EXTERNALSYM SERVER_INFO_1573}
  1784.   PServerInfo1574 = ^TServerInfo1574;
  1785.   _SERVER_INFO_1574 = record
  1786.     sv1574_enablewfw311directipx: DWORD;
  1787.   end;
  1788.   {$EXTERNALSYM _SERVER_INFO_1574}
  1789.   TServerInfo1574 = _SERVER_INFO_1574;
  1790.   SERVER_INFO_1574 = _SERVER_INFO_1574;
  1791.   {$EXTERNALSYM SERVER_INFO_1574}
  1793.   PServerInfo1575 = ^TServerInfo1575;
  1794.   _SERVER_INFO_1575 = record
  1795.     sv1575_otherqueueaffinity: DWORD;
  1796.   end;
  1797.   {$EXTERNALSYM _SERVER_INFO_1575}
  1798.   TServerInfo1575 = _SERVER_INFO_1575;
  1799.   SERVER_INFO_1575 = _SERVER_INFO_1575;
  1800.   {$EXTERNALSYM SERVER_INFO_1575}
  1802.   PServerInfo1576 = ^TServerInfo1576;
  1803.   _SERVER_INFO_1576 = record
  1804.     sv1576_queuesamplesecs: DWORD;
  1805.   end;
  1806.   {$EXTERNALSYM _SERVER_INFO_1576}
  1807.   TServerInfo1576 = _SERVER_INFO_1576;
  1808.   SERVER_INFO_1576 = _SERVER_INFO_1576;
  1809.   {$EXTERNALSYM SERVER_INFO_1576}
  1811.   PServerInfo1577 = ^TServerInfo1577;
  1812.   _SERVER_INFO_1577 = record
  1813.     sv1577_balancecount: DWORD;
  1814.   end;
  1815.   {$EXTERNALSYM _SERVER_INFO_1577}
  1816.   TServerInfo1577 = _SERVER_INFO_1577;
  1817.   SERVER_INFO_1577 = _SERVER_INFO_1577;
  1818.   {$EXTERNALSYM SERVER_INFO_1577}
  1820.   PServerInfo1578 = ^TServerInfo1578;
  1821.   _SERVER_INFO_1578 = record
  1822.     sv1578_preferredaffinity: DWORD;
  1823.   end;
  1824.   {$EXTERNALSYM _SERVER_INFO_1578}
  1825.   TServerInfo1578 = _SERVER_INFO_1578;
  1826.   SERVER_INFO_1578 = _SERVER_INFO_1578;
  1827.   {$EXTERNALSYM SERVER_INFO_1578}
  1829.   PServerInfo1579 = ^TServerInfo1579;
  1830.   _SERVER_INFO_1579 = record
  1831.     sv1579_maxfreerfcbs: DWORD;
  1832.   end;
  1833.   {$EXTERNALSYM _SERVER_INFO_1579}
  1834.   TServerInfo1579 = _SERVER_INFO_1579;
  1835.   SERVER_INFO_1579 = _SERVER_INFO_1579;
  1836.   {$EXTERNALSYM SERVER_INFO_1579}
  1838.   PServerInfo1580 = ^TServerInfo1580;
  1839.   _SERVER_INFO_1580 = record
  1840.     sv1580_maxfreemfcbs: DWORD;
  1841.   end;
  1842.   {$EXTERNALSYM _SERVER_INFO_1580}
  1843.   TServerInfo1580 = _SERVER_INFO_1580;
  1844.   SERVER_INFO_1580 = _SERVER_INFO_1580;
  1845.   {$EXTERNALSYM SERVER_INFO_1580}
  1847.   PServerInfo1581 = ^TServerInfo1581;
  1848.   _SERVER_INFO_1581 = record
  1849.     sv1581_maxfreemlcbs: DWORD;
  1850.   end;
  1851.   {$EXTERNALSYM _SERVER_INFO_1581}
  1852.   TServerInfo1581 = _SERVER_INFO_1581;
  1853.   SERVER_INFO_1581 = _SERVER_INFO_1581;
  1854.   {$EXTERNALSYM SERVER_INFO_1581}
  1856.   PServerInfo1582 = ^TServerInfo1582;
  1857.   _SERVER_INFO_1582 = record
  1858.     sv1582_maxfreepagedpoolchunks: DWORD;
  1859.   end;
  1860.   {$EXTERNALSYM _SERVER_INFO_1582}
  1861.   TServerInfo1582 = _SERVER_INFO_1582;
  1862.   SERVER_INFO_1582 = _SERVER_INFO_1582;
  1863.   {$EXTERNALSYM SERVER_INFO_1582}
  1865.   PServerInfo1583 = ^TServerInfo1583;
  1866.   _SERVER_INFO_1583 = record
  1867.     sv1583_minpagedpoolchunksize: DWORD;
  1868.   end;
  1869.   {$EXTERNALSYM _SERVER_INFO_1583}
  1870.   TServerInfo1583 = _SERVER_INFO_1583;
  1871.   SERVER_INFO_1583 = _SERVER_INFO_1583;
  1872.   {$EXTERNALSYM SERVER_INFO_1583}
  1874.   PServerInfo1584 = ^TServerInfo1584;
  1875.   _SERVER_INFO_1584 = record
  1876.     sv1584_maxpagedpoolchunksize: DWORD;
  1877.   end;
  1878.   {$EXTERNALSYM _SERVER_INFO_1584}
  1879.   TServerInfo1584 = _SERVER_INFO_1584;
  1880.   SERVER_INFO_1584 = _SERVER_INFO_1584;
  1881.   {$EXTERNALSYM SERVER_INFO_1584}
  1883.   PServerInfo1585 = ^TServerInfo1585;
  1884.   _SERVER_INFO_1585 = record
  1885.     sv1585_sendsfrompreferredprocessor: BOOL;
  1886.   end;
  1887.   {$EXTERNALSYM _SERVER_INFO_1585}
  1888.   TServerInfo1585 = _SERVER_INFO_1585;
  1889.   SERVER_INFO_1585 = _SERVER_INFO_1585;
  1890.   {$EXTERNALSYM SERVER_INFO_1585}
  1892.   PServerInfo1586 = ^TServerInfo1586;
  1893.   _SERVER_INFO_1586 = record
  1894.     sv1586_maxthreadsperqueue: DWORD;
  1895.   end;
  1896.   {$EXTERNALSYM _SERVER_INFO_1586}
  1897.   TServerInfo1586 = _SERVER_INFO_1586;
  1898.   SERVER_INFO_1586 = _SERVER_INFO_1586;
  1899.   {$EXTERNALSYM SERVER_INFO_1586}
  1901.   PServerInfo1587 = ^TServerInfo1587;
  1902.   _SERVER_INFO_1587 = record
  1903.     sv1587_cacheddirectorylimit: DWORD;
  1904.   end;
  1905.   {$EXTERNALSYM _SERVER_INFO_1587}
  1906.   TServerInfo1587 = _SERVER_INFO_1587;
  1907.   SERVER_INFO_1587 = _SERVER_INFO_1587;
  1908.   {$EXTERNALSYM SERVER_INFO_1587}
  1910.   PServerInfo1588 = ^TServerInfo1588;
  1911.   _SERVER_INFO_1588 = record
  1912.     sv1588_maxcopylength: DWORD;
  1913.   end;
  1914.   {$EXTERNALSYM _SERVER_INFO_1588}
  1915.   TServerInfo1588 = _SERVER_INFO_1588;
  1916.   SERVER_INFO_1588 = _SERVER_INFO_1588;
  1917.   {$EXTERNALSYM SERVER_INFO_1588}
  1919.   PServerInfo1590 = ^TServerInfo1590;
  1920.   _SERVER_INFO_1590 = record
  1921.     sv1590_enablecompression: DWORD;
  1922.   end;
  1923.   {$EXTERNALSYM _SERVER_INFO_1590}
  1924.   TServerInfo1590 = _SERVER_INFO_1590;
  1925.   SERVER_INFO_1590 = _SERVER_INFO_1590;
  1926.   {$EXTERNALSYM SERVER_INFO_1590}
  1928.   PServerInfo1591 = ^TServerInfo1591;
  1929.   _SERVER_INFO_1591 = record
  1930.     sv1591_autosharewks: DWORD;
  1931.   end;
  1932.   {$EXTERNALSYM _SERVER_INFO_1591}
  1933.   TServerInfo1591 = _SERVER_INFO_1591;
  1934.   SERVER_INFO_1591 = _SERVER_INFO_1591;
  1935.   {$EXTERNALSYM SERVER_INFO_1591}
  1937.   PServerInfo1592 = ^TServerInfo1592;
  1938.   _SERVER_INFO_1592 = record
  1939.     sv1592_autosharewks: DWORD;
  1940.   end;
  1941.   {$EXTERNALSYM _SERVER_INFO_1592}
  1942.   TServerInfo1592 = _SERVER_INFO_1592;
  1943.   SERVER_INFO_1592 = _SERVER_INFO_1592;
  1944.   {$EXTERNALSYM SERVER_INFO_1592}
  1946.   PServerInfo1593 = ^TServerInfo1593;
  1947.   _SERVER_INFO_1593 = record
  1948.     sv1593_enablesecuritysignature: DWORD;
  1949.   end;
  1950.   {$EXTERNALSYM _SERVER_INFO_1593}
  1951.   TServerInfo1593 = _SERVER_INFO_1593;
  1952.   SERVER_INFO_1593 = _SERVER_INFO_1593;
  1953.   {$EXTERNALSYM SERVER_INFO_1593}
  1955.   PServerInfo1594 = ^TServerInfo1594;
  1956.   _SERVER_INFO_1594 = record
  1957.     sv1594_requiresecuritysignature: DWORD;
  1958.   end;
  1959.   {$EXTERNALSYM _SERVER_INFO_1594}
  1960.   TServerInfo1594 = _SERVER_INFO_1594;
  1961.   SERVER_INFO_1594 = _SERVER_INFO_1594;
  1962.   {$EXTERNALSYM SERVER_INFO_1594}
  1964.   PServerInfo1595 = ^TServerInfo1595;
  1965.   _SERVER_INFO_1595 = record
  1966.     sv1595_minclientbuffersize: DWORD;
  1967.   end;
  1968.   {$EXTERNALSYM _SERVER_INFO_1595}
  1969.   TServerInfo1595 = _SERVER_INFO_1595;
  1970.   SERVER_INFO_1595 = _SERVER_INFO_1595;
  1971.   {$EXTERNALSYM SERVER_INFO_1595}
  1973.   PServerInfo1596 = ^TServerInfo1596;
  1974.   _SERVER_INFO_1596 = record
  1975.     sv1596_ConnectionNoSessionsTimeout: DWORD;
  1976.   end;
  1977.   {$EXTERNALSYM _SERVER_INFO_1596}
  1978.   TServerInfo1596 = _SERVER_INFO_1596;
  1979.   SERVER_INFO_1596 = _SERVER_INFO_1596;
  1980.   {$EXTERNALSYM SERVER_INFO_1596}
  1982.   PServerInfo1597 = ^TServerInfo1597;
  1983.   _SERVER_INFO_1597 = record
  1984.     sv1597_IdleThreadTimeOut: DWORD;
  1985.   end;
  1986.   {$EXTERNALSYM _SERVER_INFO_1597}
  1987.   TServerInfo1597 = _SERVER_INFO_1597;
  1988.   SERVER_INFO_1597 = _SERVER_INFO_1597;
  1989.   {$EXTERNALSYM SERVER_INFO_1597}
  1991.   PServerInfo1598 = ^TServerInfo1598;
  1992.   _SERVER_INFO_1598 = record
  1993.     sv1598_enableW9xsecuritysignature: DWORD;
  1994.   end;
  1995.   {$EXTERNALSYM _SERVER_INFO_1598}
  1996.   TServerInfo1598 = _SERVER_INFO_1598;
  1997.   SERVER_INFO_1598 = _SERVER_INFO_1598;
  1998.   {$EXTERNALSYM SERVER_INFO_1598}
  2000. // A special structure definition is required in order for this
  2001. // structure to work with RPC.  The problem is that having addresslength
  2002. // indicate the number of bytes in address means that RPC must know the
  2003. // link between the two.
  2005.   PServerTransportInfo0 = ^TServerTransportInfo0;
  2006.   _SERVER_TRANSPORT_INFO_0 = record
  2007.     svti0_numberofvcs: DWORD;
  2008.     svti0_transportname: LPWSTR;
  2009.     svti0_transportaddress: Pointer;
  2010.     svti0_transportaddresslength: DWORD;
  2011.     svti0_networkaddress: LPWSTR;
  2012.   end;
  2013.   {$EXTERNALSYM _SERVER_TRANSPORT_INFO_0}
  2014.   TServerTransportInfo0 = _SERVER_TRANSPORT_INFO_0;
  2015.   SERVER_TRANSPORT_INFO_0 = _SERVER_TRANSPORT_INFO_0;
  2016.   {$EXTERNALSYM SERVER_TRANSPORT_INFO_0}
  2018.   PServerTransportInfo1 = ^TServerTransportInfo1;
  2019.   _SERVER_TRANSPORT_INFO_1 = record
  2020.     svti1_numberofvcs: DWORD;
  2021.     svti1_transportname: LPWSTR;
  2022.     svti1_transportaddress: Pointer;
  2023.     svti1_transportaddresslength: DWORD;
  2024.     svti1_networkaddress: LPWSTR;
  2025.     svti1_domain: LPWSTR;
  2026.   end;
  2027.   {$EXTERNALSYM _SERVER_TRANSPORT_INFO_1}
  2028.   TServerTransportInfo1 = _SERVER_TRANSPORT_INFO_1;
  2029.   SERVER_TRANSPORT_INFO_1 = _SERVER_TRANSPORT_INFO_1;
  2030.   {$EXTERNALSYM SERVER_TRANSPORT_INFO_1}
  2032.   PServerTransportInfo2 = ^TServerTransportInfo2;
  2033.   _SERVER_TRANSPORT_INFO_2 = record
  2034.     svti2_numberofvcs: DWORD;
  2035.     svti2_transportname: LPWSTR;
  2036.     svti2_transportaddress: Pointer;
  2037.     svti2_transportaddresslength: DWORD;
  2038.     svti2_networkaddress: LPWSTR;
  2039.     svti2_domain: LPWSTR;
  2040.     svti2_flags: ULONG;
  2041.   end;
  2042.   {$EXTERNALSYM _SERVER_TRANSPORT_INFO_2}
  2043.   TServerTransportInfo2 = _SERVER_TRANSPORT_INFO_2;
  2044.   SERVER_TRANSPORT_INFO_2 = _SERVER_TRANSPORT_INFO_2;
  2045.   {$EXTERNALSYM SERVER_TRANSPORT_INFO_2}
  2047.   PServerTransportInfo3 = ^TServerTransportInfo3;
  2048.   _SERVER_TRANSPORT_INFO_3 = record
  2049.     svti3_numberofvcs: DWORD;
  2050.     svti3_transportname: LPWSTR;
  2051.     svti3_transportaddress: Pointer;
  2052.     svti3_transportaddresslength: DWORD;
  2053.     svti3_networkaddress: LPWSTR;
  2054.     svti3_domain: LPWSTR;
  2055.     svti3_flags: ULONG;
  2056.     svti3_passwordlength: DWORD;
  2057.     svti3_password: packed array[0..255] of Byte;
  2058.   end;
  2059.   {$EXTERNALSYM _SERVER_TRANSPORT_INFO_3}
  2060.   TServerTransportInfo3 = _SERVER_TRANSPORT_INFO_3;
  2061.   SERVER_TRANSPORT_INFO_3 = _SERVER_TRANSPORT_INFO_3;
  2062.   {$EXTERNALSYM SERVER_TRANSPORT_INFO_3}
  2064. // Defines - SERVER
  2066. // The platform ID indicates the levels to use for platform-specific
  2067. // information.
  2069. const
  2070.   SV_PLATFORM_ID_OS2 = 400;
  2071.   {$EXTERNALSYM SV_PLATFORM_ID_OS2}
  2072.   SV_PLATFORM_ID_NT  = 500;
  2073.   {$EXTERNALSYM SV_PLATFORM_ID_NT}
  2075. // Mask to be applied to svX_version_major in order to obtain
  2076. // the major version number.
  2078.   MAJOR_VERSION_MASK  = $0F;
  2079.   {$EXTERNALSYM MAJOR_VERSION_MASK}
  2081. // Bit-mapped values for svX_type fields. X = 1, 2 or 3.
  2083.   SV_TYPE_WORKSTATION         = $00000001;
  2084.   {$EXTERNALSYM SV_TYPE_WORKSTATION}
  2085.   SV_TYPE_SERVER              = $00000002;
  2086.   {$EXTERNALSYM SV_TYPE_SERVER}
  2087.   SV_TYPE_SQLSERVER           = $00000004;
  2088.   {$EXTERNALSYM SV_TYPE_SQLSERVER}
  2089.   SV_TYPE_DOMAIN_CTRL         = $00000008;
  2090.   {$EXTERNALSYM SV_TYPE_DOMAIN_CTRL}
  2091.   SV_TYPE_DOMAIN_BAKCTRL      = $00000010;
  2092.   {$EXTERNALSYM SV_TYPE_DOMAIN_BAKCTRL}
  2093.   SV_TYPE_TIME_SOURCE         = $00000020;
  2094.   {$EXTERNALSYM SV_TYPE_TIME_SOURCE}
  2095.   SV_TYPE_AFP                 = $00000040;
  2096.   {$EXTERNALSYM SV_TYPE_AFP}
  2097.   SV_TYPE_NOVELL              = $00000080;
  2098.   {$EXTERNALSYM SV_TYPE_NOVELL}
  2099.   SV_TYPE_DOMAIN_MEMBER       = $00000100;
  2100.   {$EXTERNALSYM SV_TYPE_DOMAIN_MEMBER}
  2101.   SV_TYPE_PRINTQ_SERVER       = $00000200;
  2102.   {$EXTERNALSYM SV_TYPE_PRINTQ_SERVER}
  2103.   SV_TYPE_DIALIN_SERVER       = $00000400;
  2104.   {$EXTERNALSYM SV_TYPE_DIALIN_SERVER}
  2105.   SV_TYPE_XENIX_SERVER        = $00000800;
  2106.   {$EXTERNALSYM SV_TYPE_XENIX_SERVER}
  2107.   SV_TYPE_SERVER_UNIX         = SV_TYPE_XENIX_SERVER;
  2108.   {$EXTERNALSYM SV_TYPE_SERVER_UNIX}
  2109.   SV_TYPE_NT                  = $00001000;
  2110.   {$EXTERNALSYM SV_TYPE_NT}
  2111.   SV_TYPE_WFW                 = $00002000;
  2112.   {$EXTERNALSYM SV_TYPE_WFW}
  2113.   SV_TYPE_SERVER_MFPN         = $00004000;
  2114.   {$EXTERNALSYM SV_TYPE_SERVER_MFPN}
  2115.   SV_TYPE_SERVER_NT           = $00008000;
  2116.   {$EXTERNALSYM SV_TYPE_SERVER_NT}
  2117.   SV_TYPE_POTENTIAL_BROWSER   = $00010000;
  2118.   {$EXTERNALSYM SV_TYPE_POTENTIAL_BROWSER}
  2119.   SV_TYPE_BACKUP_BROWSER      = $00020000;
  2120.   {$EXTERNALSYM SV_TYPE_BACKUP_BROWSER}
  2121.   SV_TYPE_MASTER_BROWSER      = $00040000;
  2122.   {$EXTERNALSYM SV_TYPE_MASTER_BROWSER}
  2123.   SV_TYPE_DOMAIN_MASTER       = $00080000;
  2124.   {$EXTERNALSYM SV_TYPE_DOMAIN_MASTER}
  2125.   SV_TYPE_SERVER_OSF          = $00100000;
  2126.   {$EXTERNALSYM SV_TYPE_SERVER_OSF}
  2127.   SV_TYPE_SERVER_VMS          = $00200000;
  2128.   {$EXTERNALSYM SV_TYPE_SERVER_VMS}
  2129.   SV_TYPE_WINDOWS             = $00400000;  //* Windows95 and above */
  2130.   {$EXTERNALSYM SV_TYPE_WINDOWS}
  2131.   SV_TYPE_DFS                 = $00800000;  //* Root of a DFS tree */
  2132.   {$EXTERNALSYM SV_TYPE_DFS}
  2133.   SV_TYPE_CLUSTER_NT          = $01000000;  //* NT Cluster */
  2134.   {$EXTERNALSYM SV_TYPE_CLUSTER_NT}
  2135.   SV_TYPE_TERMINALSERVER      = $02000000;  //* Terminal Server(Hydra) */
  2136.   {$EXTERNALSYM SV_TYPE_TERMINALSERVER}
  2137.   SV_TYPE_DCE                 = $10000000;  //* IBM DSS (Directory and Security Services) or equivalent */
  2138.   {$EXTERNALSYM SV_TYPE_DCE}
  2139.   SV_TYPE_ALTERNATE_XPORT     = $20000000;  //* return list for alternate transport */
  2140.   {$EXTERNALSYM SV_TYPE_ALTERNATE_XPORT}
  2141.   SV_TYPE_LOCAL_LIST_ONLY     = $40000000;  //* Return local list only */
  2142.   {$EXTERNALSYM SV_TYPE_LOCAL_LIST_ONLY}
  2143.   SV_TYPE_DOMAIN_ENUM         = $80000000;
  2144.   {$EXTERNALSYM SV_TYPE_DOMAIN_ENUM}
  2145.   SV_TYPE_ALL                 = $FFFFFFFF;  //* handy for NetServerEnum2 */
  2146.   {$EXTERNALSYM SV_TYPE_ALL}
  2148. // Special value for sv102_disc that specifies infinite disconnect
  2149. // time.
  2151.   SV_NODISC           = -1;  //* No autodisconnect timeout enforced */
  2152.   {$EXTERNALSYM SV_NODISC}
  2154. // Values of svX_security field. X = 2 or 3.
  2156.   SV_USERSECURITY     = 1;
  2157.   {$EXTERNALSYM SV_USERSECURITY}
  2158.   SV_SHARESECURITY    = 0;
  2159.   {$EXTERNALSYM SV_SHARESECURITY}
  2161. // Values of svX_hidden field. X = 2 or 3.
  2163.   SV_HIDDEN       = 1;
  2164.   {$EXTERNALSYM SV_HIDDEN}
  2165.   SV_VISIBLE      = 0;
  2166.   {$EXTERNALSYM SV_VISIBLE}
  2168. // Values for ParmError parameter to NetServerSetInfo.
  2170.   SV_PLATFORM_ID_PARMNUM          = 101;
  2171.   {$EXTERNALSYM SV_PLATFORM_ID_PARMNUM}
  2172.   SV_NAME_PARMNUM                 = 102;
  2173.   {$EXTERNALSYM SV_NAME_PARMNUM}
  2174.   SV_VERSION_MAJOR_PARMNUM        = 103;
  2175.   {$EXTERNALSYM SV_VERSION_MAJOR_PARMNUM}
  2176.   SV_VERSION_MINOR_PARMNUM        = 104;
  2177.   {$EXTERNALSYM SV_VERSION_MINOR_PARMNUM}
  2178.   SV_TYPE_PARMNUM                 = 105;
  2179.   {$EXTERNALSYM SV_TYPE_PARMNUM}
  2180.   SV_COMMENT_PARMNUM              = 5;
  2181.   {$EXTERNALSYM SV_COMMENT_PARMNUM}
  2182.   SV_USERS_PARMNUM                = 107;
  2183.   {$EXTERNALSYM SV_USERS_PARMNUM}
  2184.   SV_DISC_PARMNUM                 = 10;
  2185.   {$EXTERNALSYM SV_DISC_PARMNUM}
  2186.   SV_HIDDEN_PARMNUM               = 16;
  2187.   {$EXTERNALSYM SV_HIDDEN_PARMNUM}
  2188.   SV_ANNOUNCE_PARMNUM             = 17;
  2189.   {$EXTERNALSYM SV_ANNOUNCE_PARMNUM}
  2190.   SV_ANNDELTA_PARMNUM             = 18;
  2191.   {$EXTERNALSYM SV_ANNDELTA_PARMNUM}
  2192.   SV_USERPATH_PARMNUM             = 112;
  2193.   {$EXTERNALSYM SV_USERPATH_PARMNUM}
  2195.   SV_ULIST_MTIME_PARMNUM          = 401;
  2196.   {$EXTERNALSYM SV_ULIST_MTIME_PARMNUM}
  2197.   SV_GLIST_MTIME_PARMNUM          = 402;
  2198.   {$EXTERNALSYM SV_GLIST_MTIME_PARMNUM}
  2199.   SV_ALIST_MTIME_PARMNUM          = 403;
  2200.   {$EXTERNALSYM SV_ALIST_MTIME_PARMNUM}
  2201.   SV_ALERTS_PARMNUM               = 11;
  2202.   {$EXTERNALSYM SV_ALERTS_PARMNUM}
  2203.   SV_SECURITY_PARMNUM             = 405;
  2204.   {$EXTERNALSYM SV_SECURITY_PARMNUM}
  2205.   SV_NUMADMIN_PARMNUM             = 406;
  2206.   {$EXTERNALSYM SV_NUMADMIN_PARMNUM}
  2207.   SV_LANMASK_PARMNUM              = 407;
  2208.   {$EXTERNALSYM SV_LANMASK_PARMNUM}
  2209.   SV_GUESTACC_PARMNUM             = 408;
  2210.   {$EXTERNALSYM SV_GUESTACC_PARMNUM}
  2211.   SV_CHDEVQ_PARMNUM               = 410;
  2212.   {$EXTERNALSYM SV_CHDEVQ_PARMNUM}
  2213.   SV_CHDEVJOBS_PARMNUM            = 411;
  2214.   {$EXTERNALSYM SV_CHDEVJOBS_PARMNUM}
  2215.   SV_CONNECTIONS_PARMNUM          = 412;
  2216.   {$EXTERNALSYM SV_CONNECTIONS_PARMNUM}
  2217.   SV_SHARES_PARMNUM               = 413;
  2218.   {$EXTERNALSYM SV_SHARES_PARMNUM}
  2219.   SV_OPENFILES_PARMNUM            = 414;
  2220.   {$EXTERNALSYM SV_OPENFILES_PARMNUM}
  2221.   SV_SESSREQS_PARMNUM             = 417;
  2222.   {$EXTERNALSYM SV_SESSREQS_PARMNUM}
  2223.   SV_ACTIVELOCKS_PARMNUM          = 419;
  2224.   {$EXTERNALSYM SV_ACTIVELOCKS_PARMNUM}
  2225.   SV_NUMREQBUF_PARMNUM            = 420;
  2226.   {$EXTERNALSYM SV_NUMREQBUF_PARMNUM}
  2227.   SV_NUMBIGBUF_PARMNUM            = 422;
  2228.   {$EXTERNALSYM SV_NUMBIGBUF_PARMNUM}
  2229.   SV_NUMFILETASKS_PARMNUM         = 423;
  2230.   {$EXTERNALSYM SV_NUMFILETASKS_PARMNUM}
  2231.   SV_ALERTSCHED_PARMNUM           = 37;
  2232.   {$EXTERNALSYM SV_ALERTSCHED_PARMNUM}
  2233.   SV_ERRORALERT_PARMNUM           = 38;
  2234.   {$EXTERNALSYM SV_ERRORALERT_PARMNUM}
  2235.   SV_LOGONALERT_PARMNUM           = 39;
  2236.   {$EXTERNALSYM SV_LOGONALERT_PARMNUM}
  2237.   SV_ACCESSALERT_PARMNUM          = 40;
  2238.   {$EXTERNALSYM SV_ACCESSALERT_PARMNUM}
  2239.   SV_DISKALERT_PARMNUM            = 41;
  2240.   {$EXTERNALSYM SV_DISKALERT_PARMNUM}
  2241.   SV_NETIOALERT_PARMNUM           = 42;
  2242.   {$EXTERNALSYM SV_NETIOALERT_PARMNUM}
  2243.   SV_MAXAUDITSZ_PARMNUM           = 43;
  2244.   {$EXTERNALSYM SV_MAXAUDITSZ_PARMNUM}
  2245.   SV_SRVHEURISTICS_PARMNUM        = 431;
  2246.   {$EXTERNALSYM SV_SRVHEURISTICS_PARMNUM}
  2248.   SV_SESSOPENS_PARMNUM                = 501;
  2249.   {$EXTERNALSYM SV_SESSOPENS_PARMNUM}
  2250.   SV_SESSVCS_PARMNUM                  = 502;
  2251.   {$EXTERNALSYM SV_SESSVCS_PARMNUM}
  2252.   SV_OPENSEARCH_PARMNUM               = 503;
  2253.   {$EXTERNALSYM SV_OPENSEARCH_PARMNUM}
  2254.   SV_SIZREQBUF_PARMNUM                = 504;
  2255.   {$EXTERNALSYM SV_SIZREQBUF_PARMNUM}
  2256.   SV_INITWORKITEMS_PARMNUM            = 505;
  2257.   {$EXTERNALSYM SV_INITWORKITEMS_PARMNUM}
  2258.   SV_MAXWORKITEMS_PARMNUM             = 506;
  2259.   {$EXTERNALSYM SV_MAXWORKITEMS_PARMNUM}
  2260.   SV_RAWWORKITEMS_PARMNUM             = 507;
  2261.   {$EXTERNALSYM SV_RAWWORKITEMS_PARMNUM}
  2262.   SV_IRPSTACKSIZE_PARMNUM             = 508;
  2263.   {$EXTERNALSYM SV_IRPSTACKSIZE_PARMNUM}
  2264.   SV_MAXRAWBUFLEN_PARMNUM             = 509;
  2265.   {$EXTERNALSYM SV_MAXRAWBUFLEN_PARMNUM}
  2266.   SV_SESSUSERS_PARMNUM                = 510;
  2267.   {$EXTERNALSYM SV_SESSUSERS_PARMNUM}
  2268.   SV_SESSCONNS_PARMNUM                = 511;
  2269.   {$EXTERNALSYM SV_SESSCONNS_PARMNUM}
  2270.   SV_MAXNONPAGEDMEMORYUSAGE_PARMNUM   = 512;
  2271.   {$EXTERNALSYM SV_MAXNONPAGEDMEMORYUSAGE_PARMNUM}
  2272.   SV_MAXPAGEDMEMORYUSAGE_PARMNUM      = 513;
  2273.   {$EXTERNALSYM SV_MAXPAGEDMEMORYUSAGE_PARMNUM}
  2274.   SV_ENABLESOFTCOMPAT_PARMNUM         = 514;
  2275.   {$EXTERNALSYM SV_ENABLESOFTCOMPAT_PARMNUM}
  2276.   SV_ENABLEFORCEDLOGOFF_PARMNUM       = 515;
  2277.   {$EXTERNALSYM SV_ENABLEFORCEDLOGOFF_PARMNUM}
  2278.   SV_TIMESOURCE_PARMNUM               = 516;
  2279.   {$EXTERNALSYM SV_TIMESOURCE_PARMNUM}
  2280.   SV_ACCEPTDOWNLEVELAPIS_PARMNUM      = 517;
  2281.   {$EXTERNALSYM SV_ACCEPTDOWNLEVELAPIS_PARMNUM}
  2282.   SV_LMANNOUNCE_PARMNUM               = 518;
  2283.   {$EXTERNALSYM SV_LMANNOUNCE_PARMNUM}
  2284.   SV_DOMAIN_PARMNUM                   = 519;
  2285.   {$EXTERNALSYM SV_DOMAIN_PARMNUM}
  2286.   SV_MAXCOPYREADLEN_PARMNUM           = 520;
  2287.   {$EXTERNALSYM SV_MAXCOPYREADLEN_PARMNUM}
  2288.   SV_MAXCOPYWRITELEN_PARMNUM          = 521;
  2289.   {$EXTERNALSYM SV_MAXCOPYWRITELEN_PARMNUM}
  2290.   SV_MINKEEPSEARCH_PARMNUM            = 522;
  2291.   {$EXTERNALSYM SV_MINKEEPSEARCH_PARMNUM}
  2292.   SV_MAXKEEPSEARCH_PARMNUM            = 523;
  2293.   {$EXTERNALSYM SV_MAXKEEPSEARCH_PARMNUM}
  2294.   SV_MINKEEPCOMPLSEARCH_PARMNUM       = 524;
  2295.   {$EXTERNALSYM SV_MINKEEPCOMPLSEARCH_PARMNUM}
  2296.   SV_MAXKEEPCOMPLSEARCH_PARMNUM       = 525;
  2297.   {$EXTERNALSYM SV_MAXKEEPCOMPLSEARCH_PARMNUM}
  2298.   SV_THREADCOUNTADD_PARMNUM           = 526;
  2299.   {$EXTERNALSYM SV_THREADCOUNTADD_PARMNUM}
  2300.   SV_NUMBLOCKTHREADS_PARMNUM          = 527;
  2301.   {$EXTERNALSYM SV_NUMBLOCKTHREADS_PARMNUM}
  2302.   SV_SCAVTIMEOUT_PARMNUM              = 528;
  2303.   {$EXTERNALSYM SV_SCAVTIMEOUT_PARMNUM}
  2304.   SV_MINRCVQUEUE_PARMNUM              = 529;
  2305.   {$EXTERNALSYM SV_MINRCVQUEUE_PARMNUM}
  2306.   SV_MINFREEWORKITEMS_PARMNUM         = 530;
  2307.   {$EXTERNALSYM SV_MINFREEWORKITEMS_PARMNUM}
  2308.   SV_XACTMEMSIZE_PARMNUM              = 531;
  2309.   {$EXTERNALSYM SV_XACTMEMSIZE_PARMNUM}
  2310.   SV_THREADPRIORITY_PARMNUM           = 532;
  2311.   {$EXTERNALSYM SV_THREADPRIORITY_PARMNUM}
  2312.   SV_MAXMPXCT_PARMNUM                 = 533;
  2313.   {$EXTERNALSYM SV_MAXMPXCT_PARMNUM}
  2314.   SV_OPLOCKBREAKWAIT_PARMNUM          = 534;
  2315.   {$EXTERNALSYM SV_OPLOCKBREAKWAIT_PARMNUM}
  2316.   SV_OPLOCKBREAKRESPONSEWAIT_PARMNUM  = 535;
  2317.   {$EXTERNALSYM SV_OPLOCKBREAKRESPONSEWAIT_PARMNUM}
  2318.   SV_ENABLEOPLOCKS_PARMNUM            = 536;
  2319.   {$EXTERNALSYM SV_ENABLEOPLOCKS_PARMNUM}
  2320.   SV_ENABLEOPLOCKFORCECLOSE_PARMNUM   = 537;
  2321.   {$EXTERNALSYM SV_ENABLEOPLOCKFORCECLOSE_PARMNUM}
  2322.   SV_ENABLEFCBOPENS_PARMNUM           = 538;
  2323.   {$EXTERNALSYM SV_ENABLEFCBOPENS_PARMNUM}
  2324.   SV_ENABLERAW_PARMNUM                = 539;
  2325.   {$EXTERNALSYM SV_ENABLERAW_PARMNUM}
  2326.   SV_ENABLESHAREDNETDRIVES_PARMNUM    = 540;
  2327.   {$EXTERNALSYM SV_ENABLESHAREDNETDRIVES_PARMNUM}
  2328.   SV_MINFREECONNECTIONS_PARMNUM       = 541;
  2329.   {$EXTERNALSYM SV_MINFREECONNECTIONS_PARMNUM}
  2330.   SV_MAXFREECONNECTIONS_PARMNUM       = 542;
  2331.   {$EXTERNALSYM SV_MAXFREECONNECTIONS_PARMNUM}
  2332.   SV_INITSESSTABLE_PARMNUM            = 543;
  2333.   {$EXTERNALSYM SV_INITSESSTABLE_PARMNUM}
  2334.   SV_INITCONNTABLE_PARMNUM            = 544;
  2335.   {$EXTERNALSYM SV_INITCONNTABLE_PARMNUM}
  2336.   SV_INITFILETABLE_PARMNUM            = 545;
  2337.   {$EXTERNALSYM SV_INITFILETABLE_PARMNUM}
  2338.   SV_INITSEARCHTABLE_PARMNUM          = 546;
  2339.   {$EXTERNALSYM SV_INITSEARCHTABLE_PARMNUM}
  2340.   SV_ALERTSCHEDULE_PARMNUM            = 547;
  2341.   {$EXTERNALSYM SV_ALERTSCHEDULE_PARMNUM}
  2342.   SV_ERRORTHRESHOLD_PARMNUM           = 548;
  2343.   {$EXTERNALSYM SV_ERRORTHRESHOLD_PARMNUM}
  2344.   SV_NETWORKERRORTHRESHOLD_PARMNUM    = 549;
  2345.   {$EXTERNALSYM SV_NETWORKERRORTHRESHOLD_PARMNUM}
  2346.   SV_DISKSPACETHRESHOLD_PARMNUM       = 550;
  2347.   {$EXTERNALSYM SV_DISKSPACETHRESHOLD_PARMNUM}
  2348.   SV_MAXLINKDELAY_PARMNUM             = 552;
  2349.   {$EXTERNALSYM SV_MAXLINKDELAY_PARMNUM}
  2350.   SV_MINLINKTHROUGHPUT_PARMNUM        = 553;
  2351.   {$EXTERNALSYM SV_MINLINKTHROUGHPUT_PARMNUM}
  2352.   SV_LINKINFOVALIDTIME_PARMNUM        = 554;
  2353.   {$EXTERNALSYM SV_LINKINFOVALIDTIME_PARMNUM}
  2354.   SV_SCAVQOSINFOUPDATETIME_PARMNUM    = 555;
  2355.   {$EXTERNALSYM SV_SCAVQOSINFOUPDATETIME_PARMNUM}
  2356.   SV_MAXWORKITEMIDLETIME_PARMNUM      = 556;
  2357.   {$EXTERNALSYM SV_MAXWORKITEMIDLETIME_PARMNUM}
  2358.   SV_MAXRAWWORKITEMS_PARMNUM          = 557;
  2359.   {$EXTERNALSYM SV_MAXRAWWORKITEMS_PARMNUM}
  2360.   SV_PRODUCTTYPE_PARMNUM              = 560;
  2361.   {$EXTERNALSYM SV_PRODUCTTYPE_PARMNUM}
  2362.   SV_SERVERSIZE_PARMNUM               = 561;
  2363.   {$EXTERNALSYM SV_SERVERSIZE_PARMNUM}
  2364.   SV_CONNECTIONLESSAUTODISC_PARMNUM   = 562;
  2365.   {$EXTERNALSYM SV_CONNECTIONLESSAUTODISC_PARMNUM}
  2366.   SV_SHARINGVIOLATIONRETRIES_PARMNUM  = 563;
  2367.   {$EXTERNALSYM SV_SHARINGVIOLATIONRETRIES_PARMNUM}
  2368.   SV_SHARINGVIOLATIONDELAY_PARMNUM    = 564;
  2369.   {$EXTERNALSYM SV_SHARINGVIOLATIONDELAY_PARMNUM}
  2370.   SV_MAXGLOBALOPENSEARCH_PARMNUM      = 565;
  2371.   {$EXTERNALSYM SV_MAXGLOBALOPENSEARCH_PARMNUM}
  2372.   SV_REMOVEDUPLICATESEARCHES_PARMNUM  = 566;
  2373.   {$EXTERNALSYM SV_REMOVEDUPLICATESEARCHES_PARMNUM}
  2374.   SV_LOCKVIOLATIONRETRIES_PARMNUM     = 567;
  2375.   {$EXTERNALSYM SV_LOCKVIOLATIONRETRIES_PARMNUM}
  2376.   SV_LOCKVIOLATIONOFFSET_PARMNUM      = 568;
  2377.   {$EXTERNALSYM SV_LOCKVIOLATIONOFFSET_PARMNUM}
  2378.   SV_LOCKVIOLATIONDELAY_PARMNUM       = 569;
  2379.   {$EXTERNALSYM SV_LOCKVIOLATIONDELAY_PARMNUM}
  2380.   SV_MDLREADSWITCHOVER_PARMNUM        = 570;
  2381.   {$EXTERNALSYM SV_MDLREADSWITCHOVER_PARMNUM}
  2382.   SV_CACHEDOPENLIMIT_PARMNUM          = 571;
  2383.   {$EXTERNALSYM SV_CACHEDOPENLIMIT_PARMNUM}
  2384.   SV_CRITICALTHREADS_PARMNUM          = 572;
  2385.   {$EXTERNALSYM SV_CRITICALTHREADS_PARMNUM}
  2386.   SV_RESTRICTNULLSESSACCESS_PARMNUM   = 573;
  2387.   {$EXTERNALSYM SV_RESTRICTNULLSESSACCESS_PARMNUM}
  2388.   SV_ENABLEWFW311DIRECTIPX_PARMNUM    = 574;
  2389.   {$EXTERNALSYM SV_ENABLEWFW311DIRECTIPX_PARMNUM}
  2390.   SV_OTHERQUEUEAFFINITY_PARMNUM       = 575;
  2391.   {$EXTERNALSYM SV_OTHERQUEUEAFFINITY_PARMNUM}
  2392.   SV_QUEUESAMPLESECS_PARMNUM          = 576;
  2393.   {$EXTERNALSYM SV_QUEUESAMPLESECS_PARMNUM}
  2394.   SV_BALANCECOUNT_PARMNUM             = 577;
  2395.   {$EXTERNALSYM SV_BALANCECOUNT_PARMNUM}
  2396.   SV_PREFERREDAFFINITY_PARMNUM        = 578;
  2397.   {$EXTERNALSYM SV_PREFERREDAFFINITY_PARMNUM}
  2398.   SV_MAXFREERFCBS_PARMNUM             = 579;
  2399.   {$EXTERNALSYM SV_MAXFREERFCBS_PARMNUM}
  2400.   SV_MAXFREEMFCBS_PARMNUM             = 580;
  2401.   {$EXTERNALSYM SV_MAXFREEMFCBS_PARMNUM}
  2402.   SV_MAXFREELFCBS_PARMNUM             = 581;
  2403.   {$EXTERNALSYM SV_MAXFREELFCBS_PARMNUM}
  2404.   SV_MAXFREEPAGEDPOOLCHUNKS_PARMNUM   = 582;
  2405.   {$EXTERNALSYM SV_MAXFREEPAGEDPOOLCHUNKS_PARMNUM}
  2406.   SV_MINPAGEDPOOLCHUNKSIZE_PARMNUM    = 583;
  2407.   {$EXTERNALSYM SV_MINPAGEDPOOLCHUNKSIZE_PARMNUM}
  2408.   SV_MAXPAGEDPOOLCHUNKSIZE_PARMNUM    = 584;
  2409.   {$EXTERNALSYM SV_MAXPAGEDPOOLCHUNKSIZE_PARMNUM}
  2410.   SV_SENDSFROMPREFERREDPROCESSOR_PARMNUM    = 585;
  2411.   {$EXTERNALSYM SV_SENDSFROMPREFERREDPROCESSOR_PARMNUM}
  2412.   SV_MAXTHREADSPERQUEUE_PARMNUM       = 586;
  2413.   {$EXTERNALSYM SV_MAXTHREADSPERQUEUE_PARMNUM}
  2414.   SV_CACHEDDIRECTORYLIMIT_PARMNUM     = 587;
  2415.   {$EXTERNALSYM SV_CACHEDDIRECTORYLIMIT_PARMNUM}
  2416.   SV_MAXCOPYLENGTH_PARMNUM            = 588;
  2417.   {$EXTERNALSYM SV_MAXCOPYLENGTH_PARMNUM}
  2418.   SV_ENABLECOMPRESSION_PARMNUM        = 590;
  2419.   {$EXTERNALSYM SV_ENABLECOMPRESSION_PARMNUM}
  2420.   SV_AUTOSHAREWKS_PARMNUM             = 591;
  2421.   {$EXTERNALSYM SV_AUTOSHAREWKS_PARMNUM}
  2422.   SV_AUTOSHARESERVER_PARMNUM          = 592;
  2423.   {$EXTERNALSYM SV_AUTOSHARESERVER_PARMNUM}
  2424.   SV_ENABLESECURITYSIGNATURE_PARMNUM  = 593;
  2425.   {$EXTERNALSYM SV_ENABLESECURITYSIGNATURE_PARMNUM}
  2426.   SV_REQUIRESECURITYSIGNATURE_PARMNUM = 594;
  2427.   {$EXTERNALSYM SV_REQUIRESECURITYSIGNATURE_PARMNUM}
  2428.   SV_MINCLIENTBUFFERSIZE_PARMNUM      = 595;
  2429.   {$EXTERNALSYM SV_MINCLIENTBUFFERSIZE_PARMNUM}
  2430.   SV_CONNECTIONNOSESSIONSTIMEOUT_PARMNUM = 596;
  2431.   {$EXTERNALSYM SV_CONNECTIONNOSESSIONSTIMEOUT_PARMNUM}
  2432.   SV_IDLETHREADTIMEOUT_PARMNUM        = 597;
  2433.   {$EXTERNALSYM SV_IDLETHREADTIMEOUT_PARMNUM}
  2434.   SV_ENABLEW9XSECURITYSIGNATURE_PARMNUM        = 598;
  2435.   {$EXTERNALSYM SV_ENABLEW9XSECURITYSIGNATURE_PARMNUM}
  2437. // Single-field infolevels for NetServerSetInfo.
  2439.   SV_COMMENT_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_COMMENT_PARMNUM);
  2440.   {$EXTERNALSYM SV_COMMENT_INFOLEVEL}
  2441.   SV_USERS_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_USERS_PARMNUM);
  2442.   {$EXTERNALSYM SV_USERS_INFOLEVEL}
  2443.   SV_DISC_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_DISC_PARMNUM);
  2444.   {$EXTERNALSYM SV_DISC_INFOLEVEL}
  2445.   SV_HIDDEN_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_HIDDEN_PARMNUM);
  2446.   {$EXTERNALSYM SV_HIDDEN_INFOLEVEL}
  2447.   SV_ANNOUNCE_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_ANNOUNCE_PARMNUM);
  2448.   {$EXTERNALSYM SV_ANNOUNCE_INFOLEVEL}
  2449.   SV_ANNDELTA_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_ANNDELTA_PARMNUM);
  2450.   {$EXTERNALSYM SV_ANNDELTA_INFOLEVEL}
  2451.   SV_SESSOPENS_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_SESSOPENS_PARMNUM);
  2452.   {$EXTERNALSYM SV_SESSOPENS_INFOLEVEL}
  2453.   SV_SESSVCS_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_SESSVCS_PARMNUM);
  2454.   {$EXTERNALSYM SV_SESSVCS_INFOLEVEL}
  2455.   SV_OPENSEARCH_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_OPENSEARCH_PARMNUM);
  2456.   {$EXTERNALSYM SV_OPENSEARCH_INFOLEVEL}
  2457.   SV_MAXWORKITEMS_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_MAXWORKITEMS_PARMNUM);
  2458.   {$EXTERNALSYM SV_MAXWORKITEMS_INFOLEVEL}
  2459.   SV_MAXRAWBUFLEN_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_MAXRAWBUFLEN_PARMNUM);
  2460.   {$EXTERNALSYM SV_MAXRAWBUFLEN_INFOLEVEL}
  2461.   SV_SESSUSERS_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_SESSUSERS_PARMNUM);
  2462.   {$EXTERNALSYM SV_SESSUSERS_INFOLEVEL}
  2463.   SV_SESSCONNS_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_SESSCONNS_PARMNUM);
  2464.   {$EXTERNALSYM SV_SESSCONNS_INFOLEVEL}
  2465.   SV_MAXNONPAGEDMEMORYUSAGE_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_MAXNONPAGEDMEMORYUSAGE_PARMNUM);
  2466.   {$EXTERNALSYM SV_MAXNONPAGEDMEMORYUSAGE_INFOLEVEL}
  2467.   SV_MAXPAGEDMEMORYUSAGE_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_MAXPAGEDMEMORYUSAGE_PARMNUM);
  2468.   {$EXTERNALSYM SV_MAXPAGEDMEMORYUSAGE_INFOLEVEL}
  2469.   SV_ENABLESOFTCOMPAT_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_ENABLESOFTCOMPAT_PARMNUM);
  2470.   {$EXTERNALSYM SV_ENABLESOFTCOMPAT_INFOLEVEL}
  2471.   SV_ENABLEFORCEDLOGOFF_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_ENABLEFORCEDLOGOFF_PARMNUM);
  2472.   {$EXTERNALSYM SV_ENABLEFORCEDLOGOFF_INFOLEVEL}
  2473.   SV_TIMESOURCE_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_TIMESOURCE_PARMNUM);
  2474.   {$EXTERNALSYM SV_TIMESOURCE_INFOLEVEL}
  2475.   SV_LMANNOUNCE_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_LMANNOUNCE_PARMNUM);
  2476.   {$EXTERNALSYM SV_LMANNOUNCE_INFOLEVEL}
  2477.   SV_MAXCOPYREADLEN_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_MAXCOPYREADLEN_PARMNUM);
  2478.   {$EXTERNALSYM SV_MAXCOPYREADLEN_INFOLEVEL}
  2479.   SV_MAXCOPYWRITELEN_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_MAXCOPYWRITELEN_PARMNUM);
  2480.   {$EXTERNALSYM SV_MAXCOPYWRITELEN_INFOLEVEL}
  2481.   SV_MINKEEPSEARCH_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_MINKEEPSEARCH_PARMNUM);
  2482.   {$EXTERNALSYM SV_MINKEEPSEARCH_INFOLEVEL}
  2483.   SV_MAXKEEPSEARCH_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_MAXKEEPSEARCH_PARMNUM);
  2484.   {$EXTERNALSYM SV_MAXKEEPSEARCH_INFOLEVEL}
  2485.   SV_MINKEEPCOMPLSEARCH_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_MINKEEPCOMPLSEARCH_PARMNUM);
  2486.   {$EXTERNALSYM SV_MINKEEPCOMPLSEARCH_INFOLEVEL}
  2487.   SV_MAXKEEPCOMPLSEARCH_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_MAXKEEPCOMPLSEARCH_PARMNUM);
  2488.   {$EXTERNALSYM SV_MAXKEEPCOMPLSEARCH_INFOLEVEL}
  2489.   SV_SCAVTIMEOUT_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_SCAVTIMEOUT_PARMNUM);
  2490.   {$EXTERNALSYM SV_SCAVTIMEOUT_INFOLEVEL}
  2491.   SV_MINRCVQUEUE_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_MINRCVQUEUE_PARMNUM);
  2492.   {$EXTERNALSYM SV_MINRCVQUEUE_INFOLEVEL}
  2493.   SV_MINFREEWORKITEMS_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_MINFREEWORKITEMS_PARMNUM);
  2494.   {$EXTERNALSYM SV_MINFREEWORKITEMS_INFOLEVEL}
  2495.   SV_MAXMPXCT_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_MAXMPXCT_PARMNUM);
  2496.   {$EXTERNALSYM SV_MAXMPXCT_INFOLEVEL}
  2497.   SV_OPLOCKBREAKWAIT_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_OPLOCKBREAKWAIT_PARMNUM);
  2498.   {$EXTERNALSYM SV_OPLOCKBREAKWAIT_INFOLEVEL}
  2499.   SV_OPLOCKBREAKRESPONSEWAIT_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_OPLOCKBREAKRESPONSEWAIT_PARMNUM);
  2500.   {$EXTERNALSYM SV_OPLOCKBREAKRESPONSEWAIT_INFOLEVEL}
  2501.   SV_ENABLEOPLOCKS_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_ENABLEOPLOCKS_PARMNUM);
  2502.   {$EXTERNALSYM SV_ENABLEOPLOCKS_INFOLEVEL}
  2503.   SV_ENABLEOPLOCKFORCECLOSE_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_ENABLEOPLOCKFORCECLOSE_PARMNUM);
  2504.   {$EXTERNALSYM SV_ENABLEOPLOCKFORCECLOSE_INFOLEVEL}
  2505.   SV_ENABLEFCBOPENS_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_ENABLEFCBOPENS_PARMNUM);
  2506.   {$EXTERNALSYM SV_ENABLEFCBOPENS_INFOLEVEL}
  2507.   SV_ENABLERAW_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_ENABLERAW_PARMNUM);
  2508.   {$EXTERNALSYM SV_ENABLERAW_INFOLEVEL}
  2509.   SV_ENABLESHAREDNETDRIVES_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_ENABLESHAREDNETDRIVES_PARMNUM);
  2510.   {$EXTERNALSYM SV_ENABLESHAREDNETDRIVES_INFOLEVEL}
  2511.   SV_MINFREECONNECTIONS_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_MINFREECONNECTIONS_PARMNUM);
  2512.   {$EXTERNALSYM SV_MINFREECONNECTIONS_INFOLEVEL}
  2513.   SV_MAXFREECONNECTIONS_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_MAXFREECONNECTIONS_PARMNUM);
  2514.   {$EXTERNALSYM SV_MAXFREECONNECTIONS_INFOLEVEL}
  2515.   SV_INITSESSTABLE_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_INITSESSTABLE_PARMNUM);
  2516.   {$EXTERNALSYM SV_INITSESSTABLE_INFOLEVEL}
  2517.   SV_INITCONNTABLE_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_INITCONNTABLE_PARMNUM);
  2518.   {$EXTERNALSYM SV_INITCONNTABLE_INFOLEVEL}
  2519.   SV_INITFILETABLE_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_INITFILETABLE_PARMNUM);
  2520.   {$EXTERNALSYM SV_INITFILETABLE_INFOLEVEL}
  2521.   SV_INITSEARCHTABLE_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_INITSEARCHTABLE_PARMNUM);
  2522.   {$EXTERNALSYM SV_INITSEARCHTABLE_INFOLEVEL}
  2523.   SV_ALERTSCHEDULE_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_ALERTSCHEDULE_PARMNUM);
  2524.   {$EXTERNALSYM SV_ALERTSCHEDULE_INFOLEVEL}
  2525.   SV_ERRORTHRESHOLD_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_ERRORTHRESHOLD_PARMNUM);
  2526.   {$EXTERNALSYM SV_ERRORTHRESHOLD_INFOLEVEL}
  2527.   SV_NETWORKERRORTHRESHOLD_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_NETWORKERRORTHRESHOLD_PARMNUM);
  2528.   {$EXTERNALSYM SV_NETWORKERRORTHRESHOLD_INFOLEVEL}
  2529.   SV_DISKSPACETHRESHOLD_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_DISKSPACETHRESHOLD_PARMNUM);
  2530.   {$EXTERNALSYM SV_DISKSPACETHRESHOLD_INFOLEVEL}
  2531.   SV_MAXLINKDELAY_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_MAXLINKDELAY_PARMNUM);
  2532.   {$EXTERNALSYM SV_MAXLINKDELAY_INFOLEVEL}
  2533.   SV_MINLINKTHROUGHPUT_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_MINLINKTHROUGHPUT_PARMNUM);
  2534.   {$EXTERNALSYM SV_MINLINKTHROUGHPUT_INFOLEVEL}
  2535.   SV_LINKINFOVALIDTIME_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_LINKINFOVALIDTIME_PARMNUM);
  2536.   {$EXTERNALSYM SV_LINKINFOVALIDTIME_INFOLEVEL}
  2537.   SV_SCAVQOSINFOUPDATETIME_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_SCAVQOSINFOUPDATETIME_PARMNUM);
  2538.   {$EXTERNALSYM SV_SCAVQOSINFOUPDATETIME_INFOLEVEL}
  2539.   SV_MAXWORKITEMIDLETIME_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_MAXWORKITEMIDLETIME_PARMNUM);
  2540.   {$EXTERNALSYM SV_MAXWORKITEMIDLETIME_INFOLEVEL}
  2541.   SV_MAXRAWWORKITEMS_INFOLOEVEL = (PARMNUM_BASE_INFOLEVEL + SV_MAXRAWWORKITEMS_PARMNUM);
  2542.   {$EXTERNALSYM SV_MAXRAWWORKITEMS_INFOLOEVEL}
  2543.   SV_PRODUCTTYPE_INFOLOEVEL = (PARMNUM_BASE_INFOLEVEL + SV_PRODUCTTYPE_PARMNUM);
  2544.   {$EXTERNALSYM SV_PRODUCTTYPE_INFOLOEVEL}
  2545.   SV_SERVERSIZE_INFOLOEVEL = (PARMNUM_BASE_INFOLEVEL + SV_SERVERSIZE_PARMNUM);
  2546.   {$EXTERNALSYM SV_SERVERSIZE_INFOLOEVEL}
  2547.   SV_CONNECTIONLESSAUTODISC_INFOLOEVEL = (PARMNUM_BASE_INFOLEVEL + SV_CONNECTIONLESSAUTODISC_PARMNUM);
  2548.   {$EXTERNALSYM SV_CONNECTIONLESSAUTODISC_INFOLOEVEL}
  2549.   SV_SHARINGVIOLATIONRETRIES_INFOLOEVEL = (PARMNUM_BASE_INFOLEVEL + SV_SHARINGVIOLATIONRETRIES_PARMNUM);
  2550.   {$EXTERNALSYM SV_SHARINGVIOLATIONRETRIES_INFOLOEVEL}
  2551.   SV_SHARINGVIOLATIONDELAY_INFOLOEVEL = (PARMNUM_BASE_INFOLEVEL + SV_SHARINGVIOLATIONDELAY_PARMNUM);
  2552.   {$EXTERNALSYM SV_SHARINGVIOLATIONDELAY_INFOLOEVEL}
  2553.   SV_MAXGLOBALOPENSEARCH_INFOLOEVEL = (PARMNUM_BASE_INFOLEVEL + SV_MAXGLOBALOPENSEARCH_PARMNUM);
  2554.   {$EXTERNALSYM SV_MAXGLOBALOPENSEARCH_INFOLOEVEL}
  2555.   SV_REMOVEDUPLICATESEARCHES_INFOLOEVEL = (PARMNUM_BASE_INFOLEVEL + SV_REMOVEDUPLICATESEARCHES_PARMNUM);
  2556.   {$EXTERNALSYM SV_REMOVEDUPLICATESEARCHES_INFOLOEVEL}
  2557.   SV_LOCKVIOLATIONRETRIES_INFOLOEVEL = (PARMNUM_BASE_INFOLEVEL + SV_LOCKVIOLATIONRETRIES_PARMNUM);
  2558.   {$EXTERNALSYM SV_LOCKVIOLATIONRETRIES_INFOLOEVEL}
  2559.   SV_LOCKVIOLATIONOFFSET_INFOLOEVEL = (PARMNUM_BASE_INFOLEVEL + SV_LOCKVIOLATIONOFFSET_PARMNUM);
  2560.   {$EXTERNALSYM SV_LOCKVIOLATIONOFFSET_INFOLOEVEL}
  2561.   SV_LOCKVIOLATIONDELAY_INFOLOEVEL = (PARMNUM_BASE_INFOLEVEL + SV_LOCKVIOLATIONDELAY_PARMNUM);
  2562.   {$EXTERNALSYM SV_LOCKVIOLATIONDELAY_INFOLOEVEL}
  2563.   SV_MDLREADSWITCHOVER_INFOLOEVEL = (PARMNUM_BASE_INFOLEVEL + SV_MDLREADSWITCHOVER_PARMNUM);
  2564.   {$EXTERNALSYM SV_MDLREADSWITCHOVER_INFOLOEVEL}
  2565.   SV_CACHEDOPENLIMIT_INFOLOEVEL = (PARMNUM_BASE_INFOLEVEL + SV_CACHEDOPENLIMIT_PARMNUM);
  2566.   {$EXTERNALSYM SV_CACHEDOPENLIMIT_INFOLOEVEL}
  2567.   SV_CRITICALTHREADS_INFOLOEVEL = (PARMNUM_BASE_INFOLEVEL + SV_CRITICALTHREADS_PARMNUM);
  2568.   {$EXTERNALSYM SV_CRITICALTHREADS_INFOLOEVEL}
  2569.   SV_RESTRICTNULLSESSACCESS_INFOLOEVEL = (PARMNUM_BASE_INFOLEVEL + SV_RESTRICTNULLSESSACCESS_PARMNUM);
  2570.   {$EXTERNALSYM SV_RESTRICTNULLSESSACCESS_INFOLOEVEL}
  2571.   SV_ENABLEWFW311DIRECTIPX_INFOLOEVEL = (PARMNUM_BASE_INFOLEVEL + SV_ENABLEWFW311DIRECTIPX_PARMNUM);
  2572.   {$EXTERNALSYM SV_ENABLEWFW311DIRECTIPX_INFOLOEVEL}
  2573.   SV_OTHERQUEUEAFFINITY_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_OTHERQUEUEAFFINITY_PARMNUM);
  2574.   {$EXTERNALSYM SV_OTHERQUEUEAFFINITY_INFOLEVEL}
  2575.   SV_QUEUESAMPLESECS_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_QUEUESAMPLESECS_PARMNUM);
  2576.   {$EXTERNALSYM SV_QUEUESAMPLESECS_INFOLEVEL}
  2577.   SV_BALANCECOUNT_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_BALANCECOUNT_PARMNUM);
  2578.   {$EXTERNALSYM SV_BALANCECOUNT_INFOLEVEL}
  2579.   SV_PREFERREDAFFINITY_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_PREFERREDAFFINITY_PARMNUM);
  2580.   {$EXTERNALSYM SV_PREFERREDAFFINITY_INFOLEVEL}
  2581.   SV_MAXFREERFCBS_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_MAXFREERFCBS_PARMNUM);
  2582.   {$EXTERNALSYM SV_MAXFREERFCBS_INFOLEVEL}
  2583.   SV_MAXFREEMFCBS_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_MAXFREEMFCBS_PARMNUM);
  2584.   {$EXTERNALSYM SV_MAXFREEMFCBS_INFOLEVEL}
  2585.   SV_MAXFREELFCBS_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_MAXFREELFCBS_PARMNUM);
  2586.   {$EXTERNALSYM SV_MAXFREELFCBS_INFOLEVEL}
  2587.   SV_MAXFREEPAGEDPOOLCHUNKS_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_MAXFREEPAGEDPOOLCHUNKS_PARMNUM);
  2588.   {$EXTERNALSYM SV_MAXFREEPAGEDPOOLCHUNKS_INFOLEVEL}
  2589.   SV_MINPAGEDPOOLCHUNKSIZE_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_MINPAGEDPOOLCHUNKSIZE_PARMNUM);
  2590.   {$EXTERNALSYM SV_MINPAGEDPOOLCHUNKSIZE_INFOLEVEL}
  2591.   SV_MAXPAGEDPOOLCHUNKSIZE_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_MAXPAGEDPOOLCHUNKSIZE_PARMNUM);
  2592.   {$EXTERNALSYM SV_MAXPAGEDPOOLCHUNKSIZE_INFOLEVEL}
  2593.   SV_SENDSFROMPREFERREDPROCESSOR_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_SENDSFROMPREFERREDPROCESSOR_PARMNUM);
  2594.   {$EXTERNALSYM SV_SENDSFROMPREFERREDPROCESSOR_INFOLEVEL}
  2595.   SV_MAXTHREADSPERQUEUE_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_MAXTHREADSPERQUEUE_PARMNUM);
  2596.   {$EXTERNALSYM SV_MAXTHREADSPERQUEUE_INFOLEVEL}
  2597.   SV_CACHEDDIRECTORYLIMIT_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_CACHEDDIRECTORYLIMIT_PARMNUM);
  2598.   {$EXTERNALSYM SV_CACHEDDIRECTORYLIMIT_INFOLEVEL}
  2599.   SV_MAXCOPYLENGTH_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_MAXCOPYLENGTH_PARMNUM);
  2600.   {$EXTERNALSYM SV_MAXCOPYLENGTH_INFOLEVEL}
  2601.   SV_ENABLECOMPRESSION_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_ENABLECOMPRESSION_PARMNUM);
  2602.   {$EXTERNALSYM SV_ENABLECOMPRESSION_INFOLEVEL}
  2603.   SV_AUTOSHAREWKS_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_AUTOSHAREWKS_PARMNUM);
  2604.   {$EXTERNALSYM SV_AUTOSHAREWKS_INFOLEVEL}
  2605.   SV_AUTOSHARESERVER_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_AUTOSHARESERVER_PARMNUM);
  2606.   {$EXTERNALSYM SV_AUTOSHARESERVER_INFOLEVEL}
  2607.   SV_ENABLESECURITYSIGNATURE_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_ENABLESECURITYSIGNATURE_PARMNUM);
  2608.   {$EXTERNALSYM SV_ENABLESECURITYSIGNATURE_INFOLEVEL}
  2609.   SV_REQUIRESECURITYSIGNATURE_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_REQUIRESECURITYSIGNATURE_PARMNUM);
  2610.   {$EXTERNALSYM SV_REQUIRESECURITYSIGNATURE_INFOLEVEL}
  2611.   SV_MINCLIENTBUFFERSIZE_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_MINCLIENTBUFFERSIZE_PARMNUM);
  2612.   {$EXTERNALSYM SV_MINCLIENTBUFFERSIZE_INFOLEVEL}
  2613.   SV_CONNECTIONNOSESSIONSTIMEOUT_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_CONNECTIONNOSESSIONSTIMEOUT_PARMNUM);
  2614.   {$EXTERNALSYM SV_CONNECTIONNOSESSIONSTIMEOUT_INFOLEVEL}
  2615.   SV_IDLETHREADTIMEOUT_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_IDLETHREADTIMEOUT_PARMNUM);
  2616.   {$EXTERNALSYM SV_IDLETHREADTIMEOUT_INFOLEVEL}
  2617.   SV_ENABLEW9XSECURITYSIGNATURE_INFOLEVEL = (PARMNUM_BASE_INFOLEVEL + SV_ENABLEW9XSECURITYSIGNATURE_PARMNUM);
  2618.   {$EXTERNALSYM SV_ENABLEW9XSECURITYSIGNATURE_INFOLEVEL}
  2620.   SVI1_NUM_ELEMENTS       = 5;
  2621.   {$EXTERNALSYM SVI1_NUM_ELEMENTS}
  2622.   SVI2_NUM_ELEMENTS       = 40;
  2623.   {$EXTERNALSYM SVI2_NUM_ELEMENTS}
  2624.   SVI3_NUM_ELEMENTS       = 44;
  2625.   {$EXTERNALSYM SVI3_NUM_ELEMENTS}
  2627. // Maxmimum length for command string to NetServerAdminCommand.
  2629.   SV_MAX_CMD_LEN          = PATHLEN;
  2630.   {$EXTERNALSYM SV_MAX_CMD_LEN}
  2632. // Masks describing AUTOPROFILE parameters
  2634.   SW_AUTOPROF_LOAD_MASK   = $1;
  2635.   {$EXTERNALSYM SW_AUTOPROF_LOAD_MASK}
  2636.   SW_AUTOPROF_SAVE_MASK   = $2;
  2637.   {$EXTERNALSYM SW_AUTOPROF_SAVE_MASK}
  2639. // Max size of svX_srvheuristics.
  2641.   SV_MAX_SRV_HEUR_LEN     = 32;      // Max heuristics info string length.
  2642.   {$EXTERNALSYM SV_MAX_SRV_HEUR_LEN}
  2644. // Equate for use with sv102_licenses.
  2646.   SV_USERS_PER_LICENSE    = 5;
  2647.   {$EXTERNALSYM SV_USERS_PER_LICENSE}
  2649. // Equate for use with svti2_flags in NetServerTransportAddEx.
  2651.   SVTI2_REMAP_PIPE_NAMES  = $2;
  2652.   {$EXTERNALSYM SVTI2_REMAP_PIPE_NAMES}
  2654. // Translated from LMSVC.H
  2656. type
  2657.   PServiceInfo0 = ^TServiceInfo0;
  2658.   _SERVICE_INFO_0 = record
  2659.     svci0_name: LPWSTR;
  2660.   end;
  2661.   {$EXTERNALSYM _SERVICE_INFO_0}
  2662.   TServiceInfo0 = _SERVICE_INFO_0;
  2663.   SERVICE_INFO_0 = _SERVICE_INFO_0;
  2664.   {$EXTERNALSYM SERVICE_INFO_0}
  2666.   PServiceInfo1 = ^TServiceInfo1;
  2667.   _SERVICE_INFO_1 = record
  2668.     svci1_name: LPWSTR;
  2669.     svci1_status: DWORD;
  2670.     svci1_code: DWORD;
  2671.     svci1_pid: DWORD;
  2672.   end;
  2673.   {$EXTERNALSYM _SERVICE_INFO_1}
  2674.   TServiceInfo1 = _SERVICE_INFO_1;
  2675.   SERVICE_INFO_1 = _SERVICE_INFO_1;
  2676.   {$EXTERNALSYM SERVICE_INFO_1}
  2678.   PServiceInfo2 = ^TServiceInfo2;
  2679.   _SERVICE_INFO_2 = record
  2680.     svci2_name: LPWSTR;
  2681.     svci2_status: DWORD;
  2682.     svci2_code: DWORD;
  2683.     svci2_pid: DWORD;
  2684.     svci2_text: LPWSTR;
  2685.     svci2_specific_error: DWORD;
  2686.     svci2_display_name: LPWSTR;
  2687.   end;
  2688.   {$EXTERNALSYM _SERVICE_INFO_2}
  2689.   TServiceInfo2 = _SERVICE_INFO_2;
  2690.   SERVICE_INFO_2 = _SERVICE_INFO_2;
  2691.   {$EXTERNALSYM SERVICE_INFO_2}
  2694. function NetServiceControl(servername: LPCWSTR; service: LPCWSTR; opcode: DWORD;
  2695.   arg: DWORD; bufptr: Pointer): NET_API_STATUS; stdcall;
  2696. {$EXTERNALSYM NetServiceControl}
  2698. function NetServiceEnum(servername: LPCWSTR; level: DWORD; bufptr: Pointer;
  2699.   prefmaxlen: DWORD; var entriesread: DWORD; var totalentries: DWORD;
  2700.   resume_handle: PDWORD): NET_API_STATUS; stdcall;
  2701. {$EXTERNALSYM NetServiceEnum}
  2703. function NetServiceGetInfo(servername: LPCWSTR; service: LPCWSTR; level: DWORD;
  2704.   bufptr: Pointer): NET_API_STATUS; stdcall;
  2705. {$EXTERNALSYM NetServiceGetInfo}
  2707. function NetServiceInstall(servername: LPCWSTR; service: LPCWSTR; argc: DWORD;
  2708.   argv: LPCWSTR; bufptr: Pointer): NET_API_STATUS; stdcall;
  2709. {$EXTERNALSYM NetServiceInstall}
  2711. //  Bitmask and bit values for svci1_status, and svci2_status
  2712. //  fields.  For each "subfield", there is a mask defined,
  2713. //  and a number of constants representing the value
  2714. //  obtained by doing (status & mask).
  2716. const
  2717. // Bits 0,1 -- general status
  2719.   SERVICE_INSTALL_STATE       = $03;
  2720.   {$EXTERNALSYM SERVICE_INSTALL_STATE}
  2721.   SERVICE_UNINSTALLED         = $00;
  2722.   {$EXTERNALSYM SERVICE_UNINSTALLED}
  2723.   SERVICE_INSTALL_PENDING     = $01;
  2724.   {$EXTERNALSYM SERVICE_INSTALL_PENDING}
  2725.   SERVICE_UNINSTALL_PENDING   = $02;
  2726.   {$EXTERNALSYM SERVICE_UNINSTALL_PENDING}
  2727.   SERVICE_INSTALLED           = $03;
  2728.   {$EXTERNALSYM SERVICE_INSTALLED}
  2730. // Bits 2,3 -- paused/active status
  2732.   SERVICE_PAUSE_STATE              = $0C;
  2733.   {$EXTERNALSYM SERVICE_PAUSE_STATE}
  2734.   LM20_SERVICE_ACTIVE              = $00;
  2735.   {$EXTERNALSYM LM20_SERVICE_ACTIVE}
  2736.   LM20_SERVICE_CONTINUE_PENDING    = $04;
  2737.   {$EXTERNALSYM LM20_SERVICE_CONTINUE_PENDING}
  2738.   LM20_SERVICE_PAUSE_PENDING       = $08;
  2739.   {$EXTERNALSYM LM20_SERVICE_PAUSE_PENDING}
  2740.   LM20_SERVICE_PAUSED              = $0C;
  2741.   {$EXTERNALSYM LM20_SERVICE_PAUSED}
  2743. // Bit 4 -- uninstallable indication
  2745.   SERVICE_NOT_UNINSTALLABLE   = $00;
  2746.   {$EXTERNALSYM SERVICE_NOT_UNINSTALLABLE}
  2747.   SERVICE_UNINSTALLABLE       = $10;
  2748.   {$EXTERNALSYM SERVICE_UNINSTALLABLE}
  2750. // Bit 5 -- pausable indication
  2752.   SERVICE_NOT_PAUSABLE        = $00;
  2753.   {$EXTERNALSYM SERVICE_NOT_PAUSABLE}
  2754.   SERVICE_PAUSABLE            = $20;
  2755.   {$EXTERNALSYM SERVICE_PAUSABLE}
  2757. // Workstation service only:
  2758. // Bits 8,9,10 -- redirection paused/active
  2760.   SERVICE_REDIR_PAUSED        = $700;
  2761.   {$EXTERNALSYM SERVICE_REDIR_PAUSED}
  2762.   SERVICE_REDIR_DISK_PAUSED   = $100;
  2763.   {$EXTERNALSYM SERVICE_REDIR_DISK_PAUSED}
  2764.   SERVICE_REDIR_PRINT_PAUSED  = $200;
  2765.   {$EXTERNALSYM SERVICE_REDIR_PRINT_PAUSED}
  2766.   SERVICE_REDIR_COMM_PAUSED   = $400;
  2767.   {$EXTERNALSYM SERVICE_REDIR_COMM_PAUSED}
  2769. // Additional standard LAN Manager for MS-DOS services
  2771.   SERVICE_DOS_ENCRYPTION  = 'ENCRYPT';
  2772.   {$EXTERNALSYM SERVICE_DOS_ENCRYPTION}
  2774. // NetServiceControl opcodes.
  2776.   SERVICE_CTRL_INTERROGATE    = 0;
  2777.   {$EXTERNALSYM SERVICE_CTRL_INTERROGATE}
  2778.   SERVICE_CTRL_PAUSE          = 1;
  2779.   {$EXTERNALSYM SERVICE_CTRL_PAUSE}
  2780.   SERVICE_CTRL_CONTINUE       = 2;
  2781.   {$EXTERNALSYM SERVICE_CTRL_CONTINUE}
  2782.   SERVICE_CTRL_UNINSTALL      = 3;
  2783.   {$EXTERNALSYM SERVICE_CTRL_UNINSTALL}
  2785. // Workstation service only:  Bits used in the "arg" parameter
  2786. // to NetServiceControl in conjunction with the opcode
  2787. // SERVICE_CTRL_PAUSE or SERVICE_CTRL_CONTINUE, to pause or
  2788. // continue redirection.
  2790.   SERVICE_CTRL_REDIR_DISK     = $1;
  2791.   {$EXTERNALSYM SERVICE_CTRL_REDIR_DISK}
  2792.   SERVICE_CTRL_REDIR_PRINT    = $2;
  2793.   {$EXTERNALSYM SERVICE_CTRL_REDIR_PRINT}
  2794.   SERVICE_CTRL_REDIR_COMM     = $4;
  2795.   {$EXTERNALSYM SERVICE_CTRL_REDIR_COMM}
  2797. // Values for svci1_code, and svci2_code when status
  2798. // of the service is SERVICE_INSTALL_PENDING or
  2799. // SERVICE_UNINSTALL_PENDING.
  2800. // A service can optionally provide a hint to the installer
  2801. // that the install is proceeding and how long to wait
  2802. // (in 0.1 second increments) before querying status again.
  2804.   SERVICE_IP_NO_HINT          = $0;
  2805.   {$EXTERNALSYM SERVICE_IP_NO_HINT}
  2806.   SERVICE_CCP_NO_HINT         = $0;
  2807.   {$EXTERNALSYM SERVICE_CCP_NO_HINT}
  2809.   SERVICE_IP_QUERY_HINT       = $10000;
  2810.   {$EXTERNALSYM SERVICE_IP_QUERY_HINT}
  2811.   SERVICE_CCP_QUERY_HINT      = $10000;
  2812.   {$EXTERNALSYM SERVICE_CCP_QUERY_HINT}
  2814. // Mask for install proceeding checkpoint number
  2816.   SERVICE_IP_CHKPT_NUM        = $0FF;
  2817.   {$EXTERNALSYM SERVICE_IP_CHKPT_NUM}
  2818.   SERVICE_CCP_CHKPT_NUM       = $0FF;
  2819.   {$EXTERNALSYM SERVICE_CCP_CHKPT_NUM}
  2821. // Mask for wait time hint before querying again
  2823.   SERVICE_IP_WAIT_TIME        = $0FF00;
  2824.   {$EXTERNALSYM SERVICE_IP_WAIT_TIME}
  2825.   SERVICE_CCP_WAIT_TIME       = $0FF00;
  2826.   {$EXTERNALSYM SERVICE_CCP_WAIT_TIME}
  2828. // Shift count for building wait time _code values
  2830.   SERVICE_IP_WAITTIME_SHIFT   = 8;
  2831.   {$EXTERNALSYM SERVICE_IP_WAITTIME_SHIFT}
  2832.   SERVICE_NTIP_WAITTIME_SHIFT = 12;
  2833.   {$EXTERNALSYM SERVICE_NTIP_WAITTIME_SHIFT}
  2835. // Mask used for upper and lower portions of wait hint time.
  2837.   UPPER_HINT_MASK     = $0000FF00;
  2838.   {$EXTERNALSYM UPPER_HINT_MASK}
  2839.   LOWER_HINT_MASK     = $000000FF;
  2840.   {$EXTERNALSYM LOWER_HINT_MASK}
  2841.   UPPER_GET_HINT_MASK = $0FF00000;
  2842.   {$EXTERNALSYM UPPER_GET_HINT_MASK}
  2843.   LOWER_GET_HINT_MASK = $0000FF00;
  2844.   {$EXTERNALSYM LOWER_GET_HINT_MASK}
  2845.   SERVICE_NT_MAXTIME  = $0000FFFF;
  2846.   {$EXTERNALSYM SERVICE_NT_MAXTIME}
  2847.   SERVICE_RESRV_MASK  = $0001FFFF;
  2848.   {$EXTERNALSYM SERVICE_RESRV_MASK}
  2849.   SERVICE_MAXTIME     = $000000FF;
  2850.   {$EXTERNALSYM SERVICE_MAXTIME}
  2852. // SERVICE_BASE is the base of service error codes,
  2853. // chosen to avoid conflict with OS, redirector,
  2854. // netapi, and errlog codes.
  2855. //
  2856. // Don't change the comments following the manifest constants without
  2857. // understanding how mapmsg works.
  2859.   SERVICE_BASE                = 3050;
  2860.   {$EXTERNALSYM SERVICE_BASE}
  2861.   SERVICE_UIC_NORMAL          = 0;
  2862.   {$EXTERNALSYM SERVICE_UIC_NORMAL}
  2863.   // Uninstall codes, to be used in high byte of 'code' on final NetStatus,
  2864.   // which sets the status to UNINSTALLED.
  2866.   SERVICE_UIC_BADPARMVAL         = (SERVICE_BASE + 1);
  2867.   {$EXTERNALSYM SERVICE_UIC_BADPARMVAL}
  2868.   // The Registry or the information you just typed includes an illegal
  2869.   // value for "%1".
  2871.   SERVICE_UIC_MISSPARM           = (SERVICE_BASE + 2);
  2872.   {$EXTERNALSYM SERVICE_UIC_MISSPARM}
  2873.   // The required parameter was not provided on the command
  2874.   // line or in the configuration file.
  2876.   SERVICE_UIC_UNKPARM            = (SERVICE_BASE + 3);
  2877.   {$EXTERNALSYM SERVICE_UIC_UNKPARM}
  2878.   // LAN Manager does not recognize "%1" as a valid option.
  2880.   SERVICE_UIC_RESOURCE           = (SERVICE_BASE + 4);
  2881.   {$EXTERNALSYM SERVICE_UIC_RESOURCE}
  2882.   // A request for resource could not be satisfied.
  2884.   SERVICE_UIC_CONFIG             = (SERVICE_BASE + 5);
  2885.   {$EXTERNALSYM SERVICE_UIC_CONFIG}
  2886.   // A problem exists with the system configuration.
  2888.   SERVICE_UIC_SYSTEM             = (SERVICE_BASE + 6);
  2889.   {$EXTERNALSYM SERVICE_UIC_SYSTEM}
  2890.   // A system error has occurred.
  2892.   SERVICE_UIC_INTERNAL           = (SERVICE_BASE + 7);
  2893.   {$EXTERNALSYM SERVICE_UIC_INTERNAL}
  2894.   // An internal consistency error has occurred.
  2896.   SERVICE_UIC_AMBIGPARM          = (SERVICE_BASE + 8);
  2897.   {$EXTERNALSYM SERVICE_UIC_AMBIGPARM}
  2898.   // The configuration file or the command line has an ambiguous option.
  2900.   SERVICE_UIC_DUPPARM            = (SERVICE_BASE + 9);
  2901.   {$EXTERNALSYM SERVICE_UIC_DUPPARM}
  2902.   // The configuration file or the command line has a duplicate parameter.
  2904.   SERVICE_UIC_KILL               = (SERVICE_BASE + 10);
  2905.   {$EXTERNALSYM SERVICE_UIC_KILL}
  2906.   // The service did not respond to control and was stopped with
  2907.   // the DosKillProc function.
  2909.   SERVICE_UIC_EXEC               = (SERVICE_BASE + 11);
  2910.   {$EXTERNALSYM SERVICE_UIC_EXEC}
  2911.   // An error occurred when attempting to run the service program.
  2913.   SERVICE_UIC_SUBSERV            = (SERVICE_BASE + 12);
  2914.   {$EXTERNALSYM SERVICE_UIC_SUBSERV}
  2915.   // The sub-service failed to start.
  2917.   SERVICE_UIC_CONFLPARM          = (SERVICE_BASE + 13);
  2918.   {$EXTERNALSYM SERVICE_UIC_CONFLPARM}
  2919.   // There is a conflict in the value or use of these options: %1.
  2921.   SERVICE_UIC_FILE               = (SERVICE_BASE + 14);
  2922.   {$EXTERNALSYM SERVICE_UIC_FILE}
  2923.   // There is a problem with the file.
  2925. // The modifiers
  2927. // General:
  2929.   SERVICE_UIC_M_NULL   = 0;
  2930.   {$EXTERNALSYM SERVICE_UIC_M_NULL}
  2932. // RESOURCE:
  2934.   SERVICE_UIC_M_MEMORY    = (SERVICE_BASE + 20);     //* memory */
  2935.   {$EXTERNALSYM SERVICE_UIC_M_MEMORY}
  2936.   SERVICE_UIC_M_DISK      = (SERVICE_BASE + 21);     //* disk space */
  2937.   {$EXTERNALSYM SERVICE_UIC_M_DISK}
  2938.   SERVICE_UIC_M_THREADS   = (SERVICE_BASE + 22);     //* thread */
  2939.   {$EXTERNALSYM SERVICE_UIC_M_THREADS}
  2940.   SERVICE_UIC_M_PROCESSES = (SERVICE_BASE + 23);     //* process */
  2941.   {$EXTERNALSYM SERVICE_UIC_M_PROCESSES}
  2943. // CONFIG:
  2945. // Security failure
  2947.   SERVICE_UIC_M_SECURITY          = (SERVICE_BASE + 24);
  2948.   {$EXTERNALSYM SERVICE_UIC_M_SECURITY}
  2949.   // Security Failure.
  2951.   SERVICE_UIC_M_LANROOT           = (SERVICE_BASE + 25);
  2952.   {$EXTERNALSYM SERVICE_UIC_M_LANROOT}
  2953.   // Bad or missing LAN Manager root directory.
  2955.   SERVICE_UIC_M_REDIR             = (SERVICE_BASE + 26);
  2956.   {$EXTERNALSYM SERVICE_UIC_M_REDIR}
  2957.   // The network software is not installed.
  2959.   SERVICE_UIC_M_SERVER            = (SERVICE_BASE + 27);
  2960.   {$EXTERNALSYM SERVICE_UIC_M_SERVER}
  2961.   // The server is not started.
  2963.   SERVICE_UIC_M_SEC_FILE_ERR      = (SERVICE_BASE + 28);
  2964.   {$EXTERNALSYM SERVICE_UIC_M_SEC_FILE_ERR}
  2965.   // The server cannot access the user accounts database (NET.ACC).
  2967.   SERVICE_UIC_M_FILES             = (SERVICE_BASE + 29);
  2968.   {$EXTERNALSYM SERVICE_UIC_M_FILES}
  2969.   // Incompatible files are installed in the LANMAN tree.
  2971.   SERVICE_UIC_M_LOGS              = (SERVICE_BASE + 30);
  2972.   {$EXTERNALSYM SERVICE_UIC_M_LOGS}
  2973.   // The LANMANLOGS directory is invalid.
  2975.   SERVICE_UIC_M_LANGROUP          = (SERVICE_BASE + 31);
  2976.   {$EXTERNALSYM SERVICE_UIC_M_LANGROUP}
  2977.   // The domain specified could not be used.
  2979.   SERVICE_UIC_M_MSGNAME           = (SERVICE_BASE + 32);
  2980.   {$EXTERNALSYM SERVICE_UIC_M_MSGNAME}
  2981.   // The computer name is being used as a message alias on another computer.
  2983.   SERVICE_UIC_M_ANNOUNCE          = (SERVICE_BASE + 33);
  2984.   {$EXTERNALSYM SERVICE_UIC_M_ANNOUNCE}
  2985.   // The announcement of the server name failed.
  2987.   SERVICE_UIC_M_UAS               = (SERVICE_BASE + 34);
  2988.   {$EXTERNALSYM SERVICE_UIC_M_UAS}
  2989.   // The user accounts database is not configured correctly.
  2991.   SERVICE_UIC_M_SERVER_SEC_ERR    = (SERVICE_BASE + 35);
  2992.   {$EXTERNALSYM SERVICE_UIC_M_SERVER_SEC_ERR}
  2993.   // The server is not running with user-level security.
  2995.   SERVICE_UIC_M_WKSTA             = (SERVICE_BASE + 37);
  2996.   {$EXTERNALSYM SERVICE_UIC_M_WKSTA}
  2997.   // The workstation is not configured properly.
  2999.   SERVICE_UIC_M_ERRLOG            = (SERVICE_BASE + 38);
  3000.   {$EXTERNALSYM SERVICE_UIC_M_ERRLOG}
  3001.   // View your error log for details.
  3003.   SERVICE_UIC_M_FILE_UW           = (SERVICE_BASE + 39);
  3004.   {$EXTERNALSYM SERVICE_UIC_M_FILE_UW}
  3005.   // Unable to write to this file.
  3007.   SERVICE_UIC_M_ADDPAK            = (SERVICE_BASE + 40);
  3008.   {$EXTERNALSYM SERVICE_UIC_M_ADDPAK}
  3009.   // ADDPAK file is corrupted.  Delete LANMANNETPROGADDPAK.SER
  3010.   // and reapply all ADDPAKs.
  3012.   SERVICE_UIC_M_LAZY              = (SERVICE_BASE + 41);
  3013.   {$EXTERNALSYM SERVICE_UIC_M_LAZY}
  3014.   // The LM386 server cannot be started because CACHE.EXE is not running.
  3016.   SERVICE_UIC_M_UAS_MACHINE_ACCT  = (SERVICE_BASE + 42);
  3017.   {$EXTERNALSYM SERVICE_UIC_M_UAS_MACHINE_ACCT}
  3018.   // There is no account for this computer in the security database.
  3020.   SERVICE_UIC_M_UAS_SERVERS_NMEMB = (SERVICE_BASE + 43);
  3021.   {$EXTERNALSYM SERVICE_UIC_M_UAS_SERVERS_NMEMB}
  3022.   // This computer is not a member of the group SERVERS.
  3024.   SERVICE_UIC_M_UAS_SERVERS_NOGRP = (SERVICE_BASE + 44);
  3025.   {$EXTERNALSYM SERVICE_UIC_M_UAS_SERVERS_NOGRP}
  3026.   // The group SERVERS is not present in the local security database.
  3028.   SERVICE_UIC_M_UAS_INVALID_ROLE  = (SERVICE_BASE + 45);
  3029.   {$EXTERNALSYM SERVICE_UIC_M_UAS_INVALID_ROLE}
  3030.   // This Windows NT computer is configured as a member of a workgroup, not as
  3031.   // a member of a domain. The Netlogon service does not need to run in this
  3032.   // configuration.
  3034.   SERVICE_UIC_M_NETLOGON_NO_DC    = (SERVICE_BASE + 46);
  3035.   {$EXTERNALSYM SERVICE_UIC_M_NETLOGON_NO_DC}
  3036.   // The Windows NT domain controller for this domain could not be located.
  3038.   SERVICE_UIC_M_NETLOGON_DC_CFLCT = (SERVICE_BASE + 47);
  3039.   {$EXTERNALSYM SERVICE_UIC_M_NETLOGON_DC_CFLCT}
  3040.   // This computer is configured to be the primary domain controller of its domain.
  3041.   // However, the computer %1 is currently claiming to be the primary domain controller
  3042.   // of the domain.
  3044.   SERVICE_UIC_M_NETLOGON_AUTH     = (SERVICE_BASE + 48);
  3045.   {$EXTERNALSYM SERVICE_UIC_M_NETLOGON_AUTH}
  3046.   // The service failed to authenticate with the primary domain controller.
  3048.   SERVICE_UIC_M_UAS_PROLOG        = (SERVICE_BASE + 49);
  3049.   {$EXTERNALSYM SERVICE_UIC_M_UAS_PROLOG}
  3050.   // There is a problem with the security database creation date or serial number.
  3052.   SERVICE2_BASE    = 5600;
  3053.   {$EXTERNALSYM SERVICE2_BASE}
  3054.   // new SEVICE_UIC messages go here
  3056.   SERVICE_UIC_M_NETLOGON_MPATH    = (SERVICE2_BASE + 0);
  3057.   {$EXTERNALSYM SERVICE_UIC_M_NETLOGON_MPATH}
  3058.   // Could not share the User or Script path.
  3060.   SERVICE_UIC_M_LSA_MACHINE_ACCT  = (SERVICE2_BASE + 1);
  3061.   {$EXTERNALSYM SERVICE_UIC_M_LSA_MACHINE_ACCT}
  3062.   // The password for this computer is not found in the local security
  3063.   // database.
  3065.   SERVICE_UIC_M_DATABASE_ERROR    = (SERVICE2_BASE + 2);
  3066.   {$EXTERNALSYM SERVICE_UIC_M_DATABASE_ERROR}
  3067.   // An internal error occurred while accessing the computer's
  3068.   // local or network security database.
  3070. // End modifiers
  3072. // Commonly used Macros:
  3074. function SERVICE_IP_CODE(tt, nn: LongInt): LongInt;
  3075. {$EXTERNALSYM SERVICE_IP_CODE}
  3077. function SERVICE_CCP_CODE(tt, nn: LongInt): LongInt;
  3078. {$EXTERNALSYM SERVICE_CCP_CODE}
  3080. function SERVICE_UIC_CODE(cc, mm: LongInt): LongInt;
  3081. {$EXTERNALSYM SERVICE_UIC_CODE}
  3083. // This macro takes a wait hint (tt) which can have a maximum value of
  3084. // 0xFFFF and puts it into the service status code field.
  3085. // 0x0FF1FFnn  (where nn is the checkpoint information).
  3087. function SERVICE_NT_CCP_CODE(tt, nn: LongInt): LongInt;
  3088. {$EXTERNALSYM SERVICE_NT_CCP_CODE}
  3090. // This macro takes a status code field, and strips out the wait hint
  3091. // from the upper and lower sections.
  3092. // 0x0FF1FFnn results in 0x0000FFFF.
  3094. function SERVICE_NT_WAIT_GET(code: DWORD): DWORD;
  3095. {$EXTERNALSYM SERVICE_NT_WAIT_GET}
  3097. // Translated from LMUSE.H
  3099. function NetUseAdd(UncServerName: LPWSTR; Level: DWORD; Buf: Pointer;
  3100.   ParmError: PDWORD): NET_API_STATUS; stdcall;
  3101. {$EXTERNALSYM NetUseAdd}
  3103. function NetUseDel(UncServerName, UseName: LPWSTR; ForceCond: DWORD): NET_API_STATUS; stdcall;
  3104. {$EXTERNALSYM NetUseDel}
  3106. function NetUseEnum(UncServerName: LPWSTR; Level: DWORD; BufPtr: Pointer;
  3107.   PreferedMaximumSize: DWORD; var EntriesRead: DWORD; var TotalEntries: DWORD;
  3108.   ResumeHandle: PDWORD): NET_API_STATUS; stdcall;
  3109. {$EXTERNALSYM NetUseEnum}
  3111. function NetUseGetInfo(UncServerName: LPWSTR; UseName: LPWSTR; Level: DWORD;
  3112.   BufPtr: Pointer): NET_API_STATUS; stdcall;
  3113. {$EXTERNALSYM NetUseGetInfo}
  3115. type
  3116.   PUseInfo0 = ^TUseInfo0;
  3117.   _USE_INFO_0 = record
  3118.     ui0_local: LPWSTR;
  3119.     ui0_remote: LPWSTR;
  3120.   end;
  3121.   {$EXTERNALSYM _USE_INFO_0}
  3122.   TUseInfo0 = _USE_INFO_0;
  3123.   USE_INFO_0 = _USE_INFO_0;
  3124.   {$EXTERNALSYM USE_INFO_0}
  3127.   PUseInfo1 = ^TUseInfo1;
  3128.   _USE_INFO_1 = record
  3129.     ui1_local: LPWSTR;
  3130.     ui1_remote: LPWSTR;
  3131.     ui1_password: LPWSTR;
  3132.     ui1_status: DWORD;
  3133.     ui1_asg_type: DWORD;
  3134.     ui1_refcount: DWORD;
  3135.     ui1_usecount: DWORD;
  3136.   end;
  3137.   {$EXTERNALSYM _USE_INFO_1}
  3138.   TUseInfo1 = _USE_INFO_1;
  3139.   USE_INFO_1 = _USE_INFO_1;
  3140.   {$EXTERNALSYM USE_INFO_1}
  3143.   PUseInfo2 = ^TUseInfo2;
  3144.   _USE_INFO_2 = record
  3145.     ui2_local: LPWSTR;
  3146.     ui2_remote: LPWSTR;
  3147.     ui2_password: LPWSTR;
  3148.     ui2_status: DWORD;
  3149.     ui2_asg_type: DWORD;
  3150.     ui2_refcount: DWORD;
  3151.     ui2_usecount: DWORD;
  3152.     ui2_username: LPWSTR;
  3153.     ui2_domainname: LPWSTR;
  3154.   end;
  3155.   {$EXTERNALSYM _USE_INFO_2}
  3156.   TUseInfo2 = _USE_INFO_2;
  3157.   USE_INFO_2 = _USE_INFO_2;
  3158.   {$EXTERNALSYM USE_INFO_2}
  3161.   PUseInfo3 = ^TUseInfo3;
  3162.   _USE_INFO_3 = record
  3163.     ui3_ui2: USE_INFO_2;
  3164.     ui3_flags: ULONG;
  3165.   end;
  3166.   {$EXTERNALSYM _USE_INFO_3}
  3167.   TUseInfo3 = _USE_INFO_3;
  3168.   USE_INFO_3 = _USE_INFO_3;
  3169.   {$EXTERNALSYM USE_INFO_3}
  3171. // One of these values indicates the parameter within an information
  3172. // structure that is invalid when ERROR_INVALID_PARAMETER is returned by
  3173. // NetUseAdd.
  3175. const
  3176.   USE_LOCAL_PARMNUM       = 1;
  3177.   {$EXTERNALSYM USE_LOCAL_PARMNUM}
  3178.   USE_REMOTE_PARMNUM      = 2;
  3179.   {$EXTERNALSYM USE_REMOTE_PARMNUM}
  3180.   USE_PASSWORD_PARMNUM    = 3;
  3181.   {$EXTERNALSYM USE_PASSWORD_PARMNUM}
  3182.   USE_ASGTYPE_PARMNUM     = 4;
  3183.   {$EXTERNALSYM USE_ASGTYPE_PARMNUM}
  3184.   USE_USERNAME_PARMNUM    = 5;
  3185.   {$EXTERNALSYM USE_USERNAME_PARMNUM}
  3186.   USE_DOMAINNAME_PARMNUM  = 6;
  3187.   {$EXTERNALSYM USE_DOMAINNAME_PARMNUM}
  3189. // Values appearing in the ui1_status field of use_info_1 structure.
  3190. // Note that USE_SESSLOST and USE_DISCONN are synonyms.
  3192.   USE_OK                  = 0;
  3193.   {$EXTERNALSYM USE_OK}
  3194.   USE_PAUSED              = 1;
  3195.   {$EXTERNALSYM USE_PAUSED}
  3196.   USE_SESSLOST            = 2;
  3197.   {$EXTERNALSYM USE_SESSLOST}
  3198.   USE_DISCONN             = 2;
  3199.   {$EXTERNALSYM USE_DISCONN}
  3200.   USE_NETERR              = 3;
  3201.   {$EXTERNALSYM USE_NETERR}
  3202.   USE_CONN                = 4;
  3203.   {$EXTERNALSYM USE_CONN}
  3204.   USE_RECONN              = 5;
  3205.   {$EXTERNALSYM USE_RECONN}
  3207. // Values of the ui1_asg_type field of use_info_1 structure
  3209.   USE_WILDCARD            = DWORD(-1);
  3210.   {$EXTERNALSYM USE_WILDCARD}
  3211.   USE_DISKDEV             = 0;
  3212.   {$EXTERNALSYM USE_DISKDEV}
  3213.   USE_SPOOLDEV            = 1;
  3214.   {$EXTERNALSYM USE_SPOOLDEV}
  3215.   USE_CHARDEV             = 2;
  3216.   {$EXTERNALSYM USE_CHARDEV}
  3217.   USE_IPC                 = 3;
  3218.   {$EXTERNALSYM USE_IPC}
  3220. // Flags defined in the use_info_3 structure
  3222.   CREATE_NO_CONNECT = $1;        // creation flags
  3223.   {$EXTERNALSYM CREATE_NO_CONNECT}
  3224.   CREATE_BYPASS_CSC = $2;        // force connection to server, bypassing CSC
  3225.                                  //  all ops on this connection go to the server,
  3226.                                  //  never to the cache
  3227.   {$EXTERNALSYM CREATE_BYPASS_CSC}
  3229. // Translated from LMWKSTA.H
  3231. function NetWkstaGetInfo(servername: LPWSTR; level: DWORD;
  3232.   var bufptr: Pointer): NET_API_STATUS; stdcall;
  3233. {$EXTERNALSYM NetWkstaGetInfo}
  3235. function NetWkstaSetInfo(servername: LPWSTR; level: DWORD; buffer: Pointer;
  3236.   parm_err: PDWORD): NET_API_STATUS; stdcall;
  3237. {$EXTERNALSYM NetWkstaSetInfo}
  3239. function NetWkstaUserGetInfo(reserved: LPWSTR; level: DWORD;
  3240.   bufptr: Pointer): NET_API_STATUS; stdcall;
  3241. {$EXTERNALSYM NetWkstaUserGetInfo}
  3243. function NetWkstaUserSetInfo(reserved: LPWSTR; level: DWORD; buf: Pointer;
  3244.   parm_err: PDWORD): NET_API_STATUS; stdcall;
  3245. {$EXTERNALSYM NetWkstaUserSetInfo}
  3247. function NetWkstaUserEnum(servername: LPWSTR; level: DWORD; bufptr: Pointer;
  3248.   prefmaxlen: DWORD; var entriesread: DWORD; var totalentries: DWORD;
  3249.   resumehandle: PDWORD): NET_API_STATUS; stdcall;
  3250. {$EXTERNALSYM NetWkstaUserEnum}
  3252. function NetWkstaTransportAdd(servername: LPWSTR; level: DWORD; buf: Pointer;
  3253.   parm_err: PDWORD): NET_API_STATUS; stdcall;
  3254. {$EXTERNALSYM NetWkstaTransportAdd}