Einzelnen Beitrag anzeigen

berens

Registriert seit: 3. Sep 2004
434 Beiträge
 
Delphi 10.4 Sydney
 
#4

Re: idFTP.Get - Destination file already exists

  Alt 10. Apr 2006, 13:10
Also ich weiss nicht. Ich habe es nun mit der neuesten Version von Indy indy_vs10.1.5.exe versucht, und dem Befehl

IdFTP.Get(FileName, GetRunDir + FileName, true, true); Selbe Fehlermeldung...

Diese generelle Funktion für ein existierendes idFTP auf frmMain umgeht das Problem:

Delphi-Quellcode:
procedure TfrmMain.FTPGet(_File: WideString);
var
  fs: TFileStream;
  DestFileName: string;
begin
  if IdFTP.Connected then begin
    DestFileName := GetRunDir + _File;
    log('Quelle: ' + _File);
    log('Ziel: ' + DestFileName);
    if IdFTP.Size(_File) <> 0 then begin
      fs := TFileStream.Create(DestFileName, fmOpenReadWrite or fmShareDenyNone or fmCreate);
      try
        try
          IdFTP.Get(_File, fs, false);
        except
          on E: Exception do begin
            log(E.Message);
          end;
        end;
      finally
        FreeAndNil(fs);
      end;
    end;
  end else begin
    log('Kann ' + _File + ' nicht herunterladen, da FTP nicht verbunden ist!');
  end;
end;
  Mit Zitat antworten Zitat