Delphi使用IdHttp 获取 HttpsURL内容

本文整理自网络，侵删。

 
uses IdHTTP, IdSSLOpenSSL;

function HttpsGet(const aURL, aContentFile: string): Boolean;
var
  vIdHTTP: TIdHTTP;
  vSSL: TIdSSLIOHandlerSocket;
  vMemory: TMemoryStream;
begin
  try
    vIdHTTP := TIdHTTP.Create(nil);
    vSSL := TIdSSLIOHandlerSocket.Create(nil);
    vMemory := TMemoryStream.Create;
    try
      vIdHTTP.IOHandler := vSSL;
      vSSL.SSLOptions.Method := sslvSSLv3;
      vIdHTTP.Get(aURL, vMemory);
      vMemory.SaveToFile(aContentFile);
      Result := True;
    finally
      vMemory.Free;
      vSSL.Free;
      vIdHTTP.Free;
    end;
  except
    Result := False;
  end;
end;
 

相关阅读 >>

Delphi 禁用tedit右键菜单及复制粘贴

Delphi 禁用启用网卡

Delphi 回车符 换行符

Delphi 处理图片(剪切，压缩)

Delphi adoconnection1连接mssql数据库方法

Delphi tms web core messagedlg对话框用法

Delphi 实现延时自动关闭对话框

Delphi2010中字符串汇编需要注意的一点，以及支持2010的aes加密库

Delphi 获取系统注册的文件图标

Delphi tadoquery的用法

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi使用IdHttp 获取 HttpsURL内容