Benutzername unter Mac OS X?

[jwdietrich]

Wie kann ich den Namen des angemeldeteten Benutzers abfragen?

Unter Windows geht das ja relativ einfach mit

Code: Alles auswählen

var
  gUserName: String;
  arraySize: DWord;
 
begin
  GetUserName(UserName, arraySize);
  gUserName := String(UserName)
end;

aber am Mac ist das natürlich anders implementiert.

Leider bietet FreePascal offensichtlich keine entsprechende generische Funktion an. Oder habe ich die übersehen?

[theo]

GIDF
http://lists.lazarus.freepascal.org/pip ... 40821.html" onclick="window.open(this.href);return false;

[jwdietrich]

Gerade habe ich eine Lösung gefunden, die plattformunabhängig funktioniert:

Code: Alles auswählen

var
  gUserName: String;
  arraySize: DWord;
 
begin
  {$IFDEF win32}
  GetUserName(UserName, arraySize);
  gUserName := String(UserName);
  {$ELSE}
  gUserName := GetEnvironmentVariable('USER');
  {$ENDIF}     
end;

Unter Windows wird also die Windows-Funktion GetUserName eingesetzt, auf allen anderen Plattformen die Umgebugnsvariable "USER". Am Mac funktioniert das wunderbar, es müsste auch unter Linux gehen, aber das habe ich noch nicht getestet.

[jwdietrich]

GIDF
http://lists.lazarus.freepascal.org/pip ... 40821.html" onclick="window.open(this.href);return false;

Das ist eine andere Möglichkeit, ich weiß nicht, welche die bessere ist.

[theo]

Eigentlich ist

{$IFDEF win32}
...
{$ELSE}

nicht gut. Da fällt 64bit und WinCE unter ELSE.

http://www.freepascal.org/docs-html/prog/progap7.html" onclick="window.open(this.href);return false;

Wahrsch. wäre ifdef UNIX else der beste Weg.

[jwdietrich]

Eigentlich ist

{$IFDEF win32}
...
{$ELSE}

nicht gut. Da fällt 64bit und WinCE unter ELSE.

http://www.freepascal.org/docs-html/prog/progap7.html" onclick="window.open(this.href);return false;

Wahrsch. wäre ifdef UNIX else der beste Weg.

Stimmt, das habe ich nicht bedacht!