IBM Lotus Symphony
|
Na janela Lotus® Symphony™ BASIC para um diálogo criado, saia do editor de diálogo clicando na guia de nome do Módulo ao qual o diálogo está designado. A guia nome está na parte inferior da janela.
Insira o seguinte código para uma sub-rotina denominada Dialog1Show. Neste exemplo, o nome do diálogo criado é "Dialog1":
Sub Dialog1Show
BasicLibraries.LoadLibrary("Tools")
oDialog1 = LoadDialog("Standard", "Dialog1")
oDialog1.Execute()
End Sub
Sem usar "LoadDialog", é possível chamar o código da seguinte forma:
Sub Dialog1Show
DialogLibraries.LoadLibrary( "Standard" )
oDialog1 = CreateUnoDialog( DialogLibraries.Standard.Dialog1 )
oDialog1.Execute()
End Sub
Quando você executa esse código, "Dialog1" é aberto. Para fechar o diálogo, clique no botão fechar (x) em sua barra de título.