确保在Delphi7下能使用的libeay32_ssleay32
需要IdHttp控件和IdSSLIOHandlerSocket控件;
示例代码:
IdSSLIOHandlerSocket1 := TIdSSLIOHandlerSocket.Create(nil);
IdSSLIOHandlerSocket.SSLOptions.Method:=sslvTLSv1;
IdSSLIOHandlerSocket.SSLOptions.Mode := sslmClient;
IdHttp1.IOHandler:=IdSSLIOHandlerSocket1;
1