Öffnen eines Dialogs mit Basic

Nachdem ein Dialog erzeugt ist, soll dieser Dialog nun in den Programmcode eingebunden werden. Aus dem Dialog-Editor muss zunächst wieder in die LibreOffice Basic-IDE gewechselt werden.

Eine Unterroutine mit dem Namen Dialog1Show erzeugen. In diesem Beispiel ist der Name des erstellten Dialogs "Dialog1":

Sub Dialog1Show
    With GlobalScope.BasicLibraries
       If Not .IsLibraryLoaded("Tools") Then .LoadLibrary("Tools")
    End With
    oDialog1 = Tools.ModuleControls.LoadDialog("Standard", "Dialog1")
    oDialog1.Execute()
End Sub

Ohne "LoadDialog" kann der Code wie folgt aufgerufen werden:

Sub Dialog1Show
    DialogLibraries.LoadLibrary("Standard")
    oDialog1 = CreateUnoDialog( DialogLibraries.Standard.Dialog1 )
    oDialog1.Execute()
End Sub

Wenn dieser Code ausgeführt wird, erscheint "Dialog1". Um den Dialog zu schließen, die Schaltfläche »Schließen (x)« in der Titelleiste anklicken.