TsgcWebSocketHTTPServer › Zdarzenia › OnSSLGetHandler
Wywoływane przed utworzeniem procedury obsługi SSL, co umożliwia dostarczenie niestandardowej instancji procedury obsługi po stronie serwera.
property OnSSLGetHandler: TsgcWSOnSSLGetHandler;
// TsgcWSOnSSLGetHandler = procedure(Sender: TObject; aType: TwsSSLHandler; var aSSLHandler: TIdSSLIOHandlerSocketBase) of object
—
OnSSLGetHandler jest wywoływane tuż przed tym, jak serwer tworzy IOHandler TLS używany dla powiązań SSL. Należy przypisać do aSSLHandler instancję własnej klasy dziedziczącej po TIdServerIOHandlerSSLBase (lub, tam gdzie ma to zastosowanie, TIdIOHandlerSSLBase), aby zastąpić domyślny handler, na przykład w celu podłączenia specjalistycznej implementacji OpenSSL lub SChannel. Należy pozostawić aSSLHandler nieprzypisany, aby serwer utworzył domyślny handler; w takim przypadku zdarzenie OnSSLAfterCreateHandler może być nadal używane do dostosowania właściwości po jego utworzeniu. Komponent przejmuje własność handlera przypisanego w tym miejscu i zwolni go po zniszczeniu serwera.
procedure OnSSLGetHandler(Sender: TObject; aType: TwsSSLHandler;
var aSSLHandler: TIdServerIOHandlerSSLBase);
begin
aSSLHandler := TCustomServerSSLHandler.Create(nil);
// ... configure handler properties
end;