現在のリストアイテム用のフラットボタンへのアクセスを提供します
祖先 - リストの現在のアイテム (PRIM_MD.ListCurrentItem) オブジェクト (PRIM_OBJT)
Prim_MD.ListFlatButton は、フラットボタンとしてビジュアライズされたコントロール リストです。 各コントロール タイプには対応する コントロール クラスがあり、これがコントロールインスタンスへのアクセスを提供します。 他の Visual LANSA リストでリストの現在のアイテムが使用できるのと同様に、コントロールの現在のアイテムを使用して、各アイテムのフラットボタンは個別に変更できます。 フラットボタン コントロールは、コントロール ビューからフラットボタンがドラッグ アンド ドロップされると必ず作成されます。
次の例では、単一のコントロールリストが、リストに各ボタンを追加後、更新してます。 フラットボタンが変更されると、コントロールの現在のアイコンがアクセスされ、どのボタンがクリックされたかがアイコンに表示されます
Begin_Com Role(*EXTENDS #PRIM_WEB) Height(456) Width(864) Layoutmanager(#Layout1) Define_Com Class(#PRIM_TBLO) Name(#Layout1) Define_Com Class(#PRIM_TBLO.Row) Name(#Layout1Row1) Displayposition(1) Parent(#Layout1) Define_Com Class(#PRIM_TBLO.Column) Name(#Layout1Column1) Displayposition(1) Parent(#Layout1) Define_Com Class(#PRIM_TBLO.Item) Name(#Layout1Item1) Column(#Layout1Column1) Manage(#List) Parent(#Layout1) Row(#Layout1Row1) Define_Com Class(#PRIM_TBLO) Name(#Layout2) Define_Com Class(#PRIM_TBLO.Row) Name(#Layout2Row1) Displayposition(1) Parent(#Layout2) Define_Com Class(#PRIM_TBLO.Column) Name(#Layout2Column1) Displayposition(1) Parent(#Layout2) Define_Com Class(#PRIM_TBLO.Item) Name(#Layout2Item1) Column(#Layout2Column1) Parent(#Layout2) Row(#Layout2Row1) Define_Com Class(#PRIM_MD.List) Name(#List) Displayposition(1) Left(0) Parent(#COM_OWNER) Tabposition(1) Top(0) Height(456) Width(864) Layoutmanager(#Layout2) Define_Com Class(#PRIM_MD.ListFlatButton) Name(#ListFlatButton) Parent(#List) Displayposition(1) Tabposition(1) Left(0) Top(0) Width(864) Source(#xDemoNumber) Evtroutine Handling(#Com_owner.CreateInstance) Begin_Loop Using(#xDemoNumber) To(10) Add_Entry To_List(#List) #ListFlatButton.CurrentItem.Caption := "Not Clicked" End_Loop Endroutine Evtroutine Handling(#ListFlatButton.Click) #ListFlatButton.CurrentItem.Caption := "Clicked" Endroutine End_Com
名前 | 記述 |
---|---|
CreateInstance | コンポーネントを作成する時に CreateInstance のイベントを実行します。 リストのフラットボタンの現在アイテム (PRIM_MD.ListFlatButtonCurrentItem) より継承 |
DestroyInstance | コンポーネントが解除される前に DestroyInstance のイベントを実行します。 リストのフラットボタンの現在アイテム (PRIM_MD.ListFlatButtonCurrentItem) より継承 |
EPC142030 February 2019