| Class TMegaMail (unit MegaEmail) |
TWinControl
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
destructor Destroy;
Procedure Execute;
Procedure SendFile;
Procedure SendFile_Attach;
procedure Done_Send;
Procedure Error_InSend(ENumber:Cardinal;EMessage:String);
Procedure FileNotExist;
function GetAbout: String;
procedure Init_Send;
Procedure Send_Mail(MMail:TMapiMessage);
procedure SetAddDate(Value: Boolean);
procedure SetAttachment(Value: Boolean);
procedure SetDocument(Value: String);
Procedure User_Cancel;| Properties |
property About : String
property AddDate : Boolean
property Attachment : Boolean
property Source : String| Events |
event OnBeginDocument : TMegaNotifyEvent
event OnCancelSend : TMegaNotifyEvent
event OnEndDocument : TMegaNotifyEvent
event OnErrorSend : TMegaErrorNotifyEvent
event OnFileNotExists : TMegaNotifyEvent| Variables |
FAbout : String;
FAddDate : Boolean;
FAttachment : Boolean;
FDocument : String;
FOnBeginDoc : TMegaNotifyEvent;
FOnCancelSend : TMegaNotifyEvent;
FOnEndDoc : TMegaNotifyEvent;
FOnErrorSend : TMegaErrorNotifyEvent;
FOnFileNotExist : TMegaNotifyEvent;| Constructors |
constructor Create(AOwner: TComponent);Public declarations
| Functions |
destructor Destroy;
Procedure Execute;
Procedure SendFile;Protected declarations
Procedure SendFile_Attach;
procedure Done_Send;
Procedure Error_InSend(ENumber:Cardinal;EMessage:String);
Procedure FileNotExist;
function GetAbout: String;
procedure Init_Send;
Procedure Send_Mail(MMail:TMapiMessage);
procedure SetAddDate(Value: Boolean);
procedure SetAttachment(Value: Boolean);
procedure SetDocument(Value: String);
Procedure User_Cancel;| Properties |
property About : String
property AddDate : Boolean
property Attachment : Boolean
property Source : StringPublished declarations
| Events |
event OnBeginDocument : TMegaNotifyEvent
event OnCancelSend : TMegaNotifyEvent
event OnEndDocument : TMegaNotifyEvent
event OnErrorSend : TMegaErrorNotifyEvent
event OnFileNotExists : TMegaNotifyEvent| Variables |
FAbout : String;
FAddDate : Boolean;Private declarations
FAttachment : Boolean;
FDocument : String;
FOnBeginDoc : TMegaNotifyEvent;
FOnCancelSend : TMegaNotifyEvent;
FOnEndDoc : TMegaNotifyEvent;
FOnErrorSend : TMegaErrorNotifyEvent;
FOnFileNotExist : TMegaNotifyEvent;