Dateien kopieren

[smart]

Guten Morgen!

Wie kopiert man mit Delphi Dateien. Irgend wie klappt das bei mir nicht. Ich habe es so versucht.

Delphi-Quellcode:

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

Klappt aber nicht.

Gruß
Heike

[mkinzler]

CopyFile()

[Bernhard Geyer]

Zitat:

Zitat von smart

Wie kopiert man mit Delphi Dateien.

Z.b. mit der CopyFile-Funktion aus der Windows-API (Windows.pas)

Zitat:

Zitat von smart

Irgend wie klappt das bei mir nicht.

Also bei fast 1000 Beiträgen hatte ich schon etwas genauere Beschreibung erwartet. Du weist ja - Glaskugel :-)

[smart]

Zitat:

Zitat von Bernhard Geyer

Also bei fast 1000 Beiträgen hatte ich schon etwas genauere Beschreibung erwartet. Du weist ja - Glaskugel :-)

Hi Bernhard!

Da kann ich nicht viel schreiben. Kopiert einfach nicht. Kommt auch keine Fehlermeldung.

Gruß
Heike

[DeddyH]

Was sagt denn GetLastError?

[TeronG]

Die üblichen verdächtigen haste bestimmt schon ausgeschlossen oder?

Quelle existiert? bzw in Quelle "steht was drinnen"?
Quelle & Ziel vertauscht?
Die variabeln Quelle & Ziel sind einmalig?
Letzter Fehler?
Schreibrechte sind vorhanden?
Rechner neugestartet ^^

...

[smart]

Hi.

Ich möchte einfach eine Datei von C:\datei.txt nach D:\ kopieren. Dafür habe ich mir die obige Funktion geschrieben. Wenn ich diese ausführe wird sie Fehlerfrei abgearbeitet. (Keinerlei Fehler). Wenn ich dann nachschaue ist die Datei nicht kopiert worden. Die gleiche Datei lässt sich aber mit dem Explorer kopieren.

Gruß
Heike

[TeronG]

Steht bei dir bei Ziel der Dateiname auch dabei? oder nur der Ort?

Also 'd:\test.txt' oder 'd:\'

[smart]

Zitat:

Zitat von TeronG

Die üblichen verdächtigen haste bestimmt schon ausgeschlossen oder?...

Jau, habe ich.

Zitat:

Zitat von TeronG

"steht was drinnen"?

Hmm, muss das was drinnen stehen? Kann man keine Lehrdatei kopieren?

Gruß
Heike

[TeronG]

Zitat:

Zitat von smart

Zitat:

Zitat von TeronG

"steht was drinnen"?

Hmm, muss das was drinnen stehen? Kann man keine Lehrdatei kopieren?

Sorry .. ich meinte in der Variabel und nicht in der Datei. :roll: (zu schnell/ungeneu getippt)


EDIT: Ich tippe ja stark darauf, daß im Ziel der Dateiname fehlt! (das gibt keine fehlermeldung kopiert wird aber auch nix)
nochn EDIT: GetLastError währe dann 3 ... (nur so btw)
EDIT3: (liest das noch einer?) MyFehlerstring := SysErrorMessage(GetLastError);