FileCopy "Zugriff verweigert"

[kean]

Ich habe ein Programm geschrieben welches dateien öffnet und auslist. Danach sollen diese Dateien mit CopyFile auf Diskette kopiert werden. Dabei tritt der Fehler "Zugriff verweigert" auf.
Gibt es einen Befehl oder Parameter womit ich die Dateien trotzdem kopieren kann?

[Luckie]

Ist die Datei noch geöffnet und wenn ja wie (exklusiv, ...)?

Warum wird eigentlich immer sofort nach einer anderen Lösung / Methode gefragt, wenn was nicht sofort klappt, anstelle mal den Code nach Fehlern durchzugucken. :roll:

[Die Muhkuh]

Zitat:

Zitat von Luckie

Ist die Datei noch geöffnet und wenn ja wie (exklusiv, ...)?

Warum wird eigentlich immer sofort nach einer anderen Lösung / Methode gefragt, wenn was nicht sofort klappt, anstelle mal den Code nach Fehlern durchzugucken. :roll:

Vielleicht weil manche zu faul danach zu suchen? :roll:

[kean]

Delphi-Quellcode:

if CopyFile(PChar(Angebotsdatei), PChar('A:'), False) then Showmessage('Datei wurde kopiert') else   RaiselastOSError;

Mit diesem Code will ich kopieren. Es sind insgesamt 3 Dateien wovon eine Datei vorher von Delphi geöffnet aber auch wieder geschlossen wird.

Also sollten zu diesem Zeitpunkt wo der button geclickt wird alle Dateien nicht geöffnet sein.

[Luckie]

Zitat:

Zitat von kean

Also sollten zu diesem Zeitpunkt wo der button geclickt wird alle Dateien nicht geöffnet sein.

Und sind sie es auch? Ein CloseFile vergisst man schnell mal irgendwo.

[Neutral General]

Zitat:

Zitat von kean

Delphi-Quellcode:

if CopyFile(PChar(Angebotsdatei), PChar('A:'), False) then Showmessage('Datei wurde kopiert') else   RaiselastOSError;

Mit diesem Code will ich kopieren. Es sind insgesamt 3 Dateien wovon eine Datei vorher von Delphi geöffnet aber auch wieder geschlossen wird.

Also sollten zu diesem Zeitpunkt wo der button geclickt wird alle Dateien nicht geöffnet sein.

Du musst bei dem Ziel doch noch den Dateinamen angeben oder ?
Also :

Delphi-Quellcode:

if CopyFile(PChar(Angebotsdatei), PChar('A:\' + Angebotsdatei), False) then Showmessage('Datei wurde kopiert') else   RaiselastOSError;

[kean]

Zitat:

Zitat von Neutral General

Du musst bei dem Ziel doch noch den Dateinamen angeben oder ?
Also :

Delphi-Quellcode:

if CopyFile(PChar(Angebotsdatei), PChar('A:\' + Angebotsdatei), False) then Showmessage('Datei wurde kopiert') else   RaiselastOSError;

Das wars. Vielen Dank.