Thema: Delphi String Download

Einzelnen Beitrag anzeigen

Benutzerbild von Madara Uchiha
Madara Uchiha

Registriert seit: 7. Apr 2013
25 Beiträge
 
Delphi XE2 Architect
 
#11

AW: String Download

  Alt 9. Apr 2013, 13:32
Okay, es funktioniert.

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
TextEmpfangen: TFileStream;
begin
idftp1.Connect;
TextEmpfangen := TFileStream.Create('dokument.txt', fmCreate);
IdFtp1.get('dokument.txt', TextEmpfangen);
TextEmpfangen.Seek(0, soFromBeginning);
Memo1.Lines.LoadFromStream(TextEmpfangen);
FreeAndNil(TextEmpfangen);
end;
Aber könnte ich das auch noch mit einer Progressbar verbinden? Um mir den Downloadfortschritt anzuzeigen?
  Mit Zitat antworten Zitat