if (FIntMemTable <> nil) and DataLink.Active then
    begin
      if DataGrouping.IsGroupingWorks then  //SAMO
        NewRowCount := DataGrouping.GroupDataTree.FlatVisibleCount  //SAMO
      else
        NewRowCount := FIntMemTable.InstantReadRowCount
    end
    else NewRowCount := 0;
    if NewRowCount <= 0 then NewRowCount := 1;
    SetRowCount(NewRowCount + TopDataOffset);
    if FullFooterRowCount > 0 then
      UpdateFooterRowHeights;
  end;