Merge branch 'master' of http://192.168.1.12:3000/MaiXinRong/Measure

Frames/BillsGatherFme.pas

@@ -180,7 +180,7 @@ procedure TBillsGatherFrame.zgGclBillsCellGetColor(Sender: TObject;
 var
   bSimilarBills: Boolean;
 begin
-  if (ACoord.Y >= zgGclBills.FixedRowCount) then
+  if (ACoord.Y >= zgGclBills.FixedRowCount) and (ACoord.Y < zgGclBills.FixedRowCount + saGclBills.DataView.RecordCount) then
   begin
     if ACoord.Y = zgGclBills.FixedRowCount then
       bSimilarBills := CheckSimilarBills(ACoord.Y, ACoord.Y + 1)