IBM Lotus Symphony
|
ダイアログを作成した Lotus® Symphony™ BASIC ウィンドウで、ダイアログを割り当てるモジュール名のタブをクリックして、エディタ画面を切り替えます。モジュール名のタブは、画面の下側に表示されています。
下記の 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) をクリックします。