Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Datei verschieben und falls vorhanden überschreiben (https://www.delphipraxis.net/31094-datei-verschieben-und-falls-vorhanden-ueberschreiben.html)

Lupster 4. Okt 2004 12:18


Datei verschieben und falls vorhanden überschreiben
 
Hallo Zusammen,

ich möchte ein File in einen Unterordner verschieben. Klappt mit MoveFile auch wunderbar. Ich möchte nun aber noch, dass falls das File im Unterordner schon vorhanden ist, es überschrieben wird.

MoveFile verschiebt die Datei leider nur, wenn sie nocht nicht vorhanden ist.

Könnt Ihr mir weiterhelfen?

Danke

Ultimator 4. Okt 2004 12:20

Re: Datei verschieben und falls vorhanden überschreiben
 
Kannst ja mit FileExists abfragen, ob sie exostiert, und wenn ja, kannst du sie vorher löschen

Lupster 4. Okt 2004 12:22

Re: Datei verschieben und falls vorhanden überschreiben
 
hm, ja, hatte ich auch schon im auge...

dachte es gibt vlt. was elegantes :)

aber dann mach ich es halt so!

danke und gruss

shmia 4. Okt 2004 12:29

Re: Datei verschieben und falls vorhanden überschreiben
 
Zitat:

Zitat von Lupster
Hallo Zusammen,

ich möchte ein File in einen Unterordner verschieben. Klappt mit MoveFile auch wunderbar. Ich möchte nun aber noch, dass falls das File im Unterordner schon vorhanden ist, es überschrieben wird.

Delphi-Quellcode:
if MoveFileEx(PChar(quelldatei), PChar(Zieldatei), MOVEFILE_REPLACE_EXISTING) then
   raise EWin32Error.CreateFmt('Datei %s konnte nicht nach %s umbenannt werden !', [quelldatei, Zieldatei]);
Wenn du obigen Quellcode noch in eine Procedure verpackst, dann ist die Anwendung ganz einfach und angenehm.

MathiasSimmack 4. Okt 2004 12:35

Re: Datei verschieben und falls vorhanden überschreiben
 
Zitat:

Zitat von Lupster
dachte es gibt vlt. was elegantes :)

[dp]"SHFileOperation"[/dp]. Elegant genug? ;)

Lupster 4. Okt 2004 12:42

Re: Datei verschieben und falls vorhanden überschreiben
 
boah

thx euch allen :)

Bomberbb 10. Nov 2008 13:17

Re: Datei verschieben und falls vorhanden überschreiben
 
Also, ich sehe nur die Möglichkeit ein kleines Prog zu schreiben, welches die Datei auf den lokalen Rechner kopiert und dann in den Papierkorb verschiebt. Das könnte man dann als Anwendungsfavoriten einbinden. Das einzige Problem wäre dann, das die Datei beim Wiederherstellen auf dem lokalen Rechner wiederhergestellt wird und nicht auf dem Server...

DeddyH 10. Nov 2008 13:28

Re: Datei verschieben und falls vorhanden überschreiben
 
Ich halte es für unwahrscheinlich, dass das den TE nach 4 Jahren noch interessiert.

Bomberbb 10. Nov 2008 13:42

Re: Datei verschieben und falls vorhanden überschreiben
 
Nun, ich hab nicht aufs Datum geschaut: Bei mir stand der Thread unter 'Neue Beiträge'...
Evtl. hat das etwas mit dem Update des Forums zu tun???


Alle Zeitangaben in WEZ +1. Es ist jetzt 23:02 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz