Windows编程

开发平台：

Delphi

JwaNtDsApi.pas：源码内容

function DsCrackUnquotedMangledRdnW(pszRDN: LPCWSTR; cchRDN: DWORD; pGuid: LPGUID; peDsMangleFor: PDsMangleFor): BOOL; stdcall;
{$EXTERNALSYM DsCrackUnquotedMangledRdnW}
function DsCrackUnquotedMangledRdnA(pszRDN: LPCSTR; cchRDN: DWORD; pGuid: LPGUID; peDsMangleFor: PDsMangleFor): BOOL; stdcall;
{$EXTERNALSYM DsCrackUnquotedMangledRdnA}
{$IFDEF UNICODE}
function DsCrackUnquotedMangledRdn(pszRDN: LPCWSTR; cchRDN: DWORD; pGuid: LPGUID; peDsMangleFor: PDsMangleFor): BOOL; stdcall;
{$EXTERNALSYM DsCrackUnquotedMangledRdn}
{$ELSE}
function DsCrackUnquotedMangledRdn(pszRDN: LPCSTR; cchRDN: DWORD; pGuid: LPGUID; peDsMangleFor: PDsMangleFor): BOOL; stdcall;
{$EXTERNALSYM DsCrackUnquotedMangledRdn}
{$ENDIF}
(*++
==========================================================
NTDSAPI
BOOL
WINAPI
DsIsMangledRdnValueW(
LPCWSTR pszRdn,
DWORD cRdn,
DS_MANGLE_FOR eDsMangleForDesired
);
Description
Determine if the given RDN Value is mangled, and of the given type. Note that
the key portion of an RDN should not be supplied.
The name may be quoted or unquoted. This routine tries to unquote the value. If
the unquote operation fails, the routine proceeds to attempt the unmangle.
A change was made in the default quoting behavior of DNs returned from the DS
between Windows 2000 and Windows XP. This routine transparently handles RDNs with
special characters in either form.
The routine expects the value part of the RDN.
If you have full DN, use DsIsMangledDn() below.
To check for deleted name:
DsIsMangledRdnValueW( rdn, rdnlen, DS_MANGLE_OBJECT_FOR_DELETION )
To check for a conflicted name:
DsIsMangledRdnValueW( rdn, rdnlen, DS_MANGLE_OBJECT_FOR_NAME_CONFLICT )
Arguments:
pszRdn (IN) - RDN value character string. Termination is not required and
is ignored.
cRdn (IN) - Length of RDN value in characters excluding termination
eDsMangleForDesired (IN) - Type of mangling to check for
Return Value:
BOOL - True if the Rdn is mangled and is of the required type
--*)
function DsIsMangledRdnValueW(pszRdn: LPCWSTR; cRdn: DWORD; eDsMangleForDesired: DS_MANGLE_FOR): BOOL; stdcall;
{$EXTERNALSYM DsIsMangledRdnValueW}
function DsIsMangledRdnValueA(pszRdn: LPCSTR; cRdn: DWORD; eDsMangleForDesired: DS_MANGLE_FOR): BOOL; stdcall;
{$EXTERNALSYM DsIsMangledRdnValueA}
{$IFDEF UNICODE}
function DsIsMangledRdnValue(pszRdn: LPCWSTR; cRdn: DWORD; eDsMangleForDesired: DS_MANGLE_FOR): BOOL; stdcall;
{$EXTERNALSYM DsIsMangledRdnValue}
{$ELSE}
function DsIsMangledRdnValue(pszRdn: LPCSTR; cRdn: DWORD; eDsMangleForDesired: DS_MANGLE_FOR): BOOL; stdcall;
{$EXTERNALSYM DsIsMangledRdnValue}
{$ENDIF}
(*++
==========================================================
NTDSAPI
BOOL
WINAPI
DsIsMangledDnW(
LPCWSTR pszDn,
DS_MANGLE_FOR eDsMangleFor
);
Description
Determine if the first RDN in a quoted DN is a mangled name of given type.
The DN must be suitable for input to DsGetRdn().
To check for deleted name:
DsIsMangledDnW( dn, DS_MANGLE_OBJECT_FOR_DELETION )
To check for a conflicted name:
DsIsMangledDnW( Dn, DS_MANGLE_OBJECT_FOR_NAME_CONFLICT )
Arguments:
pszDn (IN) - Quoted Distinguished Name as returned by DS functions
eDsMangleFor (IN) - Type of mangling to check for
Return Value:
BOOL - True if first RDN is mangled and is of the given mangle type
--*)
function DsIsMangledDnA(pszDn: LPCSTR; eDsMangleFor: DS_MANGLE_FOR): BOOL; stdcall;
{$EXTERNALSYM DsIsMangledDnA}
function DsIsMangledDnW(pszDn: LPCWSTR; eDsMangleFor: DS_MANGLE_FOR): BOOL; stdcall;
{$EXTERNALSYM DsIsMangledDnW}
{$IFDEF UNICODE}
function DsIsMangledDn(pszDn: LPCWSTR; eDsMangleFor: DS_MANGLE_FOR): BOOL; stdcall;
{$EXTERNALSYM DsIsMangledDn}
{$ELSE}
function DsIsMangledDn(pszDn: LPCSTR; eDsMangleFor: DS_MANGLE_FOR): BOOL; stdcall;
{$EXTERNALSYM DsIsMangledDn}
{$ENDIF}
implementation
const
ntdsapilib = 'ntdsapi.dll';
function NTDSCONN_IGNORE_SCHEDULE(_options_: DWORD): DWORD;
begin
// todo NTDSCONN_OPT_IGNORE_SCHEDULE_MASK only defined in pre-release version
Result := (_options_ and DWORD($80000000){NTDSCONN_OPT_IGNORE_SCHEDULE_MASK}) shr 31;
end;
function FRSCONN_GET_PRIORITY(_options_: DWORD): DWORD;
begin
if ((_options_ and FRSCONN_PRIORITY_MASK) shr 28) <> 0 then
Result := (_options_ and FRSCONN_PRIORITY_MASK) shr 28
else
Result := FRSCONN_MAX_PRIORITY;
end;
{$IFDEF DYNAMIC_LINK}
var
_DsBindA: Pointer;
function DsBindA;
begin
GetProcedureAddress(_DsBindA, ntdsapilib, 'DsBindA');
asm
mov esp, ebp
pop ebp
jmp [_DsBindA]
end;
end;
{$ELSE}
function DsBindA; external ntdsapilib name 'DsBindA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsBindW: Pointer;
function DsBindW;
begin
GetProcedureAddress(_DsBindW, ntdsapilib, 'DsBindW');
asm
mov esp, ebp
pop ebp
jmp [_DsBindW]
end;
end;
{$ELSE}
function DsBindW; external ntdsapilib name 'DsBindW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsBind: Pointer;
function DsBind;
begin
GetProcedureAddress(_DsBind, ntdsapilib, 'DsBindW');
asm
mov esp, ebp
pop ebp
jmp [_DsBind]
end;
end;
{$ELSE}
function DsBind; external ntdsapilib name 'DsBindW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsBind: Pointer;
function DsBind;
begin
GetProcedureAddress(_DsBind, ntdsapilib, 'DsBindA');
asm
mov esp, ebp
pop ebp
jmp [_DsBind]
end;
end;
{$ELSE}
function DsBind; external ntdsapilib name 'DsBindA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsBindWithCredA: Pointer;
function DsBindWithCredA;
begin
GetProcedureAddress(_DsBindWithCredA, ntdsapilib, 'DsBindWithCredA');
asm
mov esp, ebp
pop ebp
jmp [_DsBindWithCredA]
end;
end;
{$ELSE}
function DsBindWithCredA; external ntdsapilib name 'DsBindWithCredA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsBindWithCredW: Pointer;
function DsBindWithCredW;
begin
GetProcedureAddress(_DsBindWithCredW, ntdsapilib, 'DsBindWithCredW');
asm
mov esp, ebp
pop ebp
jmp [_DsBindWithCredW]
end;
end;
{$ELSE}
function DsBindWithCredW; external ntdsapilib name 'DsBindWithCredW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsBindWithCred: Pointer;
function DsBindWithCred;
begin
GetProcedureAddress(_DsBindWithCred, ntdsapilib, 'DsBindWithCredW');
asm
mov esp, ebp
pop ebp
jmp [_DsBindWithCred]
end;
end;
{$ELSE}
function DsBindWithCred; external ntdsapilib name 'DsBindWithCredW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsBindWithCred: Pointer;
function DsBindWithCred;
begin
GetProcedureAddress(_DsBindWithCred, ntdsapilib, 'DsBindWithCredA');
asm
mov esp, ebp
pop ebp
jmp [_DsBindWithCred]
end;
end;
{$ELSE}
function DsBindWithCred; external ntdsapilib name 'DsBindWithCredA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsBindWithSpnA: Pointer;
function DsBindWithSpnA;
begin
GetProcedureAddress(_DsBindWithSpnA, ntdsapilib, 'DsBindWithSpnA');
asm
mov esp, ebp
pop ebp
jmp [_DsBindWithSpnA]
end;
end;
{$ELSE}
function DsBindWithSpnA; external ntdsapilib name 'DsBindWithSpnA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsBindWithSpnW: Pointer;
function DsBindWithSpnW;
begin
GetProcedureAddress(_DsBindWithSpnW, ntdsapilib, 'DsBindWithSpnW');
asm
mov esp, ebp
pop ebp
jmp [_DsBindWithSpnW]
end;
end;
{$ELSE}
function DsBindWithSpnW; external ntdsapilib name 'DsBindWithSpnW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsBindWithSpn: Pointer;
function DsBindWithSpn;
begin
GetProcedureAddress(_DsBindWithSpn, ntdsapilib, 'DsBindWithSpnW');
asm
mov esp, ebp
pop ebp
jmp [_DsBindWithSpn]
end;
end;
{$ELSE}
function DsBindWithSpn; external ntdsapilib name 'DsBindWithSpnW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsBindWithSpn: Pointer;
function DsBindWithSpn;
begin
GetProcedureAddress(_DsBindWithSpn, ntdsapilib, 'DsBindWithSpnA');
asm
mov esp, ebp
pop ebp
jmp [_DsBindWithSpn]
end;
end;
{$ELSE}
function DsBindWithSpn; external ntdsapilib name 'DsBindWithSpnA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsBindWithSpnExW: Pointer;
function DsBindWithSpnExW;
begin
GetProcedureAddress(_DsBindWithSpnExW, ntdsapilib, 'DsBindWithSpnExW');
asm
mov esp, ebp
pop ebp
jmp [_DsBindWithSpnExW]
end;
end;
{$ELSE}
function DsBindWithSpnExW; external ntdsapilib name 'DsBindWithSpnExW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsBindWithSpnExA: Pointer;
function DsBindWithSpnExA;
begin
GetProcedureAddress(_DsBindWithSpnExA, ntdsapilib, 'DsBindWithSpnExA');
asm
mov esp, ebp
pop ebp
jmp [_DsBindWithSpnExA]
end;
end;
{$ELSE}
function DsBindWithSpnExA; external ntdsapilib name 'DsBindWithSpnExA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsBindWithSpnEx: Pointer;
function DsBindWithSpnEx;
begin
GetProcedureAddress(_DsBindWithSpnEx, ntdsapilib, 'DsBindWithSpnExW');
asm
mov esp, ebp
pop ebp
jmp [_DsBindWithSpnEx]
end;
end;
{$ELSE}
function DsBindWithSpnEx; external ntdsapilib name 'DsBindWithSpnExW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsBindWithSpnEx: Pointer;
function DsBindWithSpnEx;
begin
GetProcedureAddress(_DsBindWithSpnEx, ntdsapilib, 'DsBindWithSpnExA');
asm
mov esp, ebp
pop ebp
jmp [_DsBindWithSpnEx]
end;
end;
{$ELSE}
function DsBindWithSpnEx; external ntdsapilib name 'DsBindWithSpnExA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsBindToISTGW: Pointer;
function DsBindToISTGW;
begin
GetProcedureAddress(_DsBindToISTGW, ntdsapilib, 'DsBindToISTGW');
asm
mov esp, ebp
pop ebp
jmp [_DsBindToISTGW]
end;
end;
{$ELSE}
function DsBindToISTGW; external ntdsapilib name 'DsBindToISTGW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsBindToISTGA: Pointer;
function DsBindToISTGA;
begin
GetProcedureAddress(_DsBindToISTGA, ntdsapilib, 'DsBindToISTGA');
asm
mov esp, ebp
pop ebp
jmp [_DsBindToISTGA]
end;
end;
{$ELSE}
function DsBindToISTGA; external ntdsapilib name 'DsBindToISTGA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsBindToISTG: Pointer;
function DsBindToISTG;
begin
GetProcedureAddress(_DsBindToISTG, ntdsapilib, 'DsBindToISTGW');
asm
mov esp, ebp
pop ebp
jmp [_DsBindToISTG]
end;
end;
{$ELSE}
function DsBindToISTG; external ntdsapilib name 'DsBindToISTGW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsBindToISTG: Pointer;
function DsBindToISTG;
begin
GetProcedureAddress(_DsBindToISTG, ntdsapilib, 'DsBindToISTGA');
asm
mov esp, ebp
pop ebp
jmp [_DsBindToISTG]
end;
end;
{$ELSE}
function DsBindToISTG; external ntdsapilib name 'DsBindToISTGA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsBindingSetTimeout: Pointer;
function DsBindingSetTimeout;
begin
GetProcedureAddress(_DsBindingSetTimeout, ntdsapilib, 'DsBindingSetTimeout');
asm
mov esp, ebp
pop ebp
jmp [_DsBindingSetTimeout]
end;
end;
{$ELSE}
function DsBindingSetTimeout; external ntdsapilib name 'DsBindingSetTimeout';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsUnBindA: Pointer;
function DsUnBindA;
begin
GetProcedureAddress(_DsUnBindA, ntdsapilib, 'DsUnBindA');
asm
mov esp, ebp
pop ebp
jmp [_DsUnBindA]
end;
end;
{$ELSE}
function DsUnBindA; external ntdsapilib name 'DsUnBindA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsUnBindW: Pointer;
function DsUnBindW;
begin
GetProcedureAddress(_DsUnBindW, ntdsapilib, 'DsUnBindW');
asm
mov esp, ebp
pop ebp
jmp [_DsUnBindW]
end;
end;
{$ELSE}
function DsUnBindW; external ntdsapilib name 'DsUnBindW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsUnBind: Pointer;
function DsUnBind;
begin
GetProcedureAddress(_DsUnBind, ntdsapilib, 'DsUnBindW');
asm
mov esp, ebp
pop ebp
jmp [_DsUnBind]
end;
end;
{$ELSE}
function DsUnBind; external ntdsapilib name 'DsUnBindW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsUnBind: Pointer;
function DsUnBind;
begin
GetProcedureAddress(_DsUnBind, ntdsapilib, 'DsUnBindA');
asm
mov esp, ebp
pop ebp
jmp [_DsUnBind]
end;
end;
{$ELSE}
function DsUnBind; external ntdsapilib name 'DsUnBindA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsMakePasswordCredentialsA: Pointer;
function DsMakePasswordCredentialsA;
begin
GetProcedureAddress(_DsMakePasswordCredentialsA, ntdsapilib, 'DsMakePasswordCredentialsA');
asm
mov esp, ebp
pop ebp
jmp [_DsMakePasswordCredentialsA]
end;
end;
{$ELSE}
function DsMakePasswordCredentialsA; external ntdsapilib name 'DsMakePasswordCredentialsA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsMakePasswordCredentialsW: Pointer;
function DsMakePasswordCredentialsW;
begin
GetProcedureAddress(_DsMakePasswordCredentialsW, ntdsapilib, 'DsMakePasswordCredentialsW');
asm
mov esp, ebp
pop ebp
jmp [_DsMakePasswordCredentialsW]
end;
end;
{$ELSE}
function DsMakePasswordCredentialsW; external ntdsapilib name 'DsMakePasswordCredentialsW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsMakePasswordCredentials: Pointer;
function DsMakePasswordCredentials;
begin
GetProcedureAddress(_DsMakePasswordCredentials, ntdsapilib, 'DsMakePasswordCredentialsW');
asm
mov esp, ebp
pop ebp
jmp [_DsMakePasswordCredentials]
end;
end;
{$ELSE}
function DsMakePasswordCredentials; external ntdsapilib name 'DsMakePasswordCredentialsW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsMakePasswordCredentials: Pointer;
function DsMakePasswordCredentials;
begin
GetProcedureAddress(_DsMakePasswordCredentials, ntdsapilib, 'DsMakePasswordCredentialsA');
asm
mov esp, ebp
pop ebp
jmp [_DsMakePasswordCredentials]
end;
end;
{$ELSE}
function DsMakePasswordCredentials; external ntdsapilib name 'DsMakePasswordCredentialsA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsFreePasswordCredentials: Pointer;
procedure DsFreePasswordCredentials;
begin
GetProcedureAddress(_DsFreePasswordCredentials, ntdsapilib, 'DsFreePasswordCredentials');
asm
mov esp, ebp
pop ebp
jmp [_DsFreePasswordCredentials]
end;
end;
{$ELSE}
procedure DsFreePasswordCredentials; external ntdsapilib name 'DsFreePasswordCredentials';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsFreePasswordCredentialsA: Pointer;
procedure DsFreePasswordCredentialsA;
begin
GetProcedureAddress(_DsFreePasswordCredentialsA, ntdsapilib, 'DsFreePasswordCredentials');
asm
mov esp, ebp
pop ebp
jmp [_DsFreePasswordCredentialsA]
end;
end;
{$ELSE}
procedure DsFreePasswordCredentialsA; external ntdsapilib name 'DsFreePasswordCredentials';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsFreePasswordCredentialsW: Pointer;
procedure DsFreePasswordCredentialsW;
begin
GetProcedureAddress(_DsFreePasswordCredentialsW, ntdsapilib, 'DsFreePasswordCredentials');
asm
mov esp, ebp
pop ebp
jmp [_DsFreePasswordCredentialsW]
end;
end;
{$ELSE}
procedure DsFreePasswordCredentialsW; external ntdsapilib name 'DsFreePasswordCredentials';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsCrackNamesA: Pointer;
function DsCrackNamesA;
begin
GetProcedureAddress(_DsCrackNamesA, ntdsapilib, 'DsCrackNamesA');
asm
mov esp, ebp
pop ebp
jmp [_DsCrackNamesA]
end;
end;
{$ELSE}
function DsCrackNamesA; external ntdsapilib name 'DsCrackNamesA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsCrackNamesW: Pointer;
function DsCrackNamesW;
begin
GetProcedureAddress(_DsCrackNamesW, ntdsapilib, 'DsCrackNamesW');
asm
mov esp, ebp
pop ebp
jmp [_DsCrackNamesW]
end;
end;
{$ELSE}
function DsCrackNamesW; external ntdsapilib name 'DsCrackNamesW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsCrackNames: Pointer;
function DsCrackNames;
begin
GetProcedureAddress(_DsCrackNames, ntdsapilib, 'DsCrackNamesW');
asm
mov esp, ebp
pop ebp
jmp [_DsCrackNames]
end;
end;
{$ELSE}
function DsCrackNames; external ntdsapilib name 'DsCrackNamesW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsCrackNames: Pointer;
function DsCrackNames;
begin
GetProcedureAddress(_DsCrackNames, ntdsapilib, 'DsCrackNamesA');
asm
mov esp, ebp
pop ebp
jmp [_DsCrackNames]
end;
end;
{$ELSE}
function DsCrackNames; external ntdsapilib name 'DsCrackNamesA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsFreeNameResultA: Pointer;
procedure DsFreeNameResultA;
begin
GetProcedureAddress(_DsFreeNameResultA, ntdsapilib, 'DsFreeNameResultA');
asm
mov esp, ebp
pop ebp
jmp [_DsFreeNameResultA]
end;
end;
{$ELSE}
procedure DsFreeNameResultA; external ntdsapilib name 'DsFreeNameResultA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsFreeNameResultW: Pointer;
procedure DsFreeNameResultW;
begin
GetProcedureAddress(_DsFreeNameResultW, ntdsapilib, 'DsFreeNameResultW');
asm
mov esp, ebp
pop ebp
jmp [_DsFreeNameResultW]
end;
end;
{$ELSE}
procedure DsFreeNameResultW; external ntdsapilib name 'DsFreeNameResultW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsFreeNameResult: Pointer;
procedure DsFreeNameResult;
begin
GetProcedureAddress(_DsFreeNameResult, ntdsapilib, 'DsFreeNameResultW');
asm
mov esp, ebp
pop ebp
jmp [_DsFreeNameResult]
end;
end;
{$ELSE}
procedure DsFreeNameResult; external ntdsapilib name 'DsFreeNameResultW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsFreeNameResult: Pointer;
procedure DsFreeNameResult;
begin
GetProcedureAddress(_DsFreeNameResult, ntdsapilib, 'DsFreeNameResultA');
asm
mov esp, ebp
pop ebp
jmp [_DsFreeNameResult]
end;
end;
{$ELSE}
procedure DsFreeNameResult; external ntdsapilib name 'DsFreeNameResultA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsMakeSpnA: Pointer;
function DsMakeSpnA;
begin
GetProcedureAddress(_DsMakeSpnA, ntdsapilib, 'DsMakeSpnA');
asm
mov esp, ebp
pop ebp
jmp [_DsMakeSpnA]
end;
end;
{$ELSE}
function DsMakeSpnA; external ntdsapilib name 'DsMakeSpnA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsMakeSpnW: Pointer;
function DsMakeSpnW;
begin
GetProcedureAddress(_DsMakeSpnW, ntdsapilib, 'DsMakeSpnW');
asm
mov esp, ebp
pop ebp
jmp [_DsMakeSpnW]
end;
end;
{$ELSE}
function DsMakeSpnW; external ntdsapilib name 'DsMakeSpnW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsMakeSpn: Pointer;
function DsMakeSpn;
begin
GetProcedureAddress(_DsMakeSpn, ntdsapilib, 'DsMakeSpnW');
asm
mov esp, ebp
pop ebp
jmp [_DsMakeSpn]
end;
end;
{$ELSE}
function DsMakeSpn; external ntdsapilib name 'DsMakeSpnW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsMakeSpn: Pointer;
function DsMakeSpn;
begin
GetProcedureAddress(_DsMakeSpn, ntdsapilib, 'DsMakeSpnA');
asm
mov esp, ebp
pop ebp
jmp [_DsMakeSpn]
end;
end;
{$ELSE}
function DsMakeSpn; external ntdsapilib name 'DsMakeSpnA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsGetSpnA: Pointer;
function DsGetSpnA;
begin
GetProcedureAddress(_DsGetSpnA, ntdsapilib, 'DsGetSpnA');
asm
mov esp, ebp
pop ebp
jmp [_DsGetSpnA]
end;
end;
{$ELSE}
function DsGetSpnA; external ntdsapilib name 'DsGetSpnA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsGetSpnW: Pointer;
function DsGetSpnW;
begin
GetProcedureAddress(_DsGetSpnW, ntdsapilib, 'DsGetSpnW');
asm
mov esp, ebp
pop ebp
jmp [_DsGetSpnW]
end;
end;
{$ELSE}
function DsGetSpnW; external ntdsapilib name 'DsGetSpnW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsGetSpn: Pointer;
function DsGetSpn;
begin
GetProcedureAddress(_DsGetSpn, ntdsapilib, 'DsGetSpnW');
asm
mov esp, ebp
pop ebp
jmp [_DsGetSpn]
end;
end;
{$ELSE}
function DsGetSpn; external ntdsapilib name 'DsGetSpnW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsGetSpn: Pointer;
function DsGetSpn;
begin
GetProcedureAddress(_DsGetSpn, ntdsapilib, 'DsGetSpnA');
asm
mov esp, ebp
pop ebp
jmp [_DsGetSpn]
end;
end;
{$ELSE}
function DsGetSpn; external ntdsapilib name 'DsGetSpnA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsFreeSpnArrayA: Pointer;
procedure DsFreeSpnArrayA;
begin
GetProcedureAddress(_DsFreeSpnArrayA, ntdsapilib, 'DsFreeSpnArrayA');
asm
mov esp, ebp
pop ebp
jmp [_DsFreeSpnArrayA]
end;
end;
{$ELSE}
procedure DsFreeSpnArrayA; external ntdsapilib name 'DsFreeSpnArrayA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsFreeSpnArrayW: Pointer;
procedure DsFreeSpnArrayW;
begin
GetProcedureAddress(_DsFreeSpnArrayW, ntdsapilib, 'DsFreeSpnArrayW');
asm
mov esp, ebp
pop ebp
jmp [_DsFreeSpnArrayW]
end;
end;
{$ELSE}
procedure DsFreeSpnArrayW; external ntdsapilib name 'DsFreeSpnArrayW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsFreeSpnArray: Pointer;
procedure DsFreeSpnArray;
begin
GetProcedureAddress(_DsFreeSpnArray, ntdsapilib, 'DsFreeSpnArrayW');
asm
mov esp, ebp
pop ebp
jmp [_DsFreeSpnArray]
end;
end;
{$ELSE}
procedure DsFreeSpnArray; external ntdsapilib name 'DsFreeSpnArrayW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsFreeSpnArray: Pointer;
procedure DsFreeSpnArray;
begin
GetProcedureAddress(_DsFreeSpnArray, ntdsapilib, 'DsFreeSpnArrayA');
asm
mov esp, ebp
pop ebp
jmp [_DsFreeSpnArray]
end;
end;
{$ELSE}
procedure DsFreeSpnArray; external ntdsapilib name 'DsFreeSpnArrayA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsCrackSpnA: Pointer;
function DsCrackSpnA;
begin
GetProcedureAddress(_DsCrackSpnA, ntdsapilib, 'DsCrackSpnA');
asm
mov esp, ebp
pop ebp
jmp [_DsCrackSpnA]
end;
end;
{$ELSE}
function DsCrackSpnA; external ntdsapilib name 'DsCrackSpnA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsCrackSpnW: Pointer;
function DsCrackSpnW;
begin
GetProcedureAddress(_DsCrackSpnW, ntdsapilib, 'DsCrackSpnW');
asm
mov esp, ebp
pop ebp
jmp [_DsCrackSpnW]
end;
end;
{$ELSE}
function DsCrackSpnW; external ntdsapilib name 'DsCrackSpnW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsCrackSpn: Pointer;
function DsCrackSpn;
begin
GetProcedureAddress(_DsCrackSpn, ntdsapilib, 'DsCrackSpnW');
asm
mov esp, ebp
pop ebp
jmp [_DsCrackSpn]
end;
end;
{$ELSE}
function DsCrackSpn; external ntdsapilib name 'DsCrackSpnW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsCrackSpn: Pointer;
function DsCrackSpn;
begin
GetProcedureAddress(_DsCrackSpn, ntdsapilib, 'DsCrackSpnA');
asm
mov esp, ebp
pop ebp
jmp [_DsCrackSpn]
end;
end;
{$ELSE}
function DsCrackSpn; external ntdsapilib name 'DsCrackSpnA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsWriteAccountSpnA: Pointer;
function DsWriteAccountSpnA;
begin
GetProcedureAddress(_DsWriteAccountSpnA, ntdsapilib, 'DsWriteAccountSpnA');
asm
mov esp, ebp
pop ebp
jmp [_DsWriteAccountSpnA]
end;
end;
{$ELSE}
function DsWriteAccountSpnA; external ntdsapilib name 'DsWriteAccountSpnA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsWriteAccountSpnW: Pointer;
function DsWriteAccountSpnW;
begin
GetProcedureAddress(_DsWriteAccountSpnW, ntdsapilib, 'DsWriteAccountSpnW');
asm
mov esp, ebp
pop ebp
jmp [_DsWriteAccountSpnW]
end;
end;
{$ELSE}
function DsWriteAccountSpnW; external ntdsapilib name 'DsWriteAccountSpnW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsWriteAccountSpn: Pointer;
function DsWriteAccountSpn;
begin
GetProcedureAddress(_DsWriteAccountSpn, ntdsapilib, 'DsWriteAccountSpnW');
asm
mov esp, ebp
pop ebp
jmp [_DsWriteAccountSpn]
end;
end;
{$ELSE}
function DsWriteAccountSpn; external ntdsapilib name 'DsWriteAccountSpnW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsWriteAccountSpn: Pointer;
function DsWriteAccountSpn;
begin
GetProcedureAddress(_DsWriteAccountSpn, ntdsapilib, 'DsWriteAccountSpnA');
asm
mov esp, ebp
pop ebp
jmp [_DsWriteAccountSpn]
end;
end;
{$ELSE}
function DsWriteAccountSpn; external ntdsapilib name 'DsWriteAccountSpnA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsClientMakeSpnForTargetServerA: Pointer;
function DsClientMakeSpnForTargetServerA;
begin
GetProcedureAddress(_DsClientMakeSpnForTargetServerA, ntdsapilib, 'DsClientMakeSpnForTargetServerA');
asm
mov esp, ebp
pop ebp
jmp [_DsClientMakeSpnForTargetServerA]
end;
end;
{$ELSE}
function DsClientMakeSpnForTargetServerA; external ntdsapilib name 'DsClientMakeSpnForTargetServerA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsClientMakeSpnForTargetServerW: Pointer;
function DsClientMakeSpnForTargetServerW;
begin
GetProcedureAddress(_DsClientMakeSpnForTargetServerW, ntdsapilib, 'DsClientMakeSpnForTargetServerW');
asm
mov esp, ebp
pop ebp
jmp [_DsClientMakeSpnForTargetServerW]
end;
end;
{$ELSE}
function DsClientMakeSpnForTargetServerW; external ntdsapilib name 'DsClientMakeSpnForTargetServerW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsClientMakeSpnForTargetServer: Pointer;
function DsClientMakeSpnForTargetServer;
begin
GetProcedureAddress(_DsClientMakeSpnForTargetServer, ntdsapilib, 'DsClientMakeSpnForTargetServerW');
asm
mov esp, ebp
pop ebp
jmp [_DsClientMakeSpnForTargetServer]
end;
end;
{$ELSE}
function DsClientMakeSpnForTargetServer; external ntdsapilib name 'DsClientMakeSpnForTargetServerW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsClientMakeSpnForTargetServer: Pointer;
function DsClientMakeSpnForTargetServer;
begin
GetProcedureAddress(_DsClientMakeSpnForTargetServer, ntdsapilib, 'DsClientMakeSpnForTargetServerA');
asm
mov esp, ebp
pop ebp
jmp [_DsClientMakeSpnForTargetServer]
end;
end;
{$ELSE}
function DsClientMakeSpnForTargetServer; external ntdsapilib name 'DsClientMakeSpnForTargetServerA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsServerRegisterSpnA: Pointer;
function DsServerRegisterSpnA;
begin
GetProcedureAddress(_DsServerRegisterSpnA, ntdsapilib, 'DsServerRegisterSpnA');
asm
mov esp, ebp
pop ebp
jmp [_DsServerRegisterSpnA]
end;
end;
{$ELSE}
function DsServerRegisterSpnA; external ntdsapilib name 'DsServerRegisterSpnA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsServerRegisterSpnW: Pointer;
function DsServerRegisterSpnW;
begin
GetProcedureAddress(_DsServerRegisterSpnW, ntdsapilib, 'DsServerRegisterSpnW');
asm
mov esp, ebp
pop ebp
jmp [_DsServerRegisterSpnW]
end;
end;
{$ELSE}
function DsServerRegisterSpnW; external ntdsapilib name 'DsServerRegisterSpnW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsServerRegisterSpn: Pointer;
function DsServerRegisterSpn;
begin
GetProcedureAddress(_DsServerRegisterSpn, ntdsapilib, 'DsServerRegisterSpnW');
asm
mov esp, ebp
pop ebp
jmp [_DsServerRegisterSpn]
end;
end;
{$ELSE}
function DsServerRegisterSpn; external ntdsapilib name 'DsServerRegisterSpnW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsServerRegisterSpn: Pointer;
function DsServerRegisterSpn;
begin
GetProcedureAddress(_DsServerRegisterSpn, ntdsapilib, 'DsServerRegisterSpnA');
asm
mov esp, ebp
pop ebp
jmp [_DsServerRegisterSpn]
end;
end;
{$ELSE}
function DsServerRegisterSpn; external ntdsapilib name 'DsServerRegisterSpnA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaSyncA: Pointer;
function DsReplicaSyncA;
begin
GetProcedureAddress(_DsReplicaSyncA, ntdsapilib, 'DsReplicaSyncA');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaSyncA]
end;
end;
{$ELSE}
function DsReplicaSyncA; external ntdsapilib name 'DsReplicaSyncA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaSyncW: Pointer;
function DsReplicaSyncW;
begin
GetProcedureAddress(_DsReplicaSyncW, ntdsapilib, 'DsReplicaSyncW');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaSyncW]
end;
end;
{$ELSE}
function DsReplicaSyncW; external ntdsapilib name 'DsReplicaSyncW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaSync: Pointer;
function DsReplicaSync;
begin
GetProcedureAddress(_DsReplicaSync, ntdsapilib, 'DsReplicaSyncW');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaSync]
end;
end;
{$ELSE}
function DsReplicaSync; external ntdsapilib name 'DsReplicaSyncW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaSync: Pointer;
function DsReplicaSync;
begin
GetProcedureAddress(_DsReplicaSync, ntdsapilib, 'DsReplicaSyncA');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaSync]
end;
end;
{$ELSE}
function DsReplicaSync; external ntdsapilib name 'DsReplicaSyncA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaAddA: Pointer;
function DsReplicaAddA;
begin
GetProcedureAddress(_DsReplicaAddA, ntdsapilib, 'DsReplicaAddA');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaAddA]
end;
end;
{$ELSE}
function DsReplicaAddA; external ntdsapilib name 'DsReplicaAddA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaAddW: Pointer;
function DsReplicaAddW;
begin
GetProcedureAddress(_DsReplicaAddW, ntdsapilib, 'DsReplicaAddW');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaAddW]
end;
end;
{$ELSE}
function DsReplicaAddW; external ntdsapilib name 'DsReplicaAddW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaAdd: Pointer;
function DsReplicaAdd;
begin
GetProcedureAddress(_DsReplicaAdd, ntdsapilib, 'DsReplicaAddW');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaAdd]
end;
end;
{$ELSE}
function DsReplicaAdd; external ntdsapilib name 'DsReplicaAddW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaAdd: Pointer;
function DsReplicaAdd;
begin
GetProcedureAddress(_DsReplicaAdd, ntdsapilib, 'DsReplicaAddA');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaAdd]
end;
end;
{$ELSE}
function DsReplicaAdd; external ntdsapilib name 'DsReplicaAddA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaDelA: Pointer;
function DsReplicaDelA;
begin
GetProcedureAddress(_DsReplicaDelA, ntdsapilib, 'DsReplicaDelA');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaDelA]
end;
end;
{$ELSE}
function DsReplicaDelA; external ntdsapilib name 'DsReplicaDelA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaDelW: Pointer;
function DsReplicaDelW;
begin
GetProcedureAddress(_DsReplicaDelW, ntdsapilib, 'DsReplicaDelW');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaDelW]
end;
end;
{$ELSE}
function DsReplicaDelW; external ntdsapilib name 'DsReplicaDelW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaDel: Pointer;
function DsReplicaDel;
begin
GetProcedureAddress(_DsReplicaDel, ntdsapilib, 'DsReplicaDelW');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaDel]
end;
end;
{$ELSE}
function DsReplicaDel; external ntdsapilib name 'DsReplicaDelW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaDel: Pointer;
function DsReplicaDel;
begin
GetProcedureAddress(_DsReplicaDel, ntdsapilib, 'DsReplicaDelA');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaDel]
end;
end;
{$ELSE}
function DsReplicaDel; external ntdsapilib name 'DsReplicaDelA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaModifyA: Pointer;
function DsReplicaModifyA;
begin
GetProcedureAddress(_DsReplicaModifyA, ntdsapilib, 'DsReplicaModifyA');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaModifyA]
end;
end;
{$ELSE}
function DsReplicaModifyA; external ntdsapilib name 'DsReplicaModifyA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaModifyW: Pointer;
function DsReplicaModifyW;
begin
GetProcedureAddress(_DsReplicaModifyW, ntdsapilib, 'DsReplicaModifyW');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaModifyW]
end;
end;
{$ELSE}
function DsReplicaModifyW; external ntdsapilib name 'DsReplicaModifyW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaModify: Pointer;
function DsReplicaModify;
begin
GetProcedureAddress(_DsReplicaModify, ntdsapilib, 'DsReplicaModifyW');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaModify]
end;
end;
{$ELSE}
function DsReplicaModify; external ntdsapilib name 'DsReplicaModifyW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaModify: Pointer;
function DsReplicaModify;
begin
GetProcedureAddress(_DsReplicaModify, ntdsapilib, 'DsReplicaModifyA');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaModify]
end;
end;
{$ELSE}
function DsReplicaModify; external ntdsapilib name 'DsReplicaModifyA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaUpdateRefsA: Pointer;
function DsReplicaUpdateRefsA;
begin
GetProcedureAddress(_DsReplicaUpdateRefsA, ntdsapilib, 'DsReplicaUpdateRefsA');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaUpdateRefsA]
end;
end;
{$ELSE}
function DsReplicaUpdateRefsA; external ntdsapilib name 'DsReplicaUpdateRefsA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaUpdateRefsW: Pointer;
function DsReplicaUpdateRefsW;
begin
GetProcedureAddress(_DsReplicaUpdateRefsW, ntdsapilib, 'DsReplicaUpdateRefsW');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaUpdateRefsW]
end;
end;
{$ELSE}
function DsReplicaUpdateRefsW; external ntdsapilib name 'DsReplicaUpdateRefsW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaUpdateRefs: Pointer;
function DsReplicaUpdateRefs;
begin
GetProcedureAddress(_DsReplicaUpdateRefs, ntdsapilib, 'DsReplicaUpdateRefsW');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaUpdateRefs]
end;
end;
{$ELSE}
function DsReplicaUpdateRefs; external ntdsapilib name 'DsReplicaUpdateRefsW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaUpdateRefs: Pointer;
function DsReplicaUpdateRefs;
begin
GetProcedureAddress(_DsReplicaUpdateRefs, ntdsapilib, 'DsReplicaUpdateRefsA');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaUpdateRefs]
end;
end;
{$ELSE}
function DsReplicaUpdateRefs; external ntdsapilib name 'DsReplicaUpdateRefsA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaSyncAllA: Pointer;
function DsReplicaSyncAllA;
begin
GetProcedureAddress(_DsReplicaSyncAllA, ntdsapilib, 'DsReplicaSyncAllA');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaSyncAllA]
end;
end;
{$ELSE}
function DsReplicaSyncAllA; external ntdsapilib name 'DsReplicaSyncAllA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaSyncAllW: Pointer;
function DsReplicaSyncAllW;
begin
GetProcedureAddress(_DsReplicaSyncAllW, ntdsapilib, 'DsReplicaSyncAllW');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaSyncAllW]
end;
end;
{$ELSE}
function DsReplicaSyncAllW; external ntdsapilib name 'DsReplicaSyncAllW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaSyncAll: Pointer;
function DsReplicaSyncAll;
begin
GetProcedureAddress(_DsReplicaSyncAll, ntdsapilib, 'DsReplicaSyncAllW');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaSyncAll]
end;
end;
{$ELSE}
function DsReplicaSyncAll; external ntdsapilib name 'DsReplicaSyncAllW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaSyncAll: Pointer;
function DsReplicaSyncAll;
begin
GetProcedureAddress(_DsReplicaSyncAll, ntdsapilib, 'DsReplicaSyncAllA');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaSyncAll]
end;
end;
{$ELSE}
function DsReplicaSyncAll; external ntdsapilib name 'DsReplicaSyncAllA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsRemoveDsServerA: Pointer;
function DsRemoveDsServerA;
begin
GetProcedureAddress(_DsRemoveDsServerA, ntdsapilib, 'DsRemoveDsServerA');
asm
mov esp, ebp
pop ebp
jmp [_DsRemoveDsServerA]
end;
end;
{$ELSE}
function DsRemoveDsServerA; external ntdsapilib name 'DsRemoveDsServerA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsRemoveDsServerW: Pointer;
function DsRemoveDsServerW;
begin
GetProcedureAddress(_DsRemoveDsServerW, ntdsapilib, 'DsRemoveDsServerW');
asm
mov esp, ebp
pop ebp
jmp [_DsRemoveDsServerW]
end;
end;
{$ELSE}
function DsRemoveDsServerW; external ntdsapilib name 'DsRemoveDsServerW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsRemoveDsServer: Pointer;
function DsRemoveDsServer;
begin
GetProcedureAddress(_DsRemoveDsServer, ntdsapilib, 'DsRemoveDsServerW');
asm
mov esp, ebp
pop ebp
jmp [_DsRemoveDsServer]
end;
end;
{$ELSE}
function DsRemoveDsServer; external ntdsapilib name 'DsRemoveDsServerW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsRemoveDsServer: Pointer;
function DsRemoveDsServer;
begin
GetProcedureAddress(_DsRemoveDsServer, ntdsapilib, 'DsRemoveDsServerA');
asm
mov esp, ebp
pop ebp
jmp [_DsRemoveDsServer]
end;
end;
{$ELSE}
function DsRemoveDsServer; external ntdsapilib name 'DsRemoveDsServerA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsRemoveDsDomainA: Pointer;
function DsRemoveDsDomainA;
begin
GetProcedureAddress(_DsRemoveDsDomainA, ntdsapilib, 'DsRemoveDsDomainA');
asm
mov esp, ebp
pop ebp
jmp [_DsRemoveDsDomainA]
end;
end;
{$ELSE}
function DsRemoveDsDomainA; external ntdsapilib name 'DsRemoveDsDomainA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsRemoveDsDomainW: Pointer;
function DsRemoveDsDomainW;
begin
GetProcedureAddress(_DsRemoveDsDomainW, ntdsapilib, 'DsRemoveDsDomainW');
asm
mov esp, ebp
pop ebp
jmp [_DsRemoveDsDomainW]
end;
end;
{$ELSE}
function DsRemoveDsDomainW; external ntdsapilib name 'DsRemoveDsDomainW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsRemoveDsDomain: Pointer;
function DsRemoveDsDomain;
begin
GetProcedureAddress(_DsRemoveDsDomain, ntdsapilib, 'DsRemoveDsDomainW');
asm
mov esp, ebp
pop ebp
jmp [_DsRemoveDsDomain]
end;
end;
{$ELSE}
function DsRemoveDsDomain; external ntdsapilib name 'DsRemoveDsDomainW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsRemoveDsDomain: Pointer;
function DsRemoveDsDomain;
begin
GetProcedureAddress(_DsRemoveDsDomain, ntdsapilib, 'DsRemoveDsDomainA');
asm
mov esp, ebp
pop ebp
jmp [_DsRemoveDsDomain]
end;
end;
{$ELSE}
function DsRemoveDsDomain; external ntdsapilib name 'DsRemoveDsDomainA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsListSitesA: Pointer;
function DsListSitesA;
begin
GetProcedureAddress(_DsListSitesA, ntdsapilib, 'DsListSitesA');
asm
mov esp, ebp
pop ebp
jmp [_DsListSitesA]
end;
end;
{$ELSE}
function DsListSitesA; external ntdsapilib name 'DsListSitesA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsListSitesW: Pointer;
function DsListSitesW;
begin
GetProcedureAddress(_DsListSitesW, ntdsapilib, 'DsListSitesW');
asm
mov esp, ebp
pop ebp
jmp [_DsListSitesW]
end;
end;
{$ELSE}
function DsListSitesW; external ntdsapilib name 'DsListSitesW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsListSites: Pointer;
function DsListSites;
begin
GetProcedureAddress(_DsListSites, ntdsapilib, 'DsListSitesW');
asm
mov esp, ebp
pop ebp
jmp [_DsListSites]
end;
end;
{$ELSE}
function DsListSites; external ntdsapilib name 'DsListSitesW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsListSites: Pointer;
function DsListSites;
begin
GetProcedureAddress(_DsListSites, ntdsapilib, 'DsListSitesA');
asm
mov esp, ebp
pop ebp
jmp [_DsListSites]
end;
end;
{$ELSE}
function DsListSites; external ntdsapilib name 'DsListSitesA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsListServersInSiteA: Pointer;
function DsListServersInSiteA;
begin
GetProcedureAddress(_DsListServersInSiteA, ntdsapilib, 'DsListServersInSiteA');
asm
mov esp, ebp
pop ebp
jmp [_DsListServersInSiteA]
end;
end;
{$ELSE}
function DsListServersInSiteA; external ntdsapilib name 'DsListServersInSiteA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsListServersInSiteW: Pointer;
function DsListServersInSiteW;
begin
GetProcedureAddress(_DsListServersInSiteW, ntdsapilib, 'DsListServersInSiteW');
asm
mov esp, ebp
pop ebp
jmp [_DsListServersInSiteW]
end;
end;
{$ELSE}
function DsListServersInSiteW; external ntdsapilib name 'DsListServersInSiteW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsListServersInSite: Pointer;
function DsListServersInSite;
begin
GetProcedureAddress(_DsListServersInSite, ntdsapilib, 'DsListServersInSiteW');
asm
mov esp, ebp
pop ebp
jmp [_DsListServersInSite]
end;
end;
{$ELSE}
function DsListServersInSite; external ntdsapilib name 'DsListServersInSiteW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsListServersInSite: Pointer;
function DsListServersInSite;
begin
GetProcedureAddress(_DsListServersInSite, ntdsapilib, 'DsListServersInSiteA');
asm
mov esp, ebp
pop ebp
jmp [_DsListServersInSite]
end;
end;
{$ELSE}
function DsListServersInSite; external ntdsapilib name 'DsListServersInSiteA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsListDomainsInSiteA: Pointer;
function DsListDomainsInSiteA;
begin
GetProcedureAddress(_DsListDomainsInSiteA, ntdsapilib, 'DsListDomainsInSiteA');
asm
mov esp, ebp
pop ebp
jmp [_DsListDomainsInSiteA]
end;
end;
{$ELSE}
function DsListDomainsInSiteA; external ntdsapilib name 'DsListDomainsInSiteA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsListDomainsInSiteW: Pointer;
function DsListDomainsInSiteW;
begin
GetProcedureAddress(_DsListDomainsInSiteW, ntdsapilib, 'DsListDomainsInSiteW');
asm
mov esp, ebp
pop ebp
jmp [_DsListDomainsInSiteW]
end;
end;
{$ELSE}
function DsListDomainsInSiteW; external ntdsapilib name 'DsListDomainsInSiteW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsListDomainsInSite: Pointer;
function DsListDomainsInSite;
begin
GetProcedureAddress(_DsListDomainsInSite, ntdsapilib, 'DsListDomainsInSiteW');
asm
mov esp, ebp
pop ebp
jmp [_DsListDomainsInSite]
end;
end;
{$ELSE}
function DsListDomainsInSite; external ntdsapilib name 'DsListDomainsInSiteW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsListDomainsInSite: Pointer;
function DsListDomainsInSite;
begin
GetProcedureAddress(_DsListDomainsInSite, ntdsapilib, 'DsListDomainsInSiteA');
asm
mov esp, ebp
pop ebp
jmp [_DsListDomainsInSite]
end;
end;
{$ELSE}
function DsListDomainsInSite; external ntdsapilib name 'DsListDomainsInSiteA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsListServersForDomainInSiteA: Pointer;
function DsListServersForDomainInSiteA;
begin
GetProcedureAddress(_DsListServersForDomainInSiteA, ntdsapilib, 'DsListServersForDomainInSiteA');
asm
mov esp, ebp
pop ebp
jmp [_DsListServersForDomainInSiteA]
end;
end;
{$ELSE}
function DsListServersForDomainInSiteA; external ntdsapilib name 'DsListServersForDomainInSiteA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsListServersForDomainInSiteW: Pointer;
function DsListServersForDomainInSiteW;
begin
GetProcedureAddress(_DsListServersForDomainInSiteW, ntdsapilib, 'DsListServersForDomainInSiteW');
asm
mov esp, ebp
pop ebp
jmp [_DsListServersForDomainInSiteW]
end;
end;
{$ELSE}
function DsListServersForDomainInSiteW; external ntdsapilib name 'DsListServersForDomainInSiteW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsListServersForDomainInSite: Pointer;
function DsListServersForDomainInSite;
begin
GetProcedureAddress(_DsListServersForDomainInSite, ntdsapilib, 'DsListServersForDomainInSiteW');
asm
mov esp, ebp
pop ebp
jmp [_DsListServersForDomainInSite]
end;
end;
{$ELSE}
function DsListServersForDomainInSite; external ntdsapilib name 'DsListServersForDomainInSiteW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsListServersForDomainInSite: Pointer;
function DsListServersForDomainInSite;
begin
GetProcedureAddress(_DsListServersForDomainInSite, ntdsapilib, 'DsListServersForDomainInSiteA');
asm
mov esp, ebp
pop ebp
jmp [_DsListServersForDomainInSite]
end;
end;
{$ELSE}
function DsListServersForDomainInSite; external ntdsapilib name 'DsListServersForDomainInSiteA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsListInfoForServerA: Pointer;
function DsListInfoForServerA;
begin
GetProcedureAddress(_DsListInfoForServerA, ntdsapilib, 'DsListInfoForServerA');
asm
mov esp, ebp
pop ebp
jmp [_DsListInfoForServerA]
end;
end;
{$ELSE}
function DsListInfoForServerA; external ntdsapilib name 'DsListInfoForServerA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsListInfoForServerW: Pointer;
function DsListInfoForServerW;
begin
GetProcedureAddress(_DsListInfoForServerW, ntdsapilib, 'DsListInfoForServerW');
asm
mov esp, ebp
pop ebp
jmp [_DsListInfoForServerW]
end;
end;
{$ELSE}
function DsListInfoForServerW; external ntdsapilib name 'DsListInfoForServerW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsListInfoForServer: Pointer;
function DsListInfoForServer;
begin
GetProcedureAddress(_DsListInfoForServer, ntdsapilib, 'DsListInfoForServerW');
asm
mov esp, ebp
pop ebp
jmp [_DsListInfoForServer]
end;
end;
{$ELSE}
function DsListInfoForServer; external ntdsapilib name 'DsListInfoForServerW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsListInfoForServer: Pointer;
function DsListInfoForServer;
begin
GetProcedureAddress(_DsListInfoForServer, ntdsapilib, 'DsListInfoForServerA');
asm
mov esp, ebp
pop ebp
jmp [_DsListInfoForServer]
end;
end;
{$ELSE}
function DsListInfoForServer; external ntdsapilib name 'DsListInfoForServerA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsListRolesA: Pointer;
function DsListRolesA;
begin
GetProcedureAddress(_DsListRolesA, ntdsapilib, 'DsListRolesA');
asm
mov esp, ebp
pop ebp
jmp [_DsListRolesA]
end;
end;
{$ELSE}
function DsListRolesA; external ntdsapilib name 'DsListRolesA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsListRolesW: Pointer;
function DsListRolesW;
begin
GetProcedureAddress(_DsListRolesW, ntdsapilib, 'DsListRolesW');
asm
mov esp, ebp
pop ebp
jmp [_DsListRolesW]
end;
end;
{$ELSE}
function DsListRolesW; external ntdsapilib name 'DsListRolesW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsListRoles: Pointer;
function DsListRoles;
begin
GetProcedureAddress(_DsListRoles, ntdsapilib, 'DsListRolesW');
asm
mov esp, ebp
pop ebp
jmp [_DsListRoles]
end;
end;
{$ELSE}
function DsListRoles; external ntdsapilib name 'DsListRolesW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsListRoles: Pointer;
function DsListRoles;
begin
GetProcedureAddress(_DsListRoles, ntdsapilib, 'DsListRolesA');
asm
mov esp, ebp
pop ebp
jmp [_DsListRoles]
end;
end;
{$ELSE}
function DsListRoles; external ntdsapilib name 'DsListRolesA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsQuerySitesByCostW: Pointer;
function DsQuerySitesByCostW;
begin
GetProcedureAddress(_DsQuerySitesByCostW, ntdsapilib, 'DsQuerySitesByCostW');
asm
mov esp, ebp
pop ebp
jmp [_DsQuerySitesByCostW]
end;
end;
{$ELSE}
function DsQuerySitesByCostW; external ntdsapilib name 'DsQuerySitesByCostW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsQuerySitesByCostA: Pointer;
function DsQuerySitesByCostA;
begin
GetProcedureAddress(_DsQuerySitesByCostA, ntdsapilib, 'DsQuerySitesByCostA');
asm
mov esp, ebp
pop ebp
jmp [_DsQuerySitesByCostA]
end;
end;
{$ELSE}
function DsQuerySitesByCostA; external ntdsapilib name 'DsQuerySitesByCostA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsQuerySitesByCost: Pointer;
function DsQuerySitesByCost;
begin
GetProcedureAddress(_DsQuerySitesByCost, ntdsapilib, 'DsQuerySitesByCostW');
asm
mov esp, ebp
pop ebp
jmp [_DsQuerySitesByCost]
end;
end;
{$ELSE}
function DsQuerySitesByCost; external ntdsapilib name 'DsQuerySitesByCostW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsQuerySitesByCost: Pointer;
function DsQuerySitesByCost;
begin
GetProcedureAddress(_DsQuerySitesByCost, ntdsapilib, 'DsQuerySitesByCostA');
asm
mov esp, ebp
pop ebp
jmp [_DsQuerySitesByCost]
end;
end;
{$ELSE}
function DsQuerySitesByCost; external ntdsapilib name 'DsQuerySitesByCostA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsQuerySitesFree: Pointer;
procedure DsQuerySitesFree;
begin
GetProcedureAddress(_DsQuerySitesFree, ntdsapilib, 'DsQuerySitesFree');
asm
mov esp, ebp
pop ebp
jmp [_DsQuerySitesFree]
end;
end;
{$ELSE}
procedure DsQuerySitesFree; external ntdsapilib name 'DsQuerySitesFree';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsMapSchemaGuidsA: Pointer;
function DsMapSchemaGuidsA;
begin
GetProcedureAddress(_DsMapSchemaGuidsA, ntdsapilib, 'DsMapSchemaGuidsA');
asm
mov esp, ebp
pop ebp
jmp [_DsMapSchemaGuidsA]
end;
end;
{$ELSE}
function DsMapSchemaGuidsA; external ntdsapilib name 'DsMapSchemaGuidsA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsMapSchemaGuidsW: Pointer;
function DsMapSchemaGuidsW;
begin
GetProcedureAddress(_DsMapSchemaGuidsW, ntdsapilib, 'DsMapSchemaGuidsW');
asm
mov esp, ebp
pop ebp
jmp [_DsMapSchemaGuidsW]
end;
end;
{$ELSE}
function DsMapSchemaGuidsW; external ntdsapilib name 'DsMapSchemaGuidsW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsFreeSchemaGuidMapA: Pointer;
procedure DsFreeSchemaGuidMapA;
begin
GetProcedureAddress(_DsFreeSchemaGuidMapA, ntdsapilib, 'DsFreeSchemaGuidMapA');
asm
mov esp, ebp
pop ebp
jmp [_DsFreeSchemaGuidMapA]
end;
end;
{$ELSE}
procedure DsFreeSchemaGuidMapA; external ntdsapilib name 'DsFreeSchemaGuidMapA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsFreeSchemaGuidMapW: Pointer;
procedure DsFreeSchemaGuidMapW;
begin
GetProcedureAddress(_DsFreeSchemaGuidMapW, ntdsapilib, 'DsFreeSchemaGuidMapW');
asm
mov esp, ebp
pop ebp
jmp [_DsFreeSchemaGuidMapW]
end;
end;
{$ELSE}
procedure DsFreeSchemaGuidMapW; external ntdsapilib name 'DsFreeSchemaGuidMapW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsMapSchemaGuids: Pointer;
function DsMapSchemaGuids;
begin
GetProcedureAddress(_DsMapSchemaGuids, ntdsapilib, 'DsMapSchemaGuidsW');
asm
mov esp, ebp
pop ebp
jmp [_DsMapSchemaGuids]
end;
end;
{$ELSE}
function DsMapSchemaGuids; external ntdsapilib name 'DsMapSchemaGuidsW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsFreeSchemaGuidMap: Pointer;
procedure DsFreeSchemaGuidMap;
begin
GetProcedureAddress(_DsFreeSchemaGuidMap, ntdsapilib, 'DsFreeSchemaGuidMapW');
asm
mov esp, ebp
pop ebp
jmp [_DsFreeSchemaGuidMap]
end;
end;
{$ELSE}
procedure DsFreeSchemaGuidMap; external ntdsapilib name 'DsFreeSchemaGuidMapW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsMapSchemaGuids: Pointer;
function DsMapSchemaGuids;
begin
GetProcedureAddress(_DsMapSchemaGuids, ntdsapilib, 'DsMapSchemaGuidsA');
asm
mov esp, ebp
pop ebp
jmp [_DsMapSchemaGuids]
end;
end;
{$ELSE}
function DsMapSchemaGuids; external ntdsapilib name 'DsMapSchemaGuidsA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsFreeSchemaGuidMap: Pointer;
procedure DsFreeSchemaGuidMap;
begin
GetProcedureAddress(_DsFreeSchemaGuidMap, ntdsapilib, 'DsFreeSchemaGuidMapA');
asm
mov esp, ebp
pop ebp
jmp [_DsFreeSchemaGuidMap]
end;
end;
{$ELSE}
procedure DsFreeSchemaGuidMap; external ntdsapilib name 'DsFreeSchemaGuidMapA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsGetDomainControllerInfoA: Pointer;
function DsGetDomainControllerInfoA;
begin
GetProcedureAddress(_DsGetDomainControllerInfoA, ntdsapilib, 'DsGetDomainControllerInfoA');
asm
mov esp, ebp
pop ebp
jmp [_DsGetDomainControllerInfoA]
end;
end;
{$ELSE}
function DsGetDomainControllerInfoA; external ntdsapilib name 'DsGetDomainControllerInfoA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsGetDomainControllerInfoW: Pointer;
function DsGetDomainControllerInfoW;
begin
GetProcedureAddress(_DsGetDomainControllerInfoW, ntdsapilib, 'DsGetDomainControllerInfoW');
asm
mov esp, ebp
pop ebp
jmp [_DsGetDomainControllerInfoW]
end;
end;
{$ELSE}
function DsGetDomainControllerInfoW; external ntdsapilib name 'DsGetDomainControllerInfoW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsGetDomainControllerInfo: Pointer;
function DsGetDomainControllerInfo;
begin
GetProcedureAddress(_DsGetDomainControllerInfo, ntdsapilib, 'DsGetDomainControllerInfoW');
asm
mov esp, ebp
pop ebp
jmp [_DsGetDomainControllerInfo]
end;
end;
{$ELSE}
function DsGetDomainControllerInfo; external ntdsapilib name 'DsGetDomainControllerInfoW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsGetDomainControllerInfo: Pointer;
function DsGetDomainControllerInfo;
begin
GetProcedureAddress(_DsGetDomainControllerInfo, ntdsapilib, 'DsGetDomainControllerInfoA');
asm
mov esp, ebp
pop ebp
jmp [_DsGetDomainControllerInfo]
end;
end;
{$ELSE}
function DsGetDomainControllerInfo; external ntdsapilib name 'DsGetDomainControllerInfoA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsFreeDomainControllerInfoA: Pointer;
procedure DsFreeDomainControllerInfoA;
begin
GetProcedureAddress(_DsFreeDomainControllerInfoA, ntdsapilib, 'DsFreeDomainControllerInfoA');
asm
mov esp, ebp
pop ebp
jmp [_DsFreeDomainControllerInfoA]
end;
end;
{$ELSE}
procedure DsFreeDomainControllerInfoA; external ntdsapilib name 'DsFreeDomainControllerInfoA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsFreeDomainControllerInfoW: Pointer;
procedure DsFreeDomainControllerInfoW;
begin
GetProcedureAddress(_DsFreeDomainControllerInfoW, ntdsapilib, 'DsFreeDomainControllerInfoW');
asm
mov esp, ebp
pop ebp
jmp [_DsFreeDomainControllerInfoW]
end;
end;
{$ELSE}
procedure DsFreeDomainControllerInfoW; external ntdsapilib name 'DsFreeDomainControllerInfoW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsFreeDomainControllerInfo: Pointer;
procedure DsFreeDomainControllerInfo;
begin
GetProcedureAddress(_DsFreeDomainControllerInfo, ntdsapilib, 'DsFreeDomainControllerInfoW');
asm
mov esp, ebp
pop ebp
jmp [_DsFreeDomainControllerInfo]
end;
end;
{$ELSE}
procedure DsFreeDomainControllerInfo; external ntdsapilib name 'DsFreeDomainControllerInfoW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsFreeDomainControllerInfo: Pointer;
procedure DsFreeDomainControllerInfo;
begin
GetProcedureAddress(_DsFreeDomainControllerInfo, ntdsapilib, 'DsFreeDomainControllerInfoA');
asm
mov esp, ebp
pop ebp
jmp [_DsFreeDomainControllerInfo]
end;
end;
{$ELSE}
procedure DsFreeDomainControllerInfo; external ntdsapilib name 'DsFreeDomainControllerInfoA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaConsistencyCheck: Pointer;
function DsReplicaConsistencyCheck;
begin
GetProcedureAddress(_DsReplicaConsistencyCheck, ntdsapilib, 'DsReplicaConsistencyCheck');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaConsistencyCheck]
end;
end;
{$ELSE}
function DsReplicaConsistencyCheck; external ntdsapilib name 'DsReplicaConsistencyCheck';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaVerifyObjectsW: Pointer;
function DsReplicaVerifyObjectsW;
begin
GetProcedureAddress(_DsReplicaVerifyObjectsW, ntdsapilib, 'DsReplicaVerifyObjectsW');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaVerifyObjectsW]
end;
end;
{$ELSE}
function DsReplicaVerifyObjectsW; external ntdsapilib name 'DsReplicaVerifyObjectsW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaVerifyObjectsA: Pointer;
function DsReplicaVerifyObjectsA;
begin
GetProcedureAddress(_DsReplicaVerifyObjectsA, ntdsapilib, 'DsReplicaVerifyObjectsA');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaVerifyObjectsA]
end;
end;
{$ELSE}
function DsReplicaVerifyObjectsA; external ntdsapilib name 'DsReplicaVerifyObjectsA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaVerifyObjects: Pointer;
function DsReplicaVerifyObjects;
begin
GetProcedureAddress(_DsReplicaVerifyObjects, ntdsapilib, 'DsReplicaVerifyObjectsW');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaVerifyObjects]
end;
end;
{$ELSE}
function DsReplicaVerifyObjects; external ntdsapilib name 'DsReplicaVerifyObjectsW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaVerifyObjects: Pointer;
function DsReplicaVerifyObjects;
begin
GetProcedureAddress(_DsReplicaVerifyObjects, ntdsapilib, 'DsReplicaVerifyObjectsA');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaVerifyObjects]
end;
end;
{$ELSE}
function DsReplicaVerifyObjects; external ntdsapilib name 'DsReplicaVerifyObjectsA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaGetInfoW: Pointer;
function DsReplicaGetInfoW;
begin
GetProcedureAddress(_DsReplicaGetInfoW, ntdsapilib, 'DsReplicaGetInfoW');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaGetInfoW]
end;
end;
{$ELSE}
function DsReplicaGetInfoW; external ntdsapilib name 'DsReplicaGetInfoW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaFreeInfo: Pointer;
procedure DsReplicaFreeInfo;
begin
GetProcedureAddress(_DsReplicaFreeInfo, ntdsapilib, 'DsReplicaFreeInfo');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaFreeInfo]
end;
end;
{$ELSE}
procedure DsReplicaFreeInfo; external ntdsapilib name 'DsReplicaFreeInfo';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaGetInfo: Pointer;
function DsReplicaGetInfo;
begin
GetProcedureAddress(_DsReplicaGetInfo, ntdsapilib, 'DsReplicaGetInfoW');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaGetInfo]
end;
end;
{$ELSE}
function DsReplicaGetInfo; external ntdsapilib name 'DsReplicaGetInfoW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsReplicaGetInfo2W: Pointer;
function DsReplicaGetInfo2W;
begin
GetProcedureAddress(_DsReplicaGetInfo2W, ntdsapilib, 'DsReplicaGetInfo2W');
asm
mov esp, ebp
pop ebp
jmp [_DsReplicaGetInfo2W]
end;
end;
{$ELSE}
function DsReplicaGetInfo2W; external ntdsapilib name 'DsReplicaGetInfo2W';
{$ENDIF DYNAMIC_LINK}
{$ENDIF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsAddSidHistoryA: Pointer;
function DsAddSidHistoryA;
begin
GetProcedureAddress(_DsAddSidHistoryA, ntdsapilib, 'DsAddSidHistoryA');
asm
mov esp, ebp
pop ebp
jmp [_DsAddSidHistoryA]
end;
end;
{$ELSE}
function DsAddSidHistoryA; external ntdsapilib name 'DsAddSidHistoryA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsAddSidHistoryW: Pointer;
function DsAddSidHistoryW;
begin
GetProcedureAddress(_DsAddSidHistoryW, ntdsapilib, 'DsAddSidHistoryW');
asm
mov esp, ebp
pop ebp
jmp [_DsAddSidHistoryW]
end;
end;
{$ELSE}
function DsAddSidHistoryW; external ntdsapilib name 'DsAddSidHistoryW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsAddSidHistory: Pointer;
function DsAddSidHistory;
begin
GetProcedureAddress(_DsAddSidHistory, ntdsapilib, 'DsAddSidHistoryW');
asm
mov esp, ebp
pop ebp
jmp [_DsAddSidHistory]
end;
end;
{$ELSE}
function DsAddSidHistory; external ntdsapilib name 'DsAddSidHistoryW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsAddSidHistory: Pointer;
function DsAddSidHistory;
begin
GetProcedureAddress(_DsAddSidHistory, ntdsapilib, 'DsAddSidHistoryA');
asm
mov esp, ebp
pop ebp
jmp [_DsAddSidHistory]
end;
end;
{$ELSE}
function DsAddSidHistory; external ntdsapilib name 'DsAddSidHistoryA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsInheritSecurityIdentityA: Pointer;
function DsInheritSecurityIdentityA;
begin
GetProcedureAddress(_DsInheritSecurityIdentityA, ntdsapilib, 'DsInheritSecurityIdentityA');
asm
mov esp, ebp
pop ebp
jmp [_DsInheritSecurityIdentityA]
end;
end;
{$ELSE}
function DsInheritSecurityIdentityA; external ntdsapilib name 'DsInheritSecurityIdentityA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsInheritSecurityIdentityW: Pointer;
function DsInheritSecurityIdentityW;
begin
GetProcedureAddress(_DsInheritSecurityIdentityW, ntdsapilib, 'DsInheritSecurityIdentityW');
asm
mov esp, ebp
pop ebp
jmp [_DsInheritSecurityIdentityW]
end;
end;
{$ELSE}
function DsInheritSecurityIdentityW; external ntdsapilib name 'DsInheritSecurityIdentityW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsInheritSecurityIdentity: Pointer;
function DsInheritSecurityIdentity;
begin
GetProcedureAddress(_DsInheritSecurityIdentity, ntdsapilib, 'DsInheritSecurityIdentityW');
asm
mov esp, ebp
pop ebp
jmp [_DsInheritSecurityIdentity]
end;
end;
{$ELSE}
function DsInheritSecurityIdentity; external ntdsapilib name 'DsInheritSecurityIdentityW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsInheritSecurityIdentity: Pointer;
function DsInheritSecurityIdentity;
begin
GetProcedureAddress(_DsInheritSecurityIdentity, ntdsapilib, 'DsInheritSecurityIdentityA');
asm
mov esp, ebp
pop ebp
jmp [_DsInheritSecurityIdentity]
end;
end;
{$ELSE}
function DsInheritSecurityIdentity; external ntdsapilib name 'DsInheritSecurityIdentityA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsQuoteRdnValueA: Pointer;
function DsQuoteRdnValueA;
begin
GetProcedureAddress(_DsQuoteRdnValueA, ntdsapilib, 'DsQuoteRdnValueA');
asm
mov esp, ebp
pop ebp
jmp [_DsQuoteRdnValueA]
end;
end;
{$ELSE}
function DsQuoteRdnValueA; external ntdsapilib name 'DsQuoteRdnValueA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsQuoteRdnValueW: Pointer;
function DsQuoteRdnValueW;
begin
GetProcedureAddress(_DsQuoteRdnValueW, ntdsapilib, 'DsQuoteRdnValueW');
asm
mov esp, ebp
pop ebp
jmp [_DsQuoteRdnValueW]
end;
end;
{$ELSE}
function DsQuoteRdnValueW; external ntdsapilib name 'DsQuoteRdnValueW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsQuoteRdnValue: Pointer;
function DsQuoteRdnValue;
begin
GetProcedureAddress(_DsQuoteRdnValue, ntdsapilib, 'DsQuoteRdnValueW');
asm
mov esp, ebp
pop ebp
jmp [_DsQuoteRdnValue]
end;
end;
{$ELSE}
function DsQuoteRdnValue; external ntdsapilib name 'DsQuoteRdnValueW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsQuoteRdnValue: Pointer;
function DsQuoteRdnValue;
begin
GetProcedureAddress(_DsQuoteRdnValue, ntdsapilib, 'DsQuoteRdnValueA');
asm
mov esp, ebp
pop ebp
jmp [_DsQuoteRdnValue]
end;
end;
{$ELSE}
function DsQuoteRdnValue; external ntdsapilib name 'DsQuoteRdnValueA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsUnquoteRdnValueA: Pointer;
function DsUnquoteRdnValueA;
begin
GetProcedureAddress(_DsUnquoteRdnValueA, ntdsapilib, 'DsUnquoteRdnValueA');
asm
mov esp, ebp
pop ebp
jmp [_DsUnquoteRdnValueA]
end;
end;
{$ELSE}
function DsUnquoteRdnValueA; external ntdsapilib name 'DsUnquoteRdnValueA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsUnquoteRdnValueW: Pointer;
function DsUnquoteRdnValueW;
begin
GetProcedureAddress(_DsUnquoteRdnValueW, ntdsapilib, 'DsUnquoteRdnValueW');
asm
mov esp, ebp
pop ebp
jmp [_DsUnquoteRdnValueW]
end;
end;
{$ELSE}
function DsUnquoteRdnValueW; external ntdsapilib name 'DsUnquoteRdnValueW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsUnquoteRdnValue: Pointer;
function DsUnquoteRdnValue;
begin
GetProcedureAddress(_DsUnquoteRdnValue, ntdsapilib, 'DsUnquoteRdnValueW');
asm
mov esp, ebp
pop ebp
jmp [_DsUnquoteRdnValue]
end;
end;
{$ELSE}
function DsUnquoteRdnValue; external ntdsapilib name 'DsUnquoteRdnValueW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsUnquoteRdnValue: Pointer;
function DsUnquoteRdnValue;
begin
GetProcedureAddress(_DsUnquoteRdnValue, ntdsapilib, 'DsUnquoteRdnValueA');
asm
mov esp, ebp
pop ebp
jmp [_DsUnquoteRdnValue]
end;
end;
{$ELSE}
function DsUnquoteRdnValue; external ntdsapilib name 'DsUnquoteRdnValueA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsGetRdnW: Pointer;
function DsGetRdnW;
begin
GetProcedureAddress(_DsGetRdnW, ntdsapilib, 'DsGetRdnW');
asm
mov esp, ebp
pop ebp
jmp [_DsGetRdnW]
end;
end;
{$ELSE}
function DsGetRdnW; external ntdsapilib name 'DsGetRdnW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsCrackUnquotedMangledRdnW: Pointer;
function DsCrackUnquotedMangledRdnW;
begin
GetProcedureAddress(_DsCrackUnquotedMangledRdnW, ntdsapilib, 'DsCrackUnquotedMangledRdnW');
asm
mov esp, ebp
pop ebp
jmp [_DsCrackUnquotedMangledRdnW]
end;
end;
{$ELSE}
function DsCrackUnquotedMangledRdnW; external ntdsapilib name 'DsCrackUnquotedMangledRdnW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsCrackUnquotedMangledRdnA: Pointer;
function DsCrackUnquotedMangledRdnA;
begin
GetProcedureAddress(_DsCrackUnquotedMangledRdnA, ntdsapilib, 'DsCrackUnquotedMangledRdnA');
asm
mov esp, ebp
pop ebp
jmp [_DsCrackUnquotedMangledRdnA]
end;
end;
{$ELSE}
function DsCrackUnquotedMangledRdnA; external ntdsapilib name 'DsCrackUnquotedMangledRdnA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsCrackUnquotedMangledRdn: Pointer;
function DsCrackUnquotedMangledRdn;
begin
GetProcedureAddress(_DsCrackUnquotedMangledRdn, ntdsapilib, 'DsCrackUnquotedMangledRdnW');
asm
mov esp, ebp
pop ebp
jmp [_DsCrackUnquotedMangledRdn]
end;
end;
{$ELSE}
function DsCrackUnquotedMangledRdn; external ntdsapilib name 'DsCrackUnquotedMangledRdnW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsCrackUnquotedMangledRdn: Pointer;
function DsCrackUnquotedMangledRdn;
begin
GetProcedureAddress(_DsCrackUnquotedMangledRdn, ntdsapilib, 'DsCrackUnquotedMangledRdnA');
asm
mov esp, ebp
pop ebp
jmp [_DsCrackUnquotedMangledRdn]
end;
end;
{$ELSE}
function DsCrackUnquotedMangledRdn; external ntdsapilib name 'DsCrackUnquotedMangledRdnA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsIsMangledRdnValueW: Pointer;
function DsIsMangledRdnValueW;
begin
GetProcedureAddress(_DsIsMangledRdnValueW, ntdsapilib, 'DsIsMangledRdnValueW');
asm
mov esp, ebp
pop ebp
jmp [_DsIsMangledRdnValueW]
end;
end;
{$ELSE}
function DsIsMangledRdnValueW; external ntdsapilib name 'DsIsMangledRdnValueW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsIsMangledRdnValueA: Pointer;
function DsIsMangledRdnValueA;
begin
GetProcedureAddress(_DsIsMangledRdnValueA, ntdsapilib, 'DsIsMangledRdnValueA');
asm
mov esp, ebp
pop ebp
jmp [_DsIsMangledRdnValueA]
end;
end;
{$ELSE}
function DsIsMangledRdnValueA; external ntdsapilib name 'DsIsMangledRdnValueA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsIsMangledRdnValue: Pointer;
function DsIsMangledRdnValue;
begin
GetProcedureAddress(_DsIsMangledRdnValue, ntdsapilib, 'DsIsMangledRdnValueW');
asm
mov esp, ebp
pop ebp
jmp [_DsIsMangledRdnValue]
end;
end;
{$ELSE}
function DsIsMangledRdnValue; external ntdsapilib name 'DsIsMangledRdnValueW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsIsMangledRdnValue: Pointer;
function DsIsMangledRdnValue;
begin
GetProcedureAddress(_DsIsMangledRdnValue, ntdsapilib, 'DsIsMangledRdnValueA');
asm
mov esp, ebp
pop ebp
jmp [_DsIsMangledRdnValue]
end;
end;
{$ELSE}
function DsIsMangledRdnValue; external ntdsapilib name 'DsIsMangledRdnValueA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
{$IFDEF DYNAMIC_LINK}
var
_DsIsMangledDnA: Pointer;
function DsIsMangledDnA;
begin
GetProcedureAddress(_DsIsMangledDnA, ntdsapilib, 'DsIsMangledDnA');
asm
mov esp, ebp
pop ebp
jmp [_DsIsMangledDnA]
end;
end;
{$ELSE}
function DsIsMangledDnA; external ntdsapilib name 'DsIsMangledDnA';
{$ENDIF DYNAMIC_LINK}
{$IFDEF DYNAMIC_LINK}
var
_DsIsMangledDnW: Pointer;
function DsIsMangledDnW;
begin
GetProcedureAddress(_DsIsMangledDnW, ntdsapilib, 'DsIsMangledDnW');
asm
mov esp, ebp
pop ebp
jmp [_DsIsMangledDnW]
end;
end;
{$ELSE}
function DsIsMangledDnW; external ntdsapilib name 'DsIsMangledDnW';
{$ENDIF DYNAMIC_LINK}
{$IFDEF UNICODE}
{$IFDEF DYNAMIC_LINK}
var
_DsIsMangledDn: Pointer;
function DsIsMangledDn;
begin
GetProcedureAddress(_DsIsMangledDn, ntdsapilib, 'DsIsMangledDnW');
asm
mov esp, ebp
pop ebp
jmp [_DsIsMangledDn]
end;
end;
{$ELSE}
function DsIsMangledDn; external ntdsapilib name 'DsIsMangledDnW';
{$ENDIF DYNAMIC_LINK}
{$ELSE}
{$IFDEF DYNAMIC_LINK}
var
_DsIsMangledDn: Pointer;
function DsIsMangledDn;
begin
GetProcedureAddress(_DsIsMangledDn, ntdsapilib, 'DsIsMangledDnA');
asm
mov esp, ebp
pop ebp
jmp [_DsIsMangledDn]
end;
end;
{$ELSE}
function DsIsMangledDn; external ntdsapilib name 'DsIsMangledDnA';
{$ENDIF DYNAMIC_LINK}
{$ENDIF}
end.