Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

[ Image Removed |../../index.htm#lansa/l4wdev03_0320.htm]
現在地:

...

フィールド名

SEX (Alpha 1)

説明

フィールドをフォーム上にラジオ・ボタンとして表示します。
フィールド・コンポーネントのソースに、ピックリスト・ビューの設定 (PRIM_EVPL) お よびピックリストの定義を追加します。この2つは別々のクラスであることに注意してください。「Male」および「Female」の2項目をピックリストに追加し、PRIM_EVPLのAppearanceプロパティをButtonSetに変更します。いったんフィールドを保存し、フォーム上でVisualPicklistクラスを使います。

フィールドのソース

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)

...

Height(69)

...

Width(209)

...

  
End_Com

...

  
End_

...

Com 

...

フォームのソース

...

Function Options(*DIRECT)

...

Begin_

...

Com Role(*

...

EXTENDS #PRIM_FORM)

...

Clientheight(130)

...

Clientwidth(492)

...

Height(157)

...

Left(304)

...

Top(155)

...

  
Define_

...

Com Class(#SEX.VisualPickList)

...

Name(#SEX)

...

Displayposition(1)

...

Height(25)

...

Left(56)

...

Marginleft(233)

...

Parent(#COM_OWNER)

...

Tabposition(1)

...

Top(32)

...

Width(370)

...

  
End_Com

...

外観

...

Image Added