Class TAttachedFile (unit SakEmail)

Inherits from

TCollectionItem

Constructors


constructor Create( Collection: TCollection);

***************** TAttachedFile *****************


Functions

procedure SaveToFile( fn: string);


procedure SaveToStream( Stream: TStream);


Properties

property FileName : string


property FileStream : TMemoryStream


property MIMEType : string


Events

Variables

FBodyBin : TMemoryStream;


FBodyEncoded : TStringList;


FFileName : string;


FMIMEType : string;


FUNCFileName : string;



Constructors


constructor Create( Collection: TCollection);

***************** TAttachedFile *****************


Functions


procedure SaveToFile( fn: string);


procedure SaveToStream( Stream: TStream);


Properties


property FileName : string


property FileStream : TMemoryStream


property MIMEType : string


Events


Variables


FBodyBin : TMemoryStream;


FBodyEncoded : TStringList;


FFileName : string;


FMIMEType : string;


FUNCFileName : string;