Mit Delphi Dateien kopieren

[FreakLitkowsky]

Hi
Ich arbeite gerade an einem Projekt, dass (für ein eigenes Spiel) eine Mapauswahl darstellt, deshalb benötige ich eure Hilfe:

Wie kann ich eine Datei in einen anderen Ordner kopieren (nicht verschieben), und dass die ältere Datei dadurch ersetzt wird?

Beispiel:
Die Datei "Beispielmap.lmu" aus dem Ordner "Data\Maps\" soll in den Ordner "Data\" kopiert werden und die dort befindliche Datei "Beispielmap.lmu" überschreiten.


Mein Versuch, die Datei in einem Memo einzufügen und dessen Inhalt dann als "Beispielmap.lmu" zu speichern ist leider schief gegangen (War auch nur ein Test) .


Ich würde mich freuen wenn ihr mir antworten würdet^^

[DeddyH]

Hallo, versuch es mal mit CopyFile (Win32-API).

[FreakLitkowsky]

Hallo
Danke für die schnelle Antwort.

Könntest du mir ein Quellcode beispiel machen, wie es in Delphi aussehen soll, am besten indem du die oben genannten Dateien und Pfade u.s.w. benutzt.
Wäre echt nett.

[DeddyH]

Delphi-Quellcode:

function DateiKopieren(const Quelle, Ziel: string; Ueberschreiben: Boolean = true): Boolean;
begin
  Result := CopyFile(PChar(Quelle),PChar(Ziel),not Ueberschreiben);
end;

//Edit: War ein Fehler drin, es muss natürlich "not Ueberschreiben" heißen

[FreakLitkowsky]

Das scheint bei mir nicht zu funktionieren
hab wahrscheinlich irgendetwas falsch gemacht. Verdammt!

Ich hab jetzt die "function" in meinem Quelltext hinzugefügt, wie kann ich diese jetzt aufrufen ?
Hab glaub ich nicht erwählt, dass ich noch ein Anfänger bin

[scrat1979]

Kann es sein, dass evtl. die Unit ShellAPI eingebunden werden muß?

SCRaT

[FreakLitkowsky]

[Stefan92]

Hallo,

normalerweise ruft man Funktionen mit ihrem Namen auf.
Also in diesem Beispiel mit:
  DateiKopieren(Quelle, Ziel, Ueberschreiben (true oder false) ); Und wenn du eine Unit einbinden willst, schreibst du sie einfach in den uses-Teil.
  uses windows, string..., ShellApi; Gruß

Stefan

[Neutral General]

Zitat von scrat1979:

Kann es sein, dass evtl. die Unit ShellAPI eingebunden werden muß?

SCRaT

Nein muss sie nicht. CopyFile ist Bestandteil der Unit "Windows"!

Gruß
Neutral General

[FreakLitkowsky]

Tut mir wirklich leid, aber ich verstehe nicht so ganz.
Am meisten verwirrt mich dieses "Result":

Zitat:

function DateiKopieren(const Quelle, Ziel: string; Ueberschreiben: Boolean = true): Boolean;
begin
Result := CopyFile(PChar(Quelle),PChar(Ziel),not Ueberschreiben);
end;

Was hat es damit auf sich, wieso weiße ich "Result" etwas zu?
Ich wollte eigendlich nur eine Datei in einen anderen Ordner kopieren

Trotzdem zu allen: Danke für eure Mühe!