[ 
|../../index.htm#lansa/l4wdev03_0345.htm]
現在地:
コンボ・ボックス
フィールド名
SEX (Alpha 1)
説明
フィールドをグリッド内にコンボ・ボックスとして表示します。
1. フィールド・コンポーネントのソースに、ピックリスト・ビューの設定 (PRIM_EVPL) お よびピックリストの定義を追加します。この2つは別々のクラスであることに注意してください。「Male」および「Female」の2項目をピックリストに追加します。
2. フィールドをいったん保存してください。
3. グリッド・コンポーネントを作成し、フィールドタブで、列としてSEXフィールドを追加します。列のプロパティを、次のように設定してください。
- ReadOnly = FALSE
- DisplayAppearance = Edit
- EditAppearance = Edit
- UsePicklist = TRUE
3. グリッドを読み込むと、列がドロップダウン・コンボ・ボックスとして編集できるようになります。
フィールドのソース
Begin_Com Role(*EXTENDS #PRIM_OBJT)
Begin_Com Role(*Visual #PRIM_EVEF) Name(#VisualEdit) Defaultvisual(True) Height(19) Usepicklist(False) Width(178) End_Com Begin_Com Role(*picklist) Name(#LIST) Define_Com Class(#PRIM_PKIT) Name(#ITEM1) Caption('Male') Default(True) Parent(#LIST) Value('M') Define_Com Class(#PRIM_PKIT) Name(#ITEM2) Caption('Female') Parent(#LIST) Value('F') End_Com Begin_Com Role(*Visual #PRIM_EVPL) Name(#VisualPicklist) Appearance(DropDownList) Height(69) Width(209) End_Com End_Com
フォームのソース
Function Options(*DIRECT)
Begin_Com Role(*EXTENDS #PRIM_FORM) Clientheight(147) Clientwidth(492) Height(174) Left(369) Top(152) Define_Com Class(#PRIM_GRID) Name(#GRID) Captionnoblanklines(True) Componentversion(1) Displayposition(1) Height(128) Left(40) Parent(#COM_OWNER) Showbuttonselection(True) Showselection(True) Showselectionhilight(False) Showsortarrow(True) Tabposition(1) Top(8) Width(344) Define_Com Class(#PRIM_GDCL) Name(#GDCL) Displayappearance(Edit) Displayposition(1) Editappearance(Edit) Parent(#GRID) Readonly(False) Source(#SEX) Usepicklist(True) Width(30) Evtroutine Handling(#COM_OWNER.CreateInstance) Options(*NOCLEARMESSAGES *NOCLEARERRORS) Select Fields(#SECTION) From_File(PSLMST) Add_Entry To_List(#GRID) Endselect Endroutine End_Com
外観
[ |../../index.htm#lansa/l4wdev03_0345.htm]