download in turbo-d. ohne url

[Cyberbob]

Versuchs mal so: (Ungetestet)

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
var MyIdHttp: TIdHttp;
    MyStream : TFilestream;
begin
  MyStream := TFileStream.Create;
  try
    MyIdHttp := TIdHttp.Create;
    try
      MyIdHttp.Get('http://s37b1-cb.uploaded.to/dl?id=74db62b0f2ca24a28cacdbcfadb7a74d', MyStream);
    finally
      MyIdHttp.Free;
    end;
    //Tu irgendwas mit MyStream
  finally
    FreeAndNil(MyStream);
  end;
end;