Otevření dialogového okna s použitím kódu programu

V okně produktu aplikace IBM® Lotus® Symphony™ Basic pro vytvořené dialogové okno ukončete činnost editoru dialogových oken klepnutím na kartu s názvem modulu, ke kterému je dané dialogové okno přiřazeno. Karta s názvem je zobrazena v dolní části okna.

Zadejte následující kód subrutiny nazvané Dialog1Show. V této ukázce je pro vytvořené dialogové okno použit název "Dialog1":

Sub Dialog1Show

BasicLibraries.LoadLibrary("Tools")

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

oDialog1.Execute()

End Sub

Bez použití funkce "LoadDialog" lze daný kód vyvolat následovně:

Sub Dialog1Show

DialogLibraries.LoadLibrary( "Standard" )

oDialog1 = CreateUnoDialog( DialogLibraries.Standard.Dialog1 )

oDialog1.Execute()

End Sub

Po provedení tohoto kódu bude otevřeno okno "Dialog1". Dialogové okno lze zavřít klepnutím na tlačítko ukončení (x) na pruhu titulku.