diff --git a/components/rx/Demos/RxDateEdit/project1.lpi b/components/rx/Demos/RxDateEdit/project1.lpi index 3c6a7a24e..98d8a5b1c 100644 --- a/components/rx/Demos/RxDateEdit/project1.lpi +++ b/components/rx/Demos/RxDateEdit/project1.lpi @@ -42,7 +42,7 @@ - + @@ -59,11 +59,10 @@ - - + @@ -79,7 +78,7 @@ - + @@ -194,13 +193,34 @@ - + + + + + + + + + + + + + + + + + + + + + + diff --git a/components/rx/rxdbgrid.pas b/components/rx/rxdbgrid.pas index 6f5e571db..ddc797b60 100644 --- a/components/rx/rxdbgrid.pas +++ b/components/rx/rxdbgrid.pas @@ -3838,8 +3838,7 @@ var SaveBeforeScroll:TDataSetNotifyEvent; RCol:TRxColumn; begin - if (not (FFooterOptions.Active and DatalinkActive)) or (Columns.Count = 0) or - (DataSource.DataSet.RecordCount<=0) or (gsAddingAutoColumns in GridStatus) then + if (not (FFooterOptions.Active and DatalinkActive)) or (Columns.Count = 0) or (gsAddingAutoColumns in GridStatus) then Exit; //Дополнительно проверим - а стоит ли делать пробег по данным - есть ли агрегатные функции APresent := False; @@ -3854,6 +3853,7 @@ begin if not APresent then exit; + Inc(FInProcessCalc); (* @@ -3899,6 +3899,12 @@ begin for i := 0 to Columns.Count - 1 do TRxColumn(Columns[i]).Footer.ResetTestValue; + if (DataSource.DataSet.RecordCount<=0) then + begin + Dec(FInProcessCalc); + exit; + end; + DHL:=THackDataLink(Datalink); DHS:=THackDataSet(DataSource.DataSet); SaveState:=DHS.SetTempState(dsBrowse); diff --git a/components/rx/rxnew.lpk b/components/rx/rxnew.lpk index e3d1de25e..081388420 100644 --- a/components/rx/rxnew.lpk +++ b/components/rx/rxnew.lpk @@ -1,4 +1,4 @@ - + @@ -26,7 +26,7 @@ Copyright (c) 1998 Master-Bank translate to Lazarus by alexs in 2005 - 2012 "/> - +