Dosya İndirme

[yhackup]

Merhabalar,

Bir url var, bu urli tarayıcı yazınca doğrudan pdf açılıyor bunu alıp kaydedebiliyorum, fakat başka bir url var tarayıcıya yazdığımda pdf açılmıyor doğrudan indiriyor.
Bunu yakalayamadım site https ve  cleverin TclHttp  componetini kullanıyorum.

Farklı ayarlarla aldığım farklı hatalar 

Exception: An established connection was aborted by the software in your host machine.
Exception: The function requested is not supported
Exception: An existing connection was forcibly closed by the remote host.
Exception: An established connection was aborted by the software in your host machine.

[yhackup]

Sorumu Değiştireyim TclHttp Requestiin Content-Disposition  'unu kapatabilir miyim ?

var
 Response: TMemoryStream;
begin
 try
     Response := TMemoryStream.Create;
     try
       clHttp1453.Get('https://xxxxxxxxxxxx',Response);
       Response.Position := 0;
       Response.SaveToFile('C:\blabla.pdf');
     finally
       Response.Free;
     end;
 except on E: Exception do Memo2.Lines.Add(e.Message);
 end;
end;

[malitutuncu]

Hocam işini görür mü bilmem ancak url den birşey çekerken şöyle kullanıyorum.

uses URLMon;

 if URLDownloadToFile(nil, PChar(URL_ADRES), PChar(DOSYA_ADRESI), 0, nil) = S_OK then
   begin
     Result := True;
   end;

yada 

var
  FileName: String;
begin
        SetLength(FileName, MAX_PATH + 1);
        if URLDownloadToCacheFile(nil, PChar(URL), PChar(FileName), MAX_PATH, 0, nil) = S_OK then
          begin
            Result := True;
          end;
end;

[yhackup]

Denemiştim ama indirmiyor,

Fakat işin ilginç yanı, bu url'de ip kısıtlaması var, ip'si tanımlanan yere proxy kurdum kendimde debug etmek için,

Kendi bilgisayarımda clHttp1453 nesneme proxy bilgisi girdiğimde dosyayı indirdi. proxy bilgisini silip tekrar ip'si tanımlı bilgisayara attım indirmiyor. tam çıldırmaca.