プロパティ シート は、オブジェクト の プロパティ を表示する為に使用します。

祖先 - コントロール (PRIM_CTRL) ブジェクト (PRIM_OBJT)

詳細

プロパティシートはオブジェクトプロパティの表示と編集に使用されています。
 
Visual LANSA IDE の詳細ビューでは、プロパティシートを使用してコンポーネント定義の編集をサポートしています。
 
プロパティシートには通常、プロパティの説明用の列と値用の列の2つの列があり、単純な値または PickList を使用して定義された値のリストのいずれかになります。
 
プロパティシート内のすべての項目が同じタイプのデータである可能性は低いので、編集として使用する DataClass を指定する必要があります。
 
dataclass インスタンスを介して入力された値は、 Source フィールドの列にマップされます。

例

以下の例は、文字列、数値、ブール値のデータを使用する単純なプロパティシートを示しています。
 
アイテムがフォーカスを取得すると、その値はフォームのキャプションに入れられます。

Function Options(*DIRECT)
Begin_Com Role(*EXTENDS #PRIM_FORM) Clientwidth(660) Clientheight(435) Componentversion(2) Top(215) Left(237)
   Define_Com Class(#PRIM_PROP) Name(#PropertySheet1) Busyupdatesofparent(True) Columnbuttons(False) Componentversion(1) Displayposition(1) Dragstyle(Aggregated) Left(16) Parent(#COM_OWNER) Tabposition(1) Top(8) Height(393) Width(408) Rowheight(22)
   Define_Com Class(#PRIM_PRCL) Name(#PRCL1) Displayposition(1) Parent(#PropertySheet1) Source(#xDemoCaption) Width(34)
   Define_Com Class(#PRIM_PRCL) Name(#PRCL2) Displayposition(2) Parent(#PropertySheet1) Source(#xDemoValue)
 
   Define_Com Class(#xDemoValue) Name(#String)
   Define_Com Class(#xDemoNumber) Name(#Number)
   Define_Com Class(#xDemoBoolean) Name(#TrueFalse)
 
   Evtroutine Handling(#Com_owner.CreateInstance)
 
      #Com_owner.AddEntry( "Property 1" "String 1" #String )
      #Com_owner.AddEntry( "Property 2" "" #String )
      #Com_owner.AddEntry( "Property 3" "True" #TrueFalse )
      #Com_owner.AddEntry( "Property 4" "3" #Number )
      #Com_owner.AddEntry( "Property 5" "False" #TrueFalse )
      #Com_owner.AddEntry( "Property 6" "6" #Number )
 
 Endroutine
 
   Mthroutine Name(AddEntry)
      Define_Map For(*input) Class(#xDemoCaption) Name(#Caption)
      Define_Map For(*input) Class(#xDemoValue) Name(#Value)
      Define_Map For(*input) Class(#Prim_DC) Name(#DataClass) Pass(*by_reference)
 
      #xDemoCaption := #Caption
      #xDemoValue := #Value
 
      Add_Entry To_List(#PropertySheet1)
 
      #PropertySheet1.CurrentItem.DataClass <= #DataClass
 
 Endroutine
 
 End_Com

ﾌﾟﾛﾊﾟﾃｨ

イベント

ﾒｿｯﾄﾞ

参照

すべてのコンポーネント クラス

テクニカルリファレンス

2018 - V14SP1