TIdSMTPServer

type TIdSMTPServer = class(TIdExplicitTLSServer)

protected

  FOnBeforeMsg: TOnDataStreamEvent;

  FOnMailFrom: TOnMailFromEvent;

  FOnMsgReceive: TOnMsgReceive;

  FOnRcptTo: TOnRcptToEvent;

  FOnReceived: TOnReceived;

  FOnReset: TOnSMTPEvent;

  FOnSPFCheck: TOnSPFCheck;

  FOnUserLogin: TOnSMTPUserLoginEvent;

  FServerName: string;

  FAllowPipelining: Boolean;

  FMaxMsgSize: Integer;

  function CreateGreeting; override;

  function CreateReplyUnknownCommand; override;

  procedure DoAuthLogin();

  procedure CommandNOOP();

  procedure CommandQUIT();

  procedure CommandEHLO();

  procedure CommandHELO();

  procedure CommandAUTH();

  procedure CommandMAIL();

  procedure CommandRCPT();

  procedure CommandDATA();

  procedure CommandRSET();

  procedure CommandSTARTTLS();

  procedure CommandBDAT();

  procedure AuthFailed();

  procedure CmdSyntaxError();

  procedure BadSequenceError();

  procedure InvalidSyntax();

  procedure NoHello();

  procedure MustUseTLS();

  procedure MailFromAccept();

  procedure MailFromReject();

  procedure AddrValid();

  procedure AddrInvalid();

  procedure AddrWillForward();

  procedure AddrNotWillForward();

  procedure AddrDisabledPerm();

  procedure AddrDisabledTemp();

  procedure AddrNoRelaying();

  procedure AddrTooManyRecipients();

  procedure MailSubmitOk();

  procedure MailSubmitLimitExceeded();

  procedure MailSubmitStorageExceededFull();

  procedure MailSubmitTransactionFailed();

  procedure MailSubmitLocalProcessingError();

  procedure MailSubmitSystemFull();

  procedure SetEnhReply();

  function GetReplyClass; override;

  function GetRepliesClass; override;

  procedure InitComponent; override;

  procedure DoReplyUnknownCommand(); override;

  procedure InitializeCommandHandlers; override;

  procedure DoReset();

  procedure MsgBegan();

  procedure MsgReceived();

  procedure SetMaxMsgSize();

  function SPFAuthOk();

published

  property OnBeforeMsg: TOnDataStreamEvent; [rw]

  property OnMailFrom: TOnMailFromEvent; [rw]

  property OnMsgReceive: TOnMsgReceive; [rw]

  property OnRcptTo: TOnRcptToEvent; [rw]

  property OnReceived: TOnReceived; [rw]

  property OnReset: TOnSMTPEvent; [rw]

  property OnSPFCheck: TOnSPFCheck; [rw]

  property OnUserLogin: TOnSMTPUserLoginEvent; [rw]

  property AllowPipelining: Boolean; [rw]

  property DefaultPort: TIdPort;

  property MaxMsgSize: Integer; [rw]

  property ServerName: string; [rw]

  property UseTLS: TIdUseTLS;

end;

TIdSMTPServer

TIdExplicitTLSServer

TIdCmdTCPServer

TIdTCPServer

TIdCustomTCPServer

TIdComponent

TIdBaseComponent

TIdInitializerComponent

TObject