Class TSmtpTestForm (unit smtptst1)

Inherits from

TForm

Constructors



Functions

procedure ClearDisplayButtonClick(Sender: TObject);

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

procedure ConnectButtonClick(Sender: TObject);

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

procedure DisconnectButtonClick(Sender: TObject);

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

procedure FormCreate(Sender: TObject);

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

procedure MailButtonClick(Sender: TObject);

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

procedure SmtpClientDisplay(Sender: TObject; Msg: String);

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

procedure SmtpClientGetData(Sender: TObject; LineNum: Integer; MsgLine: PChar; MaxLen: Integer; var More: Boolean);

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

procedure SmtpClientHeaderLine(Sender: TObject; Msg: PChar; Size: Integer);

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

Properties

Events

Variables

ClearDisplayButton : TButton;


ConnectButton : TButton;


DisconnectButton : TButton;


DisplayMemo : TMemo;


FileAttachMemo : TMemo;


FromEdit : TEdit;


HostEdit : TEdit;


Label1 : TLabel;


Label2 : TLabel;


Label3 : TLabel;


Label4 : TLabel;


Label5 : TLabel;


Label6 : TLabel;


Label7 : TLabel;


MailButton : TButton;


MsgMemo : TMemo;


Panel1 : TPanel;


Panel2 : TPanel;


Panel3 : TPanel;


PortEdit : TEdit;


SignOnEdit : TEdit;


SmtpClient : TSmtpClient;


Subject : TLabel;


SubjectEdit : TEdit;


ToEdit : TEdit;


Wait1 : TWait;



Constructors


Functions


procedure ClearDisplayButtonClick(Sender: TObject);

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


procedure ConnectButtonClick(Sender: TObject);

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


procedure DisconnectButtonClick(Sender: TObject);

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


procedure FormCreate(Sender: TObject);

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


procedure MailButtonClick(Sender: TObject);

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


procedure SmtpClientDisplay(Sender: TObject; Msg: String);

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


procedure SmtpClientGetData(Sender: TObject; LineNum: Integer; MsgLine: PChar; MaxLen: Integer; var More: Boolean);

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


procedure SmtpClientHeaderLine(Sender: TObject; Msg: PChar; Size: Integer);

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


Properties


Events


Variables


ClearDisplayButton : TButton;


ConnectButton : TButton;


DisconnectButton : TButton;


DisplayMemo : TMemo;


FileAttachMemo : TMemo;


FromEdit : TEdit;


HostEdit : TEdit;


Label1 : TLabel;


Label2 : TLabel;


Label3 : TLabel;


Label4 : TLabel;


Label5 : TLabel;


Label6 : TLabel;


Label7 : TLabel;


MailButton : TButton;


MsgMemo : TMemo;


Panel1 : TPanel;


Panel2 : TPanel;


Panel3 : TPanel;


PortEdit : TEdit;


SignOnEdit : TEdit;


SmtpClient : TSmtpClient;


Subject : TLabel;


SubjectEdit : TEdit;


ToEdit : TEdit;


Wait1 : TWait;