Öffnen eines Dialogs mit Basic

Nachdem Sie einen Dialog erzeugt haben, möchten Sie diesen Dialog nun in Ihren Programmcode einbinden. Sie befinden sich noch im Dialog-Editor und müssen zunächst wieder in die Collabora Office Basic-IDE gelangen.

Erzeugen Sie eine Unterroutine mit dem Namen Dialog1Show. In diesem Beispiel ist der Name des Dialoges, den Sie erstellt haben, "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" können Sie den Code wie folgt aufrufen:


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

Wenn Sie diesen Code ausführen, erscheint "Dialog1". Um den Dialog zu schließen, klicken Sie auf die Schaltfläche Schließen (x) auf der Titelleiste.

Bitte unterstützen Sie uns!