| Class SendMailDialog (unit Smdialog) |
TComponent
| Constructors |
constructor Create(owner: TComponent);| Functions |
procedure Demo;
destructor Destroy;
function Execute: Boolean;
procedure MeasureText(s: string;var x: integer;var y: integer);
procedure SetAttStrings(s:TStrings);
procedure SetFFont(f: TFont);
procedure SetFLang(s: TStrings);
procedure SetHeaderList(s:TStrings);
procedure SetListBcc(s: TStrings);
procedure SetListcc(s: TStrings);
procedure SetListTo(s: TStrings);
procedure SetMailStrings(s:TStrings);
procedure UpdateInfo;| Properties |
property Attachments : TStrings
property Border : TFormBorderStyle
property Caption : string
property Color : TColor
property Font : TFont
property FROM_Address : string
property FROM_Name : string
property Headers : TStrings
property KeepConnectionOpen : Boolean
property LanguageStrings : TStrings
property ListBcc : TStrings
property Listcc : TStrings
property ListTo : TStrings
property MailText : TStrings
property Options : TSendMailDialogOptions
property Position : TSendMailDialogPos
property SMTP_Port : integer
property SMTP_Server : string
property Status : SendMailInfo
property StatusBarBackground : TColor
property StatusBarColor : TColor
property StatusBarHeight : integer
property StatusBarWidth : integer
property Subject : string
property TimeOut : word
property TO_Address : string
property TO_Name : string
property Version : string
property WindowLeft : integer
property WindowTop : integer
property Initialized : Boolean| Events |
event OnSendMailFeedData : TSendMailEvent
event OnSendMailInfo : TSendMailInfoEvent
event OnSetupNextMessage : TNotifyEvent| Variables |
AttachStrings : TStrings;
bs : TFormBorderStyle;
d : Tsmdlg;
DummyS : string;
FCaption : string;
FColor : TColor;
FDemo : Boolean;
FFName : string;
FFont : TFont;
FHeight : integer;
FInit : Boolean;
FKeepOpen : Boolean;
FLang : TStrings;
fleft : integer;
FListBcc : TStrings;
FListcc : TStrings;
FListTo : TStrings;
FNextMsg : TNotifyEvent;
FOptions : TSendMailDialogOptions;
FPort : integer;
FPos : TSendMailDialogPos;
FReply : string;
FServer : string;
FStatusBk : TColor;
FStatusColor : TColor;
FSubject : string;
FTAddress : string;
FText : TStrings;
FTimeOut : word;
FTName : string;
ftop : integer;
FVersion : string;
FWidth : integer;
HeaderList : TStrings;
MailStrings : TStrings;
MI : SendMailInfo;
OSMFD : TSendMailEvent;
OSMI : TSendMailInfoEvent;| Constructors |
constructor Create(owner: TComponent);=========================== Component Code =========================
| Functions |
procedure Demo;
destructor Destroy;
function Execute: Boolean;
procedure MeasureText(s: string;var x: integer;var y: integer);
procedure SetAttStrings(s:TStrings);
procedure SetFFont(f: TFont);
procedure SetFLang(s: TStrings);
procedure SetHeaderList(s:TStrings);
procedure SetListBcc(s: TStrings);
procedure SetListcc(s: TStrings);
procedure SetListTo(s: TStrings);
procedure SetMailStrings(s:TStrings);
procedure UpdateInfo;| Properties |
property Attachments : TStrings
property Border : TFormBorderStyle
property Caption : string
property Color : TColor
property Font : TFont
property FROM_Address : string
property FROM_Name : string
property Headers : TStrings
property KeepConnectionOpen : Boolean
property LanguageStrings : TStrings
property ListBcc : TStrings
property Listcc : TStrings
property ListTo : TStrings
property MailText : TStrings
property Options : TSendMailDialogOptions
property Position : TSendMailDialogPos
property SMTP_Port : integer
property SMTP_Server : string
property Status : SendMailInfo
property StatusBarBackground : TColor
property StatusBarColor : TColor
property StatusBarHeight : integer
property StatusBarWidth : integer
property Subject : string
property TimeOut : word
property TO_Address : string
property TO_Name : string
property Version : string
property WindowLeft : integer
property WindowTop : integer
property Initialized : Boolean| Events |
event OnSendMailFeedData : TSendMailEvent
event OnSendMailInfo : TSendMailInfoEvent
event OnSetupNextMessage : TNotifyEvent| Variables |
AttachStrings : TStrings;
bs : TFormBorderStyle;
d : Tsmdlg;
DummyS : string;
FCaption : string;
FColor : TColor;
FDemo : Boolean;
FFName : string;
FFont : TFont;
FHeight : integer;
FInit : Boolean;
FKeepOpen : Boolean;
FLang : TStrings;
fleft : integer;
FListBcc : TStrings;
FListcc : TStrings;
FListTo : TStrings;
FNextMsg : TNotifyEvent;
FOptions : TSendMailDialogOptions;
FPort : integer;
FPos : TSendMailDialogPos;
FReply : string;
FServer : string;
FStatusBk : TColor;
FStatusColor : TColor;
FSubject : string;
FTAddress : string;
FText : TStrings;
FTimeOut : word;
FTName : string;
ftop : integer;
FVersion : string;
FWidth : integer;
HeaderList : TStrings;
MailStrings : TStrings;
MI : SendMailInfo;
OSMFD : TSendMailEvent;
OSMI : TSendMailInfoEvent;