Hallo,
hat jemand schnell einen Code um den Benutzernamen (wie man ihn bei der Windowsinstallation eingibt) abzufragen und ihn unter Delphi 2 Developer in einer Stringvariablen zu speichern?
Vielen Dank für Antworten schon mal im Vorraus
pshuber
pshuber Nachtrag zu: „Benutzernamen in Delphi abfragen“
Code hat bei mir nicht funktioniert, aber etwas Suche in der Registry hat auch geholfen:
procedure Tfrm_step3.Button1Click(Sender: TObject);
var
Reg: TRegistry;
username: string;
begin
Reg := TRegistry.Create;
Reg.RootKey := HKEY_CURRENT_USER;
Reg.OpenKey('\Software\Microsoft\MS Setup (ACME)\User Info', True);
username := Reg.ReadString('DefName');
end;
