リスト - ShowPages プロパティ

リストをページに表示するかどうかを指定します

リスト (PRIM_MD.List) のメンバ

データ タイプ - ブール値

詳細

Showpages プロパティは、リスト (PRIM_MD.List)のエントリーを複数ページに渡って表示することができるようにします。
 
ShowPages が選択されると、リストの下部に配置された矢印を使ってページをナビゲートできるようになります。
 
1 ページの行数は RowsPerPage プロパティにより決定されます。
 
ページ数は、CurrentPage プロパティでアクセスできます。

次の例では、ItemsPerRow に 4、RowsPerPage に 6 が設定されたリスト (PRIM_MD.List)が示されています。
 
This will display the show 24 items on a page (4x6).
 
Begin_Com Role(*EXTENDS #PRIM_WEB) Theme(#SYS_THEME) Layoutmanager(#LayoutPage)
 
    Define_Com Class(#PRIM_TBLO) Name(#LayoutPage)
    Define_Com Class(#PRIM_TBLO.Column) Name(#LayoutPageColumn) Displayposition(1) Parent(#LayoutPage)
    Define_Com Class(#PRIM_TBLO.Row) Name(#LayoutPageRow) Displayposition(1) Parent(#LayoutPage)
    Define_Com Class(#PRIM_TBLO.Item) Name(#LayoutPageItem) Alignment(TopCenter) Column(#LayoutPageColumn) Manage(#List) Marginleft(16) Marginright(16) Parent(#LayoutPage) Row(#LayoutPageRow) Sizing(ContentHeightFitToWidth) Margintop(8)
 
    Define_Com Class(#PRIM_TBLO) Name(#LayoutList)
    Define_Com Class(#PRIM_TBLO.Column) Name(#LayoutListColumn) Parent(#LayoutList) Displayposition(1)
    Define_Com Class(#PRIM_TBLO.Row) Name(#LayoutListRow) Parent(#LayoutList) Displayposition(1)
    Define_Com Class(#PRIM_TBLO.Item) Name(#LayoutListItem) Alignment(CenterLeft) Column(#LayoutListColumn) Manage(#ListPrimaryText) Parent(#LayoutList) Row(#LayoutListRow) Sizing(None) Marginleft(11)
 
    Define_Com Class(#PRIM_MD.List) Name(#List) Displayposition(1) Layoutmanager(#LayoutList) Left(16) Parent(#COM_OWNER) Rowheight(48) Tabposition(1) Themedrawstyle('Card') Top(8) Width(1168) Height(226) Rowsperpage(6) Showpages(True) Itemsperrow(4)
    Define_Com Class(#PRIM_MD.ListLabel) Name(#ListPrimaryText) Caption('Single line item') Displayposition(2) Height(23) Parent(#List) Tabposition(1) Themedrawstyle('Heading3') Top(13) Width(1166) Left(11)
 
        Evtroutine Handling(#COM_OWNER.Initialize)
 
            Begin_Loop Using(#xDemoNumber) To(100)
 
                #ListPrimaryText := 'Entry:' + #xDemoNumber.AsString
 
                Add_Entry To_List(#List)
 
            End_Loop
 
        Endroutine
 
End_Com

参照

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

テクニカルリファレンス

EPC142030 February 2019