Was ist das für eine SID?

[Luckie]

Das es die LogonSession ist macht Sinn. Meine Funktion müsste ich dann noch mal überarbeiten.

Wenn ich das so mache:

Delphi-Quellcode:

function StrSIDToName(const StrSID: Widestring; var Name: WideString; var SIDType: DWORD): DWORD;
var
  SID               : PSID;
  Buffer            : PWideChar;
  NameLen, TempLen  : Cardinal;
  err               : Boolean;
begin
  SID := nil;
  err := ConvertStringSIDToSID(PWideChar(StrSID), SID);
  if err then
  begin
    NameLen := 0;
    TempLen := 0;
    if LookupAccountSidW(nil, SID, nil, NameLen, nil, TempLen, SIDType) then
    begin
      GetMem(Buffer, NameLen * 2 + 1);
      try
        err := LookupAccountSidW(nil, SID, Buffer, NameLen, nil, TempLen, SIDType);
        if err then
        begin
          SetString(Name, Buffer, Namelen);
          SetLastError(0);
        end;
      finally
        FreeMem(Buffer);
      end;
    end;
  end;
  if Assigned(SID) then
    LocalFree(Cardinal(SID));
  result := GetLastError;
end;

Dann bekomme ich den Fehler 122:

Zitat:

Der an einen Systemaufruf übergebene Datenbereich ist zu klein.