我找到了一个Indy示例:
Id_HandlerSocket := TIdSSLIOHandlerSocketOpenSSL.Create( IdHTTP1 );
cert := 'zugang.pem';
Id_HandlerSocket.SSLOptions.CertFile := cert; (* PEM contain both CERT and Key *)
Id_HandlerSocket.SSLOptions.KeyFile := cert;
Id_HandlerSocket.SSLOptions.Mode := sslmClient;
Id_HandlerSocket.SSLOptions.Method := sslvSSLv23;
IdHTTP1.IOHandler := Id_HandlerSocket;
如何提供容器密码?或者,是否有更好的Delphi工具与客户端证书执行SSL连接?
答案 0 :(得分:0)
TIdSSLIOHandlerSocketOpenSSL
具有OnGetPassword
和OnGetPasswordEx
事件,您可以使用它们来提供受保护证书的密码,例如通过提示用户。