Открытие диалогового окна с помощью программного кода

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

Введите следующий код для подпрограммы Dialog1Show. В этом примере создаваемое диалоговое окно имеет имя "Dialog1":

Sub Dialog1Show

    BasicLibraries.LoadLibrary("Tools")

    oDialog1 = LoadDialog("Standard", "Dialog1")

    oDialog1.Execute()

End Sub

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

Sub Dialog1Show

    DialogLibraries.LoadLibrary("Standard")

    oDialog1 = CreateUnoDialog( DialogLibraries.Standard.Dialog1 )

    oDialog1.Execute()

End Sub

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