RxDBGrid - fix error on calc footer sum for ZeosDBO
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2708 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
parent
56183071a6
commit
e5b34bf98b
@ -38,7 +38,8 @@ begin
|
||||
RS:=THackZeosDS(ADataSet).ResultSet;
|
||||
CurRow:=RS.GetRow;
|
||||
RS.First;
|
||||
while not RS.IsLast do
|
||||
// while not RS.IsLast do
|
||||
while not RS.IsAfterLast do
|
||||
begin
|
||||
for i:=0 to AGrid.Columns.Count-1 do
|
||||
begin
|
||||
|
Loading…
Reference in New Issue
Block a user