-
[Delphi] Funktion um den Computernamen herauszufinden
Da hier schon eine Möglichekeit für VB gepostet wurde, dachte mir ich schreib mal wies in Delphi geht.
Benutze diese Funktion auch in meinem Chattool:
function GetUsername: String;
var
Buffer: array[0..255] of Char;
Size: DWord;
begin
Size := SizeOf(Buffer);
if not Windows.GetUserName(Buffer, Size) then
RaiseLastOSError;
SetString(Result, Buffer, Size - 1);
end;
-
Stichworte
Berechtigungen
- Neue Themen erstellen: Nein
- Themen beantworten: Nein
- Anhänge hochladen: Nein
- Beiträge bearbeiten: Nein
-
Foren-Regeln