List Number Column - ColumnReadOnly Property

Specifies whether the column is input capable

Member of List Number Column (PRIM_LIST.Number)

Data Type - Boolean

Details

The ColumnReadonly property specifies whether the cells in a List will be input capable. This applies to the whole column.
 
Individual items can be changed by accessing the ReadOnly property for item.

Example

In this example, you can use the column headers to change ColumnReadonly, or the button for each row change the cell readonly state.
Begin_Com Role(*EXTENDS #PRIM_WEB) Height(752) Width(1032) Theme(#SYS_THEME<2015Blue>)
 
   Define_Com Class(#PRIM_LIST) Name(#List) DisplayPosition(1) Left(24) Parent(#COM_OWNER) TabPosition(1) Top(48) Height(477) Width(729) RowHeight(29)
   Define_Com Class(#PRIM_LIST.Number) Name(#ColumnNumber) ColumnWidth(174) DisplayPosition(1) Increment(1) Parent(#List) Source(#xDemoNumber) Wrap(False) ColumnReadOnly(False)
   Define_Com Class(#PRIM_LIST.String) Name(#ColumnString) ColumnWidth(432) DisplayPosition(2) Parent(#List) Source(#xDemoCaption) ColumnReadOnly(False)
   Define_Com Class(#PRIM_LIST.Button) Name(#ColumnButton1) ColumnWidth(110) DisplayPosition(3) Parent(#List) CellMarginBottom(2) CellMarginLeft(2) CellMarginRight(2) CellMarginTop(2) ColumnCaption('Item Readonly')
   Define_Com Class(#PRIM_LABL) Name(#Label1) Caption('Click the column heading to toggle the ColumnReadOnly property') DisplayPosition(2) Ellipses(Word) Height(35) Left(24) Parent(#COM_OWNER) TabPosition(2) TabStop(False) Top(6) VerticalAlignment(Center) Width(729) ThemeDrawStyle('Heading1+MediumTitle') MarginLeft(4)
 
   Evtroutine Handling(#Com_owner.CreateInstance)
 
      Inz_List Named(#List) Num_Entrys(10)
 
   Endroutine
 
   Evtroutine Handling(#ColumnNumber.ColumnClick)
      #ColumnNumber.ColumnReadOnly := *Not #ColumnNumber.ColumnReadOnly
   Endroutine
 
   Evtroutine Handling(#ColumnString.ColumnClick)
      #ColumnString.ColumnReadOnly := *Not #ColumnString.ColumnReadOnly
   Endroutine
 
   Evtroutine Handling(#ColumnButton1.Click)
 
      #ColumnNumber.FocusItem.ReadOnly := *Not #ColumnNumber.FocusItem.ReadOnly
      #ColumnString.FocusItem.ReadOnly := *Not #ColumnString.FocusItem.ReadOnly
 
   Endroutine
 
End_Com

See also

All Component Classes

Technical Reference

Febuary 18 V14SP2