Dateien kopieren und umbenennen

[DeddyH]

Wie wäre es denn mit einer Boolean-Variablen?

Delphi-Quellcode:

//Erstmal nur neue Dateien
OnlyNew := true;
for i := 0 to Dateien.Count - 1 do
  //CopyFile schlug fehl
  if not CopyFile(PChar(sourcefile), PChar(destfile), OnlyNew) then
    //Datei bereits vorhanden
    if GetLastError = ERROR_ALREADY_EXISTS then
      //Dialog bestätigt
      if MessageDlg(...) = mrYes then
        //weitere werden überschrieben
        OnlyNew := false;

Ungetestet.