Visible

List Current Item - Visible Property

Show or hide the list item

Member of List Current Item (PRIM_LIST.CurrentItem)

Data Type - Boolean

Details

The Visible property controls whether a cell in a column is visible.
 
To hide items by default when added to the list, the Visible property of the column can be set to false.

Example

When a value is entered, the items in the list are hidden if the value number entered isn't in the item value.

Begin_Com Role(*EXTENDS #PRIM_WEB) LayoutManager(#TableLayout) Height(448) Width(680)
 
   Define_Com Class(#PRIM_TBLO) Name(#TableLayout)
   Define_Com Class(#PRIM_TBLO.Column) Name(#Column) DisplayPosition(1) Parent(#TableLayout)
   Define_Com Class(#PRIM_TBLO.Row) Name(#Row1) DisplayPosition(1) Parent(#TableLayout) Height(48) Units(Pixels)
   Define_Com Class(#PRIM_TBLO.Row) Name(#TableLayoutRow1) DisplayPosition(2) Parent(#TableLayout) Height(1.79)
   Define_Com Class(#PRIM_TBLO.Item) Name(#TableLayoutItem1) Column(#Column) Manage(#List) Parent(#TableLayout) Row(#TableLayoutRow1)
 
   Define_Com Class(#PRIM_LIST) Name(#List) DisplayPosition(1) Height(400) Left(0) Parent(#COM_OWNER) TabPosition(1) Top(48) Width(680) RowHeight(37) RowResize(True) SelectionStyle(All) RowLines(False) ColumnLines(False)
   Define_Com Class(#PRIM_LIST.Number) Name(#NumberColumn) ColumnWidth(148) DisplayPosition(1) Parent(#List) Source(#xDemoNumber)
   Define_Com Class(#XDXNumber.Visual) Name(#Find) ComponentVersion(1) DisplayPosition(2) Parent(#COM_OWNER) TabPosition(2) Top(12) Width(253) Left(6) Caption('Show Items Containing') LabelType(Caption)
 
   Evtroutine Handling(#Com_owner.CreateInstance)
 
      Begin_Loop Using(#xDemoNumber) To(100)
         Add_Entry To_List(#List)
      End_Loop
 
   Endroutine
 
   Evtroutine Handling(#Find.Changed)
 
      Selectlist Named(#List)
 
         #List.CurrentItem.Visible := (#NumberColumn.CurrentItem.Value.AsString.Contains( #Find.AsString ) Or (#Find = 0))
 
      Endselect
 
   Endroutine
 
End_Com

Details

Example

See also