Class T_SMTP (unit tcpip)

Inherits from

T_TcpIp

@\\\0000000103*) { The Mail and News protocols } (*@/// T_SMTP = class(T_TcpIp) // RFC 821

Constructors


constructor Create(Aowner:TComponent);

@\\\0000000305*) { remove jobs } { get status } (*@\\\0000000501*) { The Mail and News protocols } (*@/// class t_smtp(t_tcpip) *) (*@/// constructor t_smtp.


Functions

procedure action;

@\\\0000000501*) (*@/// procedure t_smtp.

destructor Destroy;

@\\\0000000501*) (*@/// destructor t_smtp.

procedure response;

@\\\0000000A17*) (*@/// procedure t_smtp.

procedure SetBody(Value: TStringList);

@\\\0000000801*) (*@/// procedure t_smtp.

procedure SetRecipients(Value: TStringList);

@\\\0000000603*) (*@/// procedure t_smtp.

Properties

property Hostname : string


property Message : TStringList


property Recipients : TStringlist


property Sender : string


Events

event OnTrace :


Variables

f_body : tstringlist;


f_host : string;


f_receipts : tstringlist;


f_status_nr : integer;


f_status_txt : string;


f_user : string;



Constructors


constructor Create(Aowner:TComponent);

@\\\0000000305*) { remove jobs } { get status } (*@\\\0000000501*) { The Mail and News protocols } (*@/// class t_smtp(t_tcpip) *) (*@/// constructor t_smtp.Create(Aowner:TComponent);


Functions


procedure action;

@\\\0000000501*) (*@/// procedure t_smtp.action;


destructor Destroy;

@\\\0000000501*) (*@/// destructor t_smtp.Destroy;


procedure response;

@\\\0000000A17*) (*@/// procedure t_smtp.response;


procedure SetBody(Value: TStringList);

@\\\0000000801*) (*@/// procedure t_smtp.SetBody(Value: TStringList);


procedure SetRecipients(Value: TStringList);

@\\\0000000603*) (*@/// procedure t_smtp.SetRecipients(Value: TStringList);


Properties


property Hostname : string


property Message : TStringList


property Recipients : TStringlist


property Sender : string


Events


event OnTrace :


Variables


f_body : tstringlist;


f_host : string;


f_receipts : tstringlist;


f_status_nr : integer;


f_status_txt : string;


f_user : string;