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 (演習用コピー) をコンパイルします。