anchor.diff:    LExpressionRecord: TExpressionRecord;
     LSearchCapability: TSearchCapability;
     //LFormat: TFormatSettings;
  +  LNewStrFilter: utf8string;
     LAccepted: TVisualGridFilters;
     LCandidates: TVisualGridFilters = [];
     LFilter: TVisualGridFilter;
  
positive.code:     FDataTable: TDataTable;
      FCachedDataTable: PDataTable;
      FDataSource: IDataSource;
      FFilter: TFilterCriteria;
      FSearchCapabilities: TSearchCapabilities;
      FPageSize: Integer;
  
negative.code:     if ACol < Length(FDataTable.Columns) then
        LText := FDataTable.Columns[ACol]
      else
        raise EVisualGridError.CreateFmt('Improper column index. Max expected is %d but %d found.', [Length(FDataTable.Columns)-1,ACol]);
      FDrawGrid.Canvas.TextRect(Rect, Rect.Left+2, Rect.Top+2, LText)
    end
    else
  