使用LotusScript操做Lotus Notes RTF域

Lotus Notes RTF域的功能也很是强大，除了支持普通的文本之外，还支持图片、表格、嵌入对象、Http 连接、Notes 连接、附件等等众多的类型。本文将介绍如何使用这些类来灵活操做富文本域。

操做 Notes 富文本域相关的 LotusScript 类

和操做 Notes 富文本域相关的 LotusScript 类包括：

NotesRichTextNavigator 富文本域的导航器，用来访问富文本域中的各类元素； 
NotesRichTextRange 表示富文本域内容的一个范围，能够包括多个元素； 
NotesRichTextDocLink 表示富文本域内容的文档连接； 
NotesEmbeddedObject 表示嵌入式对象或者文件附件； 
NotesRichTextSection 表示富文本域中的一个区段； 
NotesRichTextTable 表示富文本域中的表格； 
NotesRichTextStyle 表示富文本的各类属性； 
NotesRichTextParagraphStyle 表示富文本段落的各类属性； 
NotesColorObject 表示一种颜色。

程序中使用的一些方法。

NotesSession.CreateRichTextStyle：建立一个 NotesRichTextStyle 对象。 
NotesSession.CreateRichTextParagraphStyle：建立一个 NotesRichTextParagraphStyle 对象。 
NotesSession.CreateColorObject：建立一个 NotesColorObject 对象。 
须要注意的是 NotesRichTextStyle，NotesRichTextParagraphStyle 和 NotesColorObject 这三种对象是不能用 New 来建立的，由于这三个类没有 New() 方法，只能经过 NotesSession 来建立。

NotesRichTextItem.AppendStyle：在当前位置插入一个格式对象，该位置之后的格式都使用这种格式，直到插入了另一个格式。 
NotesRichTextItem.AppendParagraphStyle：在当前位置插入一个段落格式对象，该位置之后的段落格式都使用这种格式，直到插入了另一个段落格式。 
NotesRichTextItem.BeginSection：在富文本域中插入一个区段。 
NotesRichTextItem.EndSection：区段结束，必须和 BeginSection 配对使用。 
在两个方法之间能够经过各类 append 方法添加各类元素。插入区段的时候，区段老是在富文本域的最后。还须要注意的是不能建立一个包含富文本域中已有的元素的区段，经过 BeginSection 方法建立的区段老是空的，区段的内容须要经过程序本身添加。

NotesRichTextItem.CreateNavigator：建立一个富文本域导航器对象 NotesRichTextNavigator。 
建立一个富文本域导航器只能使用这种方法，NotesRichTextNavigator 也没有 new 方法。也能够 NotesRichTextRange.Navigator 属性来获得一个 NotesRichTextNavigator 对象。

NotesRichTextNavigator 类是用来灵活访问操做富文本域里的内容的最重要的一个类，经过它的一些方法，能够方便的访问到各类富文本域中的元素。 
导航器对象 NotesRichTextNavigator 会维护一个当前位置，任何在富文本域中的 get 或者 find 的操做均可能会改变这个当前位置。导航总发生在同一种类型的元素中，主要经过 find 和 get 两类方法来访问相应的元素，找到须要的元素后，再经过 get 方法来取得这个元素。下表列出了这些方法。

NotesRichTextItem.BeginInsert：将插入位置从富文本域结尾处改成指定元素的开始或者结尾处。

NotesRichTextItem.EndInsert：将插入位置重置到富文本域的结尾处，须要和 BeginInsert 配对使用。

在两个方法之间能够经过各类 append 方法添加各类元素。咱们来看看 BeginInsert 的具体使用方法：

Call notesRichTextItem.BeginInsert( element, [ after ] )

参数说明

element：能够是 NotesEmbeddedObject, NotesRichTextDocLink, NotesRichTextNavigator, NotesRichTextRange, NotesRichTextSection, 或者 NotesRichTextTable，表示该对象的位置 . 若是是 NotesRichTextNavigator 则表示此 NotesRichTextNavigator 对象所表示的当前位置。

After：布尔型可选参数，True 表示插入位置在元素的末尾，False（缺省值）表示插入位置在元素的开头。