[IdFtp, IndyFTP] Download fortsetzen funtzt einfach nicht!

[CK_CK]

Ich hab' die IdFTP.Get-Methode umgeschrieben. So funktioniert sie wie gewünscht:

Delphi-Quellcode:

procedure TIdFTP.Get(const ASourceFile: string; ADest: TIdStream; AResume: Boolean = False);
begin
  //for SSL FXP, we have to do it here because InternalGet is used by the LIST command
  //where SSCN is ignored.
  ClearSSCN;
  AResume := AResume and CanResume;
  if AResume then
    ADest.Position := ADest.Size
  else
    ADest.Position := 0;
  InternalGet('RETR ' + ASourceFile, ADest, AResume);
end;

Viele Grüße,
Chris

[Astronaut]

Hallo,
habe selbst mal in den Source von INDY geschaut (IDFTP):

procedure TIdFTP.Get(const ASourceFile: string; ADest: TIdStream; AResume: Boolean = False);
begin
//for SSL FXP, we have to do it here because InternalGet is used by the LIST command
//where SSCN is ignored.
ClearSSCN;
AResume := AResume and CanResume;
ADest.Position := 0;
InternalGet('RETR ' + ASourceFile, ADest, AResume);
end;

Mit ADest.Position:=0; wird immer explizit vom Anfang her geladen, wenn mann diese Zeile auskommentiert, funktioniert auch der Vorschlag von Malibu.
(und mein Problem war auch gelöst!)
Schöne Grüße,

[Astronaut]

sorrry, meinte natürlich marabu!

[Wiggles]

Habe das gleiche Problem, habe das ganze auch schon im Indy-Source ausgebessert, meine Frage wäre nun, muss ich die Indy-Komponenten neu kompilieren damits Wirkung zeigt? Wenn ja, wie, wo :drunken: ?

Danke im Vorraus
Wiggles

[Wiggles]

*push*