OpenOffice.org BASIC Guide - OpenOffice.org wiki

Overview of Central Interfaces
com.sun.star.container.XEnumeration and XenumerationAccess
Interfaces
The basic object must provide the XEnumerationAccess interface, which contains only a createEnumeration
method. This returns an auxiliary object, which in turn provides the XEnumeration interface with the
hasMoreElements and nextElement methods. Through these, you then have access to the subordinate objects.
The following example steps through all the paragraphs of a text:
Dim ParagraphEnumeration As Object
Dim Paragraph As Object
ParagraphEnumeration = Textdoc.Text.createEnumeration
While ParagraphEnumeration.hasMoreElements()
Paragraph = ParagraphEnumeration.nextElement()
Wend
The example first creates a ParagraphEnumeration auxiliary object. This gradually returns the individual
paragraphs of the text in a loop. The loop is terminated as soon as the hasMoreElements method returns the
False value, signaling that the end of the text has been reached.
Chapter 4 · Introduction to the API 57