Class TSmtpClient (unit smtpcli)

Inherits from

TCustomSmtpClient

Descending component adding MIME (file attach) support

Constructors


constructor Create(AOwner : TComponent);

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *


Functions

destructor Destroy;

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *

function Mail : Boolean;

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *

procedure SetEMailFiles(newValue : TStrings);

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *

procedure TriggerGetData(LineNum : Integer; MsgLine : PChar; MaxLen : Integer; var More : Boolean);

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *

procedure TriggerHeaderLine(Line : PChar; Size : Integer);

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *

Properties

property CharSet :


property EmailFiles : TStrings


property ErrorMessage :


property FromName :


property HdrFrom :


property HdrSubject :


property HdrTo :


property Host :


property LastResponse :


property Port :


property RcptName :


property SignOn :


property Tag :


property TimeOut :


property Wait :


Events

event OnDisplay :


event OnGetData :


event OnHeaderLine :


Variables

FBodyFlag : Boolean;


FBodyLine : Integer;


FCurrentFile : Integer;

File names for attachment

FEmailBody : TStrings;


FEmailFiles : TStrings;

Message body text

FFile : File;

Message parts boundary

FFileStarted : Boolean;


FMimeBoundary : String;

Current file being sent


Constructors


constructor Create(AOwner : TComponent);

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *


Functions


destructor Destroy;

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *


function Mail : Boolean;

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *


procedure SetEMailFiles(newValue : TStrings);

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *


procedure TriggerGetData(LineNum : Integer; MsgLine : PChar; MaxLen : Integer; var More : Boolean);

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *


procedure TriggerHeaderLine(Line : PChar; Size : Integer);

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *


Properties


property CharSet :


property EmailFiles : TStrings


property ErrorMessage :


property FromName :


property HdrFrom :


property HdrSubject :


property HdrTo :


property Host :


property LastResponse :


property Port :


property RcptName :


property SignOn :


property Tag :


property TimeOut :


property Wait :


Events


event OnDisplay :


event OnGetData :


event OnHeaderLine :


Variables


FBodyFlag : Boolean;


FBodyLine : Integer;


FCurrentFile : Integer;

File names for attachment


FEmailBody : TStrings;


FEmailFiles : TStrings;

Message body text


FFile : File;

Message parts boundary


FFileStarted : Boolean;


FMimeBoundary : String;

Current file being sent