关于grid多选的有关问题
关于grid多选的问题
delphi7
想实现 双击dbgrid1中的行 得到选中行的金额合计
现在实现了双击的时候金额进行累加，双击取消的时候金额也相减，可是右键全选的时候 金额就变成dbgrid中的最后一样的金额。点取消全选也是这样.
------解决方案--------------------
每次计算就遍历DBGrid1.selectedrows相加即可
delphi7
想实现 双击dbgrid1中的行 得到选中行的金额合计
现在实现了双击的时候金额进行累加，双击取消的时候金额也相减，可是右键全选的时候 金额就变成dbgrid中的最后一样的金额。点取消全选也是这样.
if DBGrid1.selectedrows.CurrentRowSelected=true then
begin
begin
tmpje:=tmpje+ DBGrid1.DataSource.DataSet.FindField(je).AsFloat;
end;
end
else
begin
if DBGrid1.DataSource.DataSet.FindField(tmpfld)<>nil then
begin
tmpje:=tmpje- DBGrid1.DataSource.DataSet.FindField(je).AsFloat;
end;
end;
------解决方案--------------------
每次计算就遍历DBGrid1.selectedrows相加即可