TOnRcptToEvent

type TOnRcptToEvent = procedure(

  ASender: TIdSMTPServerContext;

  const AAddress: string;

  AParams: TStrings;

  var VAction: TIdRCPToReply;

  var VForward: string

) of object;