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) をクリックします。


製品フィードバック | その他の資料 | 商標