anchor.diff:      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),ACol]);
  +      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
  
positive.code:   LExpressionRecord: TExpressionRecord;
    LSearchCapability: TSearchCapability;
    //LFormat: TFormatSettings;
    LAccepted: TVisualGridFilters;
    LCandidates: TVisualGridFilters = [];
    LFilter: TVisualGridFilter;
  
negative.code:     FDataTable: TDataTable;
      FCachedDataTable: PDataTable;
      FDataSource: IDataSource;
      FStrFilter: UTF8String;
      FFilter: TFilterCriteria;
      FSearchCapabilities: TSearchCapabilities;
      FPageSize: Integer;
  