CheckBox and ReadOnly not allowed.

FMX TMS FMX UI Pack
1

I have in the initialization of the grid, the next block of code.


   FView.GridLines.Options.Editing.Enabled      := False; 
   ,,,
   FView.GridLines.CheckTrue  := 'Y';
   FView.GridLines.CheckFalse := 'N';
   FView.GridLines.Columns[SPECIAL].ColumnType := TTMSFMXGridColumnType.ctCheckBox;
   FView.GridLines.Columns[OK     ].ColumnType := TTMSFMXGridColumnType.ctCheckBox;

But I want that the CheckBox, only show the value, do not allow the user to change it. 
The user, in this situation can change the CheckBox value,  clicking on it. 
 I added on row insertion the next code:
       FView.GridLines.ReadOnlys[CD_ITEM     , ARow] := True;   
       ....
       FView.GridLines.ReadOnlys[OK          , ARow] := True;
       FView.GridLines.ReadOnlys[SPECIAL     , ARow] := True;
       FView.GridLines.ReadOnlys[SPECIAL_IN  , ARow] := True;

But the check box allow change the value.

How to avoid user interaction with some columns or cells? 
How to disallow the user to interact with controls in the cells?


2

Sorry we are not able to reproduce this here, can you provide a simple sample in which this is reproducible? You can manually disable the checkbox via the OnGetCellProperties:


procedure TForm1.TMSFMXGrid1GetCellProperties(Sender: TObject; ACol,
  ARow: Integer; Cell: TFmxObject);
var
  c: TControl;
begin
  if Cell is TTMSFMXGridCell then
  begin
    c := (Cell as TTMSFMXGridCell).GetControl;
    if Assigned(c) then
      c.Enabled := False;
  end;
end;