TsgcWebSocketHTTPServer › 事件 › OnSSLAfterCreateHandler
在 SSL 处理器创建后触发,以便自定义其属性。
property OnSSLAfterCreateHandler: TsgcWSOnSSLAfterCreateHandler;
// TsgcWSOnSSLAfterCreateHandler = procedure(Sender: TObject; aType: TwsSSLHandler; aSSLHandler: TIdSSLIOHandlerSocketBase) of object
—
如果 OnSSLGetHandler 未提供自定义 SSL 处理程序,服务器将创建默认处理程序(OpenSSL 或 SChannel,取决于所选的 IOHandler),然后触发 OnSSLAfterCreateHandler,以便应用程序可以调整其属性,例如强制特定的 TLS 方法、配置额外的 OpenSSL 选项或调整会话缓存。aType 参数报告构建的处理程序类型,aSSLHandler 是将实际执行 TLS 握手的实例;事件不拥有处理程序,处理程序代码中不得释放它。
procedure OnSSLAfterCreateHandler(Sender: TObject; aType: TwsSSLHandler;
aSSLHandler: TIdServerIOHandlerSSLBase);
begin
TIdServerIOHandlerSSLOpenSSL(aSSLHandler).SSLOptions.Method := sslvTLSv1_2;
end;