Datei unter eigene Dateien Speichern

[Bauer321]

Ich möchte eine datei unter eigene dateien speichern(vista) und habe das jetzt so gemacht, also ich habe gegooglet und leider nur gefunden wie man den benutzernamen ermitteln kann, habe dann versucht C:\Users der benutzername \documents und da dann die datei hin bekomme aber beim starten immer nen fehler von wgeen das der die datei nicht speichern kann

also das mein code mit dem ich es versuche:

Txt.SaveToFile('C:\Users\' + GetCurrentUserName + '\Documents\sreen.txt');

was ist daran falsch?

[Bauer321]

bitte helt mir ich komme da kein bisschen weiter und habe keinen schimmer woran das leigen kann...

[TeeGee]

Txt.SaveToFile('%USERPROFILE%\Documents\sreen.txt');

Teste das mal ...

[Bauer321]

hmm, hätte ich mal schrieben sollen, das habe ich schon ausprobiert^^(also ich hab da wirklich schon ne zeitlang gegooglet...)

dann kommt diese meldung:

kann es sein das da einfach rechte fehlen?

dazu sollte man allerdings sagen das meine benutzekontosteuerung deaktiviert ist und es eigentlich keinerlei probleme geben sollte...

[Socke]

kann es sein das da einfach rechte fehlen?

Nein, das Verzeichnis mit dem Namen "%USERPROFILE" existiert wahrscheinlich nicht. Du musst immer den Klartext-Dateipfad angeben.
Du kannst also entweder manuell diese Umgebungsvariable auslesen und ersetzen (was Win-only ist) oder du verwendest einige Funktionen aus der Unit SysUtils.
Beispiele wären: GetUserDir(), GetAppConfigFile(), GetTempFile().

[Bauer321]

also ok, ich lese jetzt den usernamen aus(soweit bin ich und das geht auch...)
aber wenn ich das dann zusammensetze kommen immer fehler da eroffensichtlich den letzten teil immer weglässt

mein versuch:

Code: Alles auswählen

if FileExists('C:\Users\' + GetCurrentUserName + '\Documents\datei.txt')=false
     then begin
          Txt:=Tstringlist.Create;
          Txt.Clear;
          Txt.Add('0');
          Txt.SaveToFile('C:\Users\' + GetCurrentUserName + '\Documents\datei.txt');
          Txt.Free;
     end;

[Bauer321]

bitte helfen

[carli]

Nutze die eingebaute Funktion GetUserDir, die dir das Verzeichnis mit den Eigenen Dateien für alle Betriebssysteme zurückgibt.

[Bauer321]

danke geht

[Bauer321]

hmm wo wir gerade hier sind, gibt es auch eine Funktion um die Aktuelle windows version abzufragen?

[carli]

hmm wo wir gerade hier sind, gibt es auch eine Funktion um die Aktuelle windows version abzufragen?

Nein?
Es hat nicht jeder ein Windows-System. Und das ist auch gut so.

In der WinAPI gibt es so eine, aber damit ist dein Programm dann nicht wirklich mehr Plattformunabhängig.

[Bauer321]

aber damit ist dein Programm dann nicht wirklich mehr Plattformunabhängig.

das ist mir auch nicht wirklich wichtig

[felix96]

Drück mal Win+R und gib "regedit" ein, und such da mal nach Vista

[Bauer321]

Drück mal Win+R und gib "regedit" ein, und such da mal nach Vista

wofür?

[shokwave]

Drück mal Win+R und gib "regedit" ein, und such da mal nach Vista

wofür?

Er meint wohl, um die Windowsversion herauszufinden. Aber http://forum.sysinternals.com/exact-win ... c1902.html sieht mir besser aus.