Delphi String Download - Delphi-PRAXiS

Thema durchsuchen

Ansicht

Themen-Optionen

String Download

Ein Thema von Madara Uchiha · begonnen am 8. Apr 2013 · letzter Beitrag vom 19. Apr 2013

Vorheriger Beitrag

Nächster Beitrag

Madara Uchiha

Registriert seit: 7. Apr 2013
25 Beiträge

Delphi XE2 Architect

AW: String Download

8. Apr 2013, 20:33

Ich habs so versucht, aber ich krieg den Fehler access violation:

markieren

Code:

			procedure TForm1.Button1Click(Sender: TObject);

var

  xFS: TFileStream;

begin

    idftp1.Connect;

  xFS := TFileStream.Create('dokument.txt', fmCreate);

  try

    IdFtp1.get('dokument.txt', xFS);

  finally

    FreeAndNil(xFS);

   xFS.Seek(0, soFromBeginning);

  end;

end;