Verzeichnisoperationen

[Poring]

Nich immer so schnell Posten .. ich weiß
DeleteFile(GetPreviousDir(ExtractFilePath(ParamStr(0))) + 'test.txt'); Jipi, Herzlichen Dank.

Oki... und wie ist das mit CopyFile?
 Copyfile((ExtractFilePath(ParamStr(0)) + 'test.txt'), (GetPreviousDir(ExtractFilePath(ParamStr(0))) + 'test.txt'), false); Das geht leider nicht

[Aurelius]

Was ist dass den für ein Fehler?

Meine Kristallkugel sagt mir, dass
GetPreviousDir(ExtractFilePath(ParamStr(0))) + 'test.txt' so abgeändert werden mussGetPreviousDir(ExtractFilePath(ParamStr(0))) + '\test.txt' //edit: Falscher Slash

[Matze]

Nein, die Funktion gibt den Pfad mit letztem Backslash zurück.

Achte auf die Compiler-Meldungen, die sagen alles:

Zitat:

[Pascal Fehler] Unit1.pas(35): E2010 Inkompatible Typen: 'string' und 'PAnsiChar'

Folglich muss es so heißen:

Code:

Copyfile([color=#ff0000][b]PChar([/b][/color]ExtractFilePath(ParamStr(0)) + [color=#000080]'test.txt'[/color][color=#ff0000][b])[/b][/color],
  [color=#ff0000][b]PChar([/b][/color]GetPreviousDir(ExtractFilePath(ParamStr(0))) + [color=#000080]'test.txt'[/color][color=#ff0000][b])[/b][/color], false);

Bzw. PAnsiChar anstelle von PChar.

Edit: Für mich sieht es so aus, als löscht du zuerst eine Datei mit DeleteFile, um diese dann mit CopyFile ersetzen zu können. Falls dies der Fall sein sollte, dann schau dir den 3. Parameter von CopyFile an. Ist dieser true wird eine existierende Datei überschrieben.

[DeddyH]

Zitat von Matze:

Ist dieser true wird eine existierende Datei überschrieben.

Genau andersherum, deshalb heißt er ja auch FailIfExists

[Matze]

Zitat von DeddyH:

Genau andersherum, deshalb heißt er ja auch FailIfExists

Ups, hätte ich doch lieber in die OH geschaut. Ich hatte ein OverwriteIfExists in Erinnerung.

Dann ist das DeleteFile soweiso überflüssig, falls es wirklich dazu dient, die existierende Datei vor dem Kopieren zu löschen.