Forum: Object-Pascal / Delphi-Language
Delphi
by -Phantom-,
23. Dez 2009
Oke... Also hab ich das nun so verstanden das meine Funktion den Benutzernamen herauszufinden nur unter Vista geht und nicht unter XP? Naja wenn das so ist probiere ich mal den Vorschlag aus.
Forum: Object-Pascal / Delphi-Language
Delphi
by -Phantom-,
23. Dez 2009
Zum lezten mal ich bekomme das doch hin mit dem Benutzernamen !! Wo ist das zweite plus noch nicht gesezt hatte kann da ich brauche noch ein Operator oder Simicolen. Wo das zweite Plus da war ging alles super !
Forum: Object-Pascal / Delphi-Language
Delphi
by -Phantom-,
23. Dez 2009
So danke das wollte ich nur wissen ^^ Man habe mir schon gedacht das , dass so ein dummer Fehler sein muss. Aber ich bin einfach nicht drauf gekommen xD
Forum: Object-Pascal / Delphi-Language
Delphi
by -Phantom-,
23. Dez 2009
Ne also das mit dem Benutzernamen hab ich hin bekommen dazu braucht man die Funktion:
function GetUsername: string;
var
Buffer: array of Char;
Size: DWord;
begin
Size := SizeOf(Buffer);
if not Windows.GetUserName(Buffer, Size) then
RaiseLastOSError;
SetString(Result, Buffer, Size - 1);
Forum: Object-Pascal / Delphi-Language
Delphi
by -Phantom-,
23. Dez 2009
Moin moin,
So mein Problem ist diesmal das ich eine Datei löschen will zu erst soll der Benutzername festgestellt werden. Bekomme ich auch alles gut hin. Aber ich verzweifel daran den Filename einzugeben.
Benutzername := GetUsername;
filename := 'C:\Users\'+ Benutzername'\neu\ddd.txt'; // Hier muss ein Fehler sein. Wie füge ich den den "Benuzernamen" mit in den Pfad ein? Kann eig. nur ein...