Class T_Mail (unit tcpip)

Inherits from

T_MailNews

@\\\0000001001*) (*@/// T_Mail = class(T_MailNews) // RFC 822

Constructors


constructor Create(Aowner:TComponent);

@\\\0000000B01*) (*@\\\0000000701*) (*@/// class t_mail(t_mailnews) *) (*@/// constructor t_mail.


Functions

procedure action;

@\\\0000000601*) (*@/// procedure t_mail.

destructor Destroy;

@\\\0000000601*) (*@/// destructor t_mail.

procedure SetBCC(Value: TStringList);

@\\\0000000609*) (*@/// procedure t_mail.

procedure SetCC(Value: TStringList);

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

procedure SetRecipients(Value: TStringList);

@\\\0000000601*) (*@/// procedure t_mail.

Properties

property BCC : TStringlist


property CC : TStringlist


property Disclose_Receipts : boolean


property Recipients : TStringlist


property SMTP : T_SMTP


Events

Variables

f_bcc : TStringlist;


f_cc : TStringlist;


f_disclose_receipts : boolean;


f_receipts : TStringlist;


f_smtp : T_SMTP;



Constructors


constructor Create(Aowner:TComponent);

@\\\0000000B01*) (*@\\\0000000701*) (*@/// class t_mail(t_mailnews) *) (*@/// constructor t_mail.Create(Aowner:TComponent);


Functions


procedure action;

@\\\0000000601*) (*@/// procedure t_mail.action;


destructor Destroy;

@\\\0000000601*) (*@/// destructor t_mail.Destroy;


procedure SetBCC(Value: TStringList);

@\\\0000000609*) (*@/// procedure t_mail.SetBCC(Value: TStringList);


procedure SetCC(Value: TStringList);

@\\\0000000603*) (*@/// procedure t_mail.SetCC(Value: TStringList);


procedure SetRecipients(Value: TStringList);

@\\\0000000601*) (*@/// procedure t_mail.SetRecipients(Value: TStringList);


Properties


property BCC : TStringlist


property CC : TStringlist


property Disclose_Receipts : boolean


property Recipients : TStringlist


property SMTP : T_SMTP


Events


Variables


f_bcc : TStringlist;


f_cc : TStringlist;


f_disclose_receipts : boolean;


f_receipts : TStringlist;


f_smtp : T_SMTP;