| Class TNotesRichTextItem (unit Class_LotusNotes) |
| Constructors |
constructor Create(notesDocument: TNotesDocument; aName: string);
constructor CreateNew (notesDocument: TNotesDocument; aName: string);| Functions |
procedure AddPara;
procedure AddText (Text: string);
procedure Attach (AName: string);
procedure CheckContext;***************************************************
procedure CreateContext;**********************************************
destructor Destroy;
procedure Detach (Index: integer; FileName: string);**********************************************
function FindAttachment(aName: string): integer;
procedure SaveContext;**********************************************
procedure AddMem (const Sz: dword);
procedure AddStyle;
procedure AttachFiles;
function CheckOdd (const sz: dword): dword;
function GetAttachment(Index: integer): string;
function GetAttachmentCount: integer;
function GetFontBoolProperty (Index: integer): boolean;
function GetParaIntProperty (Index: integer): integer;
procedure LoadAttachmentInfo;
procedure SetFontBoolProperty (Index: integer; Value: boolean);
procedure SetParaIntProperty (Index: integer; Value: integer);
procedure SetParaJustification (Value: TRichTextJustification);| Properties |
property Attachment : string
property AttachmentCount : integer
property FontBold : boolean
property FontColor : word
property FontEmboss : boolean
property FontExtrude : boolean
property FontFace : TRichTextFont
property FontFaceName : string
property FontItalic : boolean
property FontShadow : boolean
property FontSize : integer
property FontStrikeout : boolean
property FontSubScript : boolean
property FontSuperScript : boolean
property FontUnderline : boolean
property ParaAfterSpace : integer
property ParaBeforeSpace : integer
property ParaFirstLeftMargin : integer
property ParaJustification : TRichTextJustification
property ParaLeftMargin : integer
property ParaLineSpacing : integer
property ParaRightMargin : integer| Events |
| Variables |
FAttach : TStrings;
FContext : pointer;
FCurPtr : pointer;
FCurStyle : integer;
FFontBoolProperties : array [0..8] of boolean;
FFontColor : word;
FFontFace : TRichTextFont;
FFontFaceName : string;
FFontSize : integer;
FFontTableChanged : boolean;
FLength : dword;
FNewStyle : boolean;
FParaIntProperties : array [0..5] of integer;
FParaJustification : TRichTextJustification;
FPostedAttachments : TStringList;| Constructors |
constructor Create(notesDocument: TNotesDocument; aName: string);ClassMarker_Method(TNotesItem) *************************************************** TNotesRichTextItem
constructor CreateNew (notesDocument: TNotesDocument; aName: string);***************************************************
| Functions |
procedure AddPara;**********************************************
procedure AddText (Text: string);**********************************************
procedure Attach (AName: string);**********************************************
procedure CheckContext;creates or resets Rich-text context
***************************************************
procedure CreateContext;attach a file by its name to the current context
**********************************************
destructor Destroy;**********************************************
procedure Detach (Index: integer; FileName: string);return index in Attachment or -1
**********************************************
function FindAttachment(aName: string): integer;***************************************************
procedure SaveContext;checks the context existence and creates if neccessary
**********************************************
procedure AddMem (const Sz: dword);**********************************************
procedure AddStyle;**********************************************
procedure AttachFiles;**********************************************
function CheckOdd (const sz: dword): dword;**********************************************
function GetAttachment(Index: integer): string;***************************************************
function GetAttachmentCount: integer;***************************************************
function GetFontBoolProperty (Index: integer): boolean;**********************************************
function GetParaIntProperty (Index: integer): integer;**********************************************
procedure LoadAttachmentInfo;***************************************************
procedure SetFontBoolProperty (Index: integer; Value: boolean);**********************************************
procedure SetParaIntProperty (Index: integer; Value: integer);**********************************************
procedure SetParaJustification (Value: TRichTextJustification);**********************************************
| Properties |
property Attachment : stringnumber of file attachments
property AttachmentCount : integer
property FontBold : booleansave context to field Font properties
property FontColor : word
property FontEmboss : boolean
property FontExtrude : boolean
property FontFace : TRichTextFont
property FontFaceName : string
property FontItalic : boolean
property FontShadow : boolean
property FontSize : integer
property FontStrikeout : boolean
property FontSubScript : boolean
property FontSuperScript : boolean
property FontUnderline : boolean
property ParaAfterSpace : integer
property ParaBeforeSpace : integer
property ParaFirstLeftMargin : integer
property ParaJustification : TRichTextJustificationParagraph properties
property ParaLeftMargin : integer
property ParaLineSpacing : integer
property ParaRightMargin : integer| Events |
| Variables |
FAttach : TStrings;
FContext : pointer;
FCurPtr : pointer;
FCurStyle : integer;
FFontBoolProperties : array [0..8] of boolean;
FFontColor : word;
FFontFace : TRichTextFont;
FFontFaceName : string;
FFontSize : integer;
FFontTableChanged : boolean;
FLength : dword;
FNewStyle : boolean;
FParaIntProperties : array [0..5] of integer;
FParaJustification : TRichTextJustification;
FPostedAttachments : TStringList;