Source position: IdExplicitTLSClientServerBase.pas line 97
type TIdOnTLSNegotiationFailure = procedure(
Asender: TObject;
var VContinue: Boolean
) of object;