Class TForm1 (unit smtpmain) |
Inherits from
TForm
@/// TForm1 = class(TForm)
procedure btn_attachClick(Sender: TObject);
@\\\0000000F01*) (*@/// procedure TForm1.
procedure btn_goClick(Sender: TObject);
@/// procedure TForm1.
procedure FormCreate(Sender: TObject);
@\\\0000000605*) (*@/// procedure TForm1.
procedure FormDestroy(Sender: TObject);
@\\\0000000301*) (*@\\\0000000915
btn_attach : TButton;
btn_go : TButton;
edt_from : TEdit;
edt_host : TEdit;
edt_subject : TEdit;
edt_to : TEdit;
lbl_from : TLabel;
lbl_host : TLabel;
lbl_subject : TLabel;
lbl_text : TLabel;
lbl_to : TLabel;
Mail : T_Mail;
mem_text : TMemo;
Mime : T_Mime;
SMTP : T_SMTP;
attached_files : TStringList;
procedure btn_attachClick(Sender: TObject);
@\\\0000000F01*) (*@/// procedure TForm1.btn_attachClick(Sender: TObject);
procedure btn_goClick(Sender: TObject);
@/// procedure TForm1.btn_goClick(Sender: TObject);
procedure FormCreate(Sender: TObject);
@\\\0000000605*) (*@/// procedure TForm1.FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);
@\\\0000000301*) (*@\\\0000000915
btn_attach : TButton;
btn_go : TButton;
edt_from : TEdit;
edt_host : TEdit;
edt_subject : TEdit;
edt_to : TEdit;
lbl_from : TLabel;
lbl_host : TLabel;
lbl_subject : TLabel;
lbl_text : TLabel;
lbl_to : TLabel;
Mail : T_Mail;
mem_text : TMemo;
Mime : T_Mime;
SMTP : T_SMTP;
attached_files : TStringList;