string in unicode konvertieren und an Api-Funktion übergeben

[steppo]

Mein quellcode sieht nun so aus.

Delphi-Quellcode:

const 
  Parameter: array [0..4] of PWChar = ('Peter-Pan', 'Hans-Klaus', 
    'OU=Heinz-DE,DC=Petra,DC=Karl,DC=net', 'Anton.Karl-Verena', 
    'Claudia');

Delphi-Quellcode:

function NetJoinDomain(const lpServer: PWChar; const lpDomain: 
  PWChar; const lpAccountOU: PWChar; const lpAccount: PWChar; const lpPassword: 
  PWChar; const fJoinOptions: DWord): NET_API_STATUS; stdcall; external 
'netapi32.dll';

Delphi-Quellcode:

function bla 
Api_Meldung := NetJoinDomain(UebergabeParam[0], UebergabeParam[1], 
    UebergabeParam[2], UebergabeParam[3], UebergabeParam[4], 0 + 1);

Api_Meldung ist vom Typ integer.

Result der Api-Funktion ist immer noch:
Fehlernummer/Fehlermeldung/Name
"1780 / A null reference pointer was passed to the stub./ RPC_X_NULL_REF_POINTER