Page History
[ 
|../../index.htm#lansa/vldtoolt_0232.htm]
現在地:
...
1. エディターでコンポーネント
...
Editor
...
を開きます。
...
2.
...
[リポジトリ
...
]
...
タブで、ファイル
...
xEmployee
...
を探し、その定義を展開します。フィールド
...
xEmployeeTitle
...
をパネル上にドラッグし、フィールド
...
Monthly
...
Salary
...
のすぐ下にドロップします。
...
3. フィールド
...
xEmployeeTitle
...
を選択した状態で、
...
[レイアウト
...
]
...
リボンを選択して、
...
[レイアウト項目
...
]
...
を
...
"上"、
...
[サイズ
...
]
...
を
...
"コンテンツ幅"
...
に設定し、
...
[アイテムの余白
...
]
...
はすべてに
...
"5"
...
を設定します。ここまでのデザインは以下のようになります。
4.
...
[詳細
...
]
...
の
...
[イベント
...
]
...
タブを使って、フィールド
...
xEmployeeTitle
...
の
...
Changed
...
イベントルーチンを作成します。
...
5. イベント
...
xEmployeeTitle.Changed
...
にコードを追加し、Document
...
p_TITLE
...
プロパティに
...
xEmployeeTitle
...
の値を設定します。コードは以下のようになります。
...
Evtroutine
...
Handling(#xEmployeeTitle.Changed)
...
Options(*NOCLEARMESSAGES
...
*NOCLEARERRORS)
...
#Document.p_TITLE
...
:=
...
#xEmployeeTitle
...
#EditorModified
...
:=
...
True
...
Signal
...
Event(Changed)
...
Endroutine
...
6.
...
ルーチンInitialize にコードを追加して、社員タイトルを表示します。コードは以下のようになります。
#xEmployeeTitle :=
...
#Document.p_TITLE
...
7. コンポーネント
...
Editor
...
(演習用コピー)
...
をコンパイルします。
...