Source position: IdSMTPBase.pas line 127
type TIdSMTPFailedEHLO = procedure(
Sender: TObject;
const ACode: string;
const AText: string;
var VContinue: Boolean
) of object;