| Class TNewMessageForm (unit Newmail) |
TForm
| Constructors |
| Functions |
procedure AddBookBtnClick(Sender: TObject);
procedure AttachBtnClick(Sender: TObject);
procedure AttachmentsLBDrawItem(Control: TWinControl; Index: Integer;
Rect: TRect; State: TOwnerDrawState);
procedure BitBtn4Click(Sender: TObject);
procedure FormActivate(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);
procedure FormShow(Sender: TObject);
procedure MailLaterBtnClick(Sender: TObject);
procedure MailNowBtnClick(Sender: TObject);
procedure GenerateMessage(m: TStrings);| Properties |
| Events |
| Variables |
AddBookBtn : TBitBtn;
AttachBtn : TBitBtn;
AttachmentsLB : TComboBox;
BccEdt : TEdit;
BitBtn4 : TBitBtn;
ccEdt : TEdit;
Label1 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Label4 : TLabel;
Label5 : TLabel;
MailLaterBtn : TBitBtn;
MailNowBtn : TBitBtn;
Memo1 : TMemo;
Panel1 : TPanel;
SubjectEdt : TEdit;
ToEdt : TEdit;
BccList : TStrings;
ccList : TStrings;
ToList : TStrings;
Attachments : array[1..50] of TSendMailAttachment;
NumAttachments : integer;| Constructors |
| Functions |
procedure AddBookBtnClick(Sender: TObject);
procedure AttachBtnClick(Sender: TObject);
procedure AttachmentsLBDrawItem(Control: TWinControl; Index: Integer;
Rect: TRect; State: TOwnerDrawState);
procedure BitBtn4Click(Sender: TObject);
procedure FormActivate(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);for TMailboxForm
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);
procedure FormShow(Sender: TObject);store message in pending mailbox
procedure MailLaterBtnClick(Sender: TObject);
procedure MailNowBtnClick(Sender: TObject);
procedure GenerateMessage(m: TStrings);store message in sent mailbox
| Properties |
| Events |
| Variables |
AddBookBtn : TBitBtn;
AttachBtn : TBitBtn;
AttachmentsLB : TComboBox;
BccEdt : TEdit;
BitBtn4 : TBitBtn;
ccEdt : TEdit;
Label1 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Label4 : TLabel;
Label5 : TLabel;
MailLaterBtn : TBitBtn;
MailNowBtn : TBitBtn;
Memo1 : TMemo;
Panel1 : TPanel;
SubjectEdt : TEdit;
ToEdt : TEdit;
BccList : TStrings;
ccList : TStrings;
ToList : TStrings;
Attachments : array[1..50] of TSendMailAttachment;
NumAttachments : integer;