Opening a Dialog With Basic/text/sbasic/guide/show_dialog.xhpmodule/dialog toggledialogs;using Basic to show (example)examples; showing a dialog with BasicTools;LoadDialogOpening a Dialog With Basic
In the %PRODUCTNAME BASIC window for a dialog that you created, leave the dialog editor by clicking the name tab of the Module that the dialog is assigned to. The name tab is at the bottom of the window.Enter the following code for a subroutine called Dialog1Show. In this example, the name of the dialog that you created is "Dialog1":Sub Dialog1Show With GlobalScope.BasicLibraries If Not .IsLibraryLoaded("Tools") Then .LoadLibrary("Tools") End With oDialog1 = Tools.ModuleControls.LoadDialog("Standard", "Dialog1") oDialog1.Execute()End SubWithout using "LoadDialog" you can call the code as follows:Sub Dialog1Show DialogLibraries.LoadLibrary("Standard") oDialog1 = CreateUnoDialog( DialogLibraries.Standard.Dialog1 ) oDialog1.Execute()End SubWhen you execute this code, "Dialog1" opens. To close the dialog, click the close button (x) on its title bar.