VILS-WIN では、プログラム中で特定のウィンドウを見つけるためには、次のように記述します。
* 一時クラス #VF_SY154 参照を定義
* プロパティおよびクラス #VF_SY154 が使用できるメソッドを確認するには
* VL の F2=機能ヘルプを使用
Define_Com Class(#VF_SY154) Name(#Window) Reference(*Dynamic)
* フレームワーク・マネージャーに名前によるウィンドウ検索を依頼し、参照が返される
#Window <= #AvFrameworkManager.avWindow<'USER_EMPLOYEES'>
* ウィンドウが見つからない場合の処理も必要なことに注意
If (#Window *isNot *Null)
Use Message_box_Add ('The window named' #Window.WindowName 'is at position' #Window.Top #Window.Left)
Else
Use Message_box_Add ('No Window named USER_EMPLOYEES is currently open')
Endif
Use Message_Box_show
* 確実にするためウィンドウ参照を NULL にして開放
* コード内では絶対に VF_SY154 参照に頼らない
#Window <= *Null
これを実行すると次のようなメッセージ・ボックスが表示されます。
重要： #VF_SY154オブジェクト参照は、プログラム上で確実に解放してください。
