Lokale string Variable als Zwischenspeicher benötigt

[TurboMagic]

D10.4.2

Kann mir mal bitte jemand erklären, warum ich da unten die lokale ZwischenVariable s brauche, statt
das gleich dem Result zuzuweisen? Weise ich das dirket zu, bekomme ich nicht den Klartextnamen des Benutzers
aus dem AD, sondern den Loginnamen den GetCurrentUserLoginName liefert.

Delphi-Quellcode:

function TMainFormLogic.GetCurrentUserLoginName : string;
const
  cnMaxUserNameLen = 254;
var
  sUserName     : string;
  dwUserNameLen : DWord;
begin
  dwUserNameLen := cnMaxUserNameLen-1;
  SetLength(sUserName, cnMaxUserNameLen);
  GetUserName(PChar(sUserName), dwUserNameLen);
  SetLength(sUserName, dwUserNameLen - 1);
  Result := sUserName;
end;

function TMainFormLogic.GetCurrentUserData: string;
var
  outUserInfo       : TADSIUserInfo;
  ADCallResult      : Boolean;
  CurrentUserName   : string;
  CurrentDomainName : string;
  s                 : string;
begin
  Result := '';

  try
    Result            := GetCurrentUserLoginName;

    CurrentUserName   := ActiveDirectoryClient.GetCurrentUserName;
    CurrentDomainName := ActiveDirectoryClient.GetCurrentDomainName(CurrentUserName);

    ADCallResult      := ActiveDirectoryClient.GetUserInfo(CurrentDomainName,
                                                           CurrentUserName,
                                                           outUserInfo);
    if ADCallResult then
    begin
      s               := Copy(outUserInfo.UserName,    1, length(outUserInfo.UserName)) + ' / ' +
                         Copy(outUserInfo.Description, 1, length(outUserInfo.Description))  ;
      Result := s;
    end;
  except
    On e:Exception do
      log.SendException(cCategory, 'Fehler bei ActiveDirectory Aufruf: ' + e.Message, e);
  end;
end;