TMSFMXGrid Column DropdownFilter cant handle strings with spaces at the end

FMX TMS FMX UI Pack
1

If you have values in your Grid with spaces at the end, and you choose that value from the Filter dropdown, the grid will be displayed empty.

Steps to reproduce:

  • Drop a TMSFMXGrid on a form (name it AGrid1)
  • Call FillGrid in the FormCreate
  • Select a value from the column filter dropdown
procedure TForm1.FillGrid;
var
  row: Integer;
  col: Integer;
begin
  AGrid1.Clear;
  AGrid1.Options.Filtering.Dropdown := True;
  AGrid1.RowCount     := 30;
  AGrid1.ColumnCount  := 30;
  AGrid1.FixedRows    := 1;
  AGrid1.FixedColumns := 0;

  for row := 0 to AGrid1.RowCount - 1 do
  begin
    for col := 0 to AGrid1.ColumnCount - 1 do
    begin
      if col = 0 then
        AGrid1.Cells[col, row] := IntToStr(row) + ' '
      else if col = 1 then
        AGrid1.Cells[col, row] := IntToStr(row div 5) + ' '
      else
        AGrid1.Cells[col, row] := Format('Col:%d Row:%d ', [col, row]);
    end;
  end;
end;
2

Thank you for reporting, we have fixed this issue. Next version will have this fix included.

3

Thx, Pieter