StarOffice Basic
aus Wikipedia, der freien Enzyklopädie
StarOffice Basic (auch bekannt unter der Bezeichnung StarBasic und OOoBasic) ist ein BASIC-Dialekt, der in die Office-Pakete LibreOffice, OpenOffice.org und StarOffice und dem darauf basierenden IBM Lotus Symphony integriert ist.
Obwohl StarBasic selbst eine Ähnlichkeit zu anderen Basic-Dialekten, wie Microsofts VBA hat, unterscheidet sich das Application Programming Interface (API) deutlich, wie das nachfolgende Beispiel eines Makros zeigt:
Sub ParaCount ' ' Absätze in einem Textdokument zählen ' Dim Doc As Object, Enum As Object, Count As Long Doc = ThisComponent ' Ist dies ein Textdokument? If Not Doc.SupportsService("com.sun.star.text.TextDocument") Then MsgBox "Dieses Makro muss aus einem Textdokument ausgeführt werden", 64, "Error" Exit Sub End If Count = 0 ' Jeden Teil des Dokuments überprüfen - Absatz oder Tabelle? Enum = Doc.Text.CreateEnumeration While Enum.HasMoreElements TextEl = Enum.NextElement ' Ist dieser Teil des Dokuments ein Absatz? If TextEl.SupportsService("com.sun.star.text.Paragraph") Then Count = Count + 1 End If Wend 'Ergebnis anzeigen: MsgBox Count, 0, "Anzahl der Absätze" End Sub
Inhaltsverzeichnis |
Literatur [Bearbeiten]
- Thomas Krumbein: Makros in OpenOffice.org 3. Basic/StarBasic Einstieg, Galileo Press, Bonn 2009, ISBN 978-3-8362-1438-4.
Weblinks [Bearbeiten]
BASIC-Macros [Bearbeiten]
- StarOffice 7 Basic Programmierhandbuch
- StarOffice 8 Programmierhandbuch für BASIC 8 (PDF; 1,6 MB)
- OpenOffice.org VBA Emulation Model Project (in einer frühen Entwicklungsphase)
- Andrew Pitonyak's Makroinformation
