入力可能な列かどうかを指定します。
PRIM_LIST.CheckBox クラス (PRIM_LIST.CheckBox) のメンバ
データ タイプ - ブール値
ColumnReadonly プロパティは、 リスト内のセルが入力可能かどうかを指定します。これはすべての列に適用されます。
次の例では、列見出しを使って ColumnReadonly を変更する、または、各行のボタンを使ってセルの readonly 状態を変更できます。
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
EPC142030 February 2019