Source position: fpcustwsserver.pp line 38
type TWSGetSocketHandlerEvent = procedure(
Sender: TObject;
const UseSSL: Boolean;
out AHandler: TSocketHandler
) of object;