OpenOffice.org BASIC Guide.pdf - OpenOffice.org wiki

Editing Text Documents 102
Cursor.gotoEndOfWord(True)
Cursor.String = "Ups"
Proceed = Cursor.gotoNextSentence(False)
Cursor.gotoNextWord(False)
Loop While Proceed
If the TextCursor contains a highlighted area, an assignment to the String property
replaces this with the new text. If there is no highlighted area, the text is inserted at the
present TextCursor position.
Inserting Control Codes
In some situations, it is not the actual text of a document, but rather its structure that
needs modifying. OpenOffice.org provides control codes for this purpose. These are
inserted in the text and influence its structure. The control codes are defined in the
com.sun.star.text.ControlCharacter
group of constants. The following control codes are available in OpenOffice.org:
PARAGRAPH_BREAK
paragraph break.
LINE_BREAK
line break within a paragraph.
SOFT_HYPHEN
possible point for syllabification.
HARD_HYPHEN
obligatory point for syllabification.
HARD_SPACE
protected space that is not spread out or compressed in justified text.
To insert the control codes, you need not only the cursor but also the associated text
document objects. The following example inserts a paragraph after the 20th character of a
text:
Dim Doc As Object
Dim Cursor As Object
Dim Proceed As Boolean
Doc = StarDesktop.CurrentComponent
Cursor = Doc.Text.createTextCursor
Cursor.goRight(20, False)
Doc.Text.insertControlCharacter(Cursor, _
com.sun.star.text.ControlCharacter.PARAGRAPH_BREAK, False)