Filter AdvStringGrid on CheckBox

VCL TMS VCL UI Pack
,
1

Hello,

I cannot achieve the following simple filter on AdvStringGrid :

  gridContacts.FilterActive := False;
  try
    if btEntreprises.Down then
      with gridContacts.Filter.ColumnFilter[1] do
      begin
        Column    := 1;
        Condition := gridContacts.CheckTrue;
        Operation := foAND;
      end
    else if gridContacts.Filter.HasFilter(1) then
      gridContacts.Filter.RemoveColumnFilter(1);
  finally
    gridContacts.FilterActive := True;
  end;

The data in column 1 is created using gridContacts.AddCheckBox(1, Row, Value)

2

Filtering is based on cell values. If you want that the cell value (used for the filter) reflects the state of the checkbox, please use a datacheck cell type, i.e. add it with:

grid.AddCheckBox(col,row, state, **true**);