用advstringgrid隔行求和,该如何解决
用advstringgrid隔行求和
advstringgrid中隔行求和
用while语句怎么写
我原先是
function fun_UpdateSums(advsg:TAdvStringGrid):Integer; //合计行
var
r: Integer;
begin
for r := 1 to advsg.RowCount - 1 do
advsg.Floats[advsg.ColCount-1,r] :=
advsg.RowSum(r,1,advsg.ColCount-1);
advsg.FloatingFooter.Invalidate;
end;
求的是每行的和,现在想隔行求和,求代码怎么写?
------解决方案--------------------
advstringgrid中隔行求和
用while语句怎么写
我原先是
function fun_UpdateSums(advsg:TAdvStringGrid):Integer; //合计行
var
r: Integer;
begin
for r := 1 to advsg.RowCount - 1 do
advsg.Floats[advsg.ColCount-1,r] :=
advsg.RowSum(r,1,advsg.ColCount-1);
advsg.FloatingFooter.Invalidate;
end;
求的是每行的和,现在想隔行求和,求代码怎么写?
隔行求和
------解决方案--------------------