这个TIdSSLIOHandlerSocketOpenSSL到底怎么用,我一连接就报错
  IdFTP1.Host := 'ip';
  IdFTP1.Port := 15720;
  IdFTP1.Username := '用户名';
  IdFTP1.Password := '密码';
  IdFTP1.IOHandler := idSSL1;
  IdFTP1.UseTLS := utUseImplicitTLS;
  IdFTP1.Connect;
错误为
Error connecting with SSL.
Error connecting with SSL.
error:1408F10B:SSL routines:SSL3_GET_RECORD:wrong version number.明明以前用的时候都没问题,我都折腾半天了,下载的openssl版本从0.9.8a到最新的,差不多试了个遍,还是报这个错,到底是什么问题?

解决方案 »

  1.   

    解决了,有新问题。
    多个线程,分别创建idftp和idssliohandlersocketopenssl,偶尔会报错“Can't open data connection.”分不够可以加
      

  2.   


    var
            ssl1: TIdSSLIOHandlerSocket;
    procedure TForm1.Button1Click(Sender: TObject);
    var
            mstr: string;
    begin
            ssl1.SSLOptions.CertFile := 'c:\xxx_crt.pem';
            ssl1.SSLOptions.KeyFile := 'c:\xxx_key.pem';
            ssl1.SSLOptions.RootCertFile :='c:\ca.pem';
            mstr := idhttp1.Get('https://xxx/yyy/Service.asmx');
            showmessage(mstr);
    end;procedure TForm1.ssl1GetPassword(var Password: String);
    begin
            Password := '123456';
    end;
      

  3.   

    ssl总是很麻烦
    2个dll是在能搜到路径了?