Einzelnen Beitrag anzeigen

Benutzerbild von Smokey
Smokey

Registriert seit: 10. Nov 2003
Ort: Puerto de la Cruz
158 Beiträge
 
Delphi 7 Enterprise
 
#2

Re: Dateien aus dem Internet laden

  Alt 1. Jun 2004, 13:38
Wenn du es nicht über ftp machen kannst, würde es so gehen :

Mit TFilestream und dem IndyHttp

Delphi-Quellcode:
var
  strmDatei: TFileStream;
  IdHttp1: TIdHTTP;
begin
  strmDatei:=TFileStream.create(sFilename,fmCreate);
  IdHttp1.Get(sAction,strmDatei);
end;
nur kurz hingeschmiert weil ich jetzt essen gehe.
Da fehlt natürlich noch das exceptionhandling und das erzeugen des IdHttp objektes

sAction ist in dem Fall der Link zur Datei als String
sFilename der name unter dem die Datei gespeichert werden soll.
Greif dir ein gutes Stück Fleisch auf deinem Weg nach draussen !!!
  Mit Zitat antworten Zitat