Consumir um servço para download

[OldProgramer]

Tenho que acessar uma base de dados que me retorna um link para baixar um PDF. É assim: "https://www.xyz.com.br/pasta/acao/venda.php?acao=ETIQUETA&id_venda=1618786257"

No navegador me retorna um PDF para baixar ou abrir.

Usei os componentes IdHTTP e IdSSLIOHandlerSocketOpenSSL.

Tentei dessas duas maneiras e não consegui nada (onde nUrl é o mencionado acima).

fileDownload := TFileStream.Create('etiqueta.pdf', fmCreate);
try
        IdHTTP1.Get(nUrl, fileDownload);
finally
           FreeAndNil(fileDownload);
end;

 

E assim:

 

Response := TStringStream.Create('');
try
      IdHTTP1.Get(nUrl, Response);
      Memo1.Lines.Text := Response.DataString;
 except on E: EIdHTTPProtocolException do
 begin
            Memo1.Lines.Text := E.ClassName + ': '+E.Message;
 end;
end;
WBLoadHTML(Response.DataString);
Response.Free;

 

Alguém pode me dar uma mão com isso?

Grato

Editado 26 Janeiro, 2018 por OldProgramer
Erro de grafia

[Juliomar Marchetti]

tentou usar o ACBrDownload

tem um exemplo no svn

[OldProgramer]

18 horas atrás, Juliomar Marchetti disse:

tentou usar o ACBrDownload

tem um exemplo no svn

Opa Juliomar, tentei mas ele baixa apenas o nome do destino com extensão part. Acho que é porque não suporta HTTPS não?

De qualquer jeito obrigado pelo toque.