Sollte es nicht WideString sein als deine vUserName & vDomainName ?
Delphi-Quellcode:
function GetNameFromSid(ASID: String): String;
var
lSidLen: DWORD;
lSid: PSID;
lName, lDomain: WideString;
begin
lSidLen := SECURITY_MAX_SID_SIZE;
lSid := AllocMem(lSidLen);
try
StringToSID(ASID, lSid, lSidLen);
LookupAccountBySid(lSid, lName, lDomain);
Result := lName;
finally
FreeMem(lSid);
end;
end;
Wenn es Monate lang ohne Problem funktioniert hat warum dann jetzt WideString anstelle von Array of char verwenden. ?
Das Problem tritt nur mit 64Bit auf.
Hmmm...
Zitat:
Prüf den Rückgabewert von LookupAccountSid und rufe GetLastError im Falle des Fehlschlagens. Vielleicht bringt dich das weiter.
Danke wird wohl das beste sein.
gruss