Открытие диалога в Basic

Содержимое

# Открытие диалогового окна в Basic

В окне BASIC LibreOffice для создаваемого диалогового окна выйдите из редактора диалоговых окон, щёлкнув вкладку имени модуля, для которого предназначено диалоговое окно. Вкладка имени находится в нижней части окна.

Введите следующий код для подпрограммы Dialog1Show. В этом примере создаваемое диалоговое окно имеет имя "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

Без использования "LoadDialog" можно вызвать код следующим образом:

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

При выполнении данного кода открывается диалоговое окно "Dialog1". Чтобы закрыть окно, нажмите кнопку закрытия (x) в строке заголовка окна.

См. также

Изменение свойств элементов управления в редакторе диалоговых окон

Создание диалогового окна с помощью Basic

Создание элементов управления в редакторе диалоговых окон

Открытие диалогового окна в Python

Примеры программирования для управляющих элементов в редакторе диалогов

Пожалуйста, поддержите нас!