用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;
求的是每行的和，现在想隔行求和，求代码怎么写？