[
|../../index.htm#lansa/vldtoolt_0232.htm]
現在地:
1. エディターでコンポーネント Editor を開きます。 2. \[リポジトリ\] タブで、ファイル xEmployee を探し、その定義を展開します。フィールド xEmployeeTitle をパネル上にドラッグし、フィールド Monthly Salary のすぐ下にドロップします。 3. フィールド xEmployeeTitle を選択した状態で、\[レイアウト\] リボンを選択して、\[レイアウト項目\] を "上"、\[サイズ\] を "コンテンツ幅" に設定し、\[アイテムの余白\] はすべてに "5" を設定します。ここまでのデザインは以下のようになります。 !worddavaf485e25f57cd86bb5b0fc63f3f1b1cc.png|height=32,width=32! 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 (演習用コピー) をコンパイルします。 [ !worddavaf485e25f57cd86bb5b0fc63f3f1b1cc.png|height=32,width=32! |../../index.htm#lansa/vldtoolt_0232.htm] |