Colocar imagem da Internet e por no Timage com TFPHTTPClient

//uses fphttpclient;
procedure TFormSintegra.CarregaImagem;
var
  auxStream: TMemoryStream;
  auxImagem: TJPEGImage;
  auxClient: TFPHTTPClient;
  auxStatus: Integer;
begin
  auxClient := TFPHTTPClient.Create(nil);
  auxStream := TMemoryStream.Create;
  try
    auxClient.AllowRedirect := True;
    auxClient.Get('http://www.sintegra.fazenda.pr.gov.br/sintegra/captcha', auxStream);
    auxStatus := auxClient.ResponseStatusCode;
    if (auxStatus = 200) then
    begin
      auxImagem := TJPEGImage.Create;
      try
        auxStream.Position := 0;
        auxImagem.LoadFromStream(auxStream);
        ImageCaptcha.Picture.Assign(auxImagem);
      finally
        FreeAndNil(auxImagem);
      end;
    end
    else
      Riba.Aviso('Erro ao obter o Captcha!');
  finally
    FreeAndNil(auxClient);
    FreeAndNil(auxStream);
  end;
end;