2021-04-19

Delphi访问Https请求

1、Delphi调用http接口直接使用TIdHttp就可以了，但是调用https接口的时候就需要和TIdSSLIOHandlerSocket控件一起使用。

 

2、TIdSSLIOHandlerSocket控件属性设置：SSLOptions -> Method 属性，设置为：sslvTLSv1；其中还会用到libeay32.dll和ssleay32.dll两个dll，可以从网上下载，直接放到项目的根目录下即可！也可以这里下载https://download.csdn.net/download/IMT0601/16752292?spm=1001.2014.3001.5501

 

3、TIdHttp配置，TIdHTTP 控件绑定 TIdSSLIOHandlerSocket 控件：

3.1、IOHandler 这个属性，下拉，选择 IdSSLIOHandlerSocket；

3.2、HandleRedirects 属性：设置为 True；默认是 False； 网页重定向 ，不开的话如果网页有重定向，跳转网页会报错 http/1.1 301 moved permanently

3.3、HTTPOptions设置默认是[hoForceEncodeParams]，从源码中可以看到会对post的内容自动编码，如果服务端接收不需要编码，需要这里设置一下

 

4、遇到问题：

测试使用过程中，发现Delphi7做了一个测试例子，调用是正常的，用Delphi2007做测试例子第一次调用总是会提示“Could not load SSL Library”,第二次调用不正常，但是不报“Could not load SSL Library”错误，原因可能是libeay32.dll和ssleay32.dll两个dll的版本不正确；但当我把Delphi2007这个工程迁移到Delphi7后， 第一次调用也总是提示"Could not load SSL Library"，第二次调用是正常的。

网上找了很多资料，找到了这个单元“IdSSLOpenSSLHeaders”引用进来，在窗体创建中，主动调用IdSSLOpenSSLHeaders单元Load方法，测试就正常，具体原因不明！