Obsah

# Otevření dialogového okna pomocí Basicu

V okně LibreOffice BASIC s vytvořeným dialogovým oknem opusťte Editor dialogových oken klepnutím na kartu s názvem modulu, ke kterému je dialogové okno přiřazeno. Karta s názvem modulu je na spodní straně okna.

Vytvořte rutinu Dialog1Show s následujícím kódem. V tomto příkladu bude název vytvořeného dialogového okna "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

Bez použití funkce "LoadDialog" je možné kód vyvolat takto:

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

Pokud spustíte tento kód, zobrazí se dialogové okno "Dialog1". Zavřete jej pomocí tlačítka Zavřít (x) v jeho záhlaví.

Související témata

Změna vlastností ovládacích prvků v Editoru dialogových oken

Vytvoření dialogového okna v aplikaci Basic

Vytvoření ovládacích prvků v Editoru dialogových oken

Otevření dialogového okna pomocí Pythonu

Příklady programů pro ovládací prvky v Editoru dialogových oken

Podpořte nás!