copyfile geht nicht

[Dr. Jack]

hi, ich beiße mir gerade die zähne aus, warum geht dieser quelltext nicht, er bringt immer die
showmessage, weil er es nicht kopiert. was mache ich falsch?

if not copyfile(PChar('F:\KS\EV\ev.ini'), PChar('F:\KS\EV\EVSAVE\ev.ini'), true)
then ShowMessage('Fehler beim Erstellen der Kopie!');

[Bummi]

Stimmt die Quelle, gibt es den Zielpfad, gibt es die Zieldatei noch nicht (failisexists) , hast Du die benötigten Rechte, ist die Quelldatei gesperrt .....

[himitsu]

Wie wäre es mit einer aussagefähigeren Fehlermeldung?

Delphi-Quellcode:

if not CopyFile(PChar('F:\KS\EV\ev.ini'), PChar('F:\KS\EV\EVSAVE\ev.ini'), true) then 
  RaiseLastOSError;

if not CopyFile(PChar('F:\KS\EV\ev.ini'), PChar('F:\KS\EV\EVSAVE\ev.ini'), true) then 
  ShowMessage('Fehler beim Erstellen der Kopie!'#13#10 + SysErrorMessage(GetLastError));

[Dr. Jack]

der will mich gerade verarschen: "das system kann den angegebenen pfad nicht finden!"
ich bin hier gerade im explorer drin-der pfad ist definitiv da.

[Luckie]

Kontrollire ihn mal im Debugger oder lass ihn dir vorher mit Showmessage ausgeben.

[himitsu]

Delphi-Quellcode:

if not DirectoryExists('F:\') then
  ShowMessage('er verarscht dich nicht (root)');

if not DirectoryExists('F:\KS') then
  ShowMessage('er verarscht dich nicht (KS)');

if not DirectoryExists('F:\KS\EV') then
  ShowMessage('er verarscht dich nicht (EV)');

if not FileExists('F:\KS\EV\ev.ini') then
  ShowMessage('er verarscht dich nicht (file)');

[Dr. Jack]

wie kontrolliert man das im debugger? *anfänger* :(

[Sir Rufo]

Zitat:

Zitat von Dr. Jack (Beitrag 1139886)

wie kontrolliert man das im debugger? *anfänger* :(

Google ist dein Freund delphi debugger tutorial und liefert als erstes Tutorial Debugging

[Luckie]

Haltepunkt setzten mit F5 und dann laufen lassen. Dann kanst du mit der Maus über die Variable fahren und dir den Inhalt angucken.

[Dr. Jack]

ich haba das mal reinkopiert

if DirectoryExists('F:\') then
ShowMessage('er verarscht dich (root)');

if DirectoryExists('F:\KS') then
ShowMessage('er verarscht dich (KS)');

if DirectoryExists('F:\KS\EV') then
ShowMessage('er verarscht dich (EV)');

if FileExists('F:\KS\EV\ev.ini') then
ShowMessage('er verarscht dich (file)');

die showmessages kamen :)
mit dem debugger--> keine ahnung wie das geht und wo ma da was sieht