StarOffice Basic
Un article de Wikipédia, l'encyclopédie libre.
Vous avez de 
 |
Cet article est une ébauche à compléter concernant les logiciels, vous pouvez partager vos connaissances en le modifiant. |
StarOffice Basic (aussi connu sous le nom de StarBasic) est un dialecte du langage de programmation Basic qui est inclu dans les suites bureautiques OpenOffice.org et StarOffice . Il supporte l'Unicode.
Bien que StarBasic lui-même est similaire à d'autres dialectes du Basic, tels que Microsoft's VBA, l' API est très différente, comme l'exemple ci-après le montre .
Sub DécompteParagraphes
'
' Compte le nombre de paragraphes dans le document texte
'
Dim Doc As Object, Enum As Object, Décompte As Long
Doc = ThisComponent
' Est ce que (cet objet) this est un document texte?
If Not Doc.SupportsService("com.sun.star.text.TextDocument") Then
MsgBox "Cette macro doit être lancée depuis un document texte", 64, "Error"
Exit Sub
End If
Décompte=0
' Examine chaque composant - paragraphe ou table?
Enum=Doc.Text.CreateEnumeration
While Enum.HasMoreElements
TextEl=Enum.NextElement
' Est-ce que le composant est un paragraphe?
If TextEl.SupportsService("com.sun.star.text.Paragraph") Then
Décompte=Décompte+1
End If
Wend
'Affiche le résultat
MsgBox Décompte, 0, "Décompte des paragraphes"
End Sub
L'exemple suivant montre qu'il est possible d'utiliser des caractère unicode, pour les noms de variables. Toutefois la coloration syntaxique présente alors des défauts.
Sub démonstration dim résultat as string résultat = "essai" msgbox résultat End Sub
[modifier] Liens externes
[modifier] BASIC Macros
- (en) StarOffice 7 Basic programmer's guide
- (en) StarOffice 8 Programming Guide for BASIC
- (en) OpenOffice.org VBA emulation model project (still in heavy development)
- (en) Andrew Pitonyak's macro information
[modifier] StarOffice/OpenOffice.org API
 |
Portail de l'informatique – Accédez aux articles de Wikipédia concernant l’informatique. |
