DBGrid1如何对多选中的一个字段某几行求和

Question

比如我选中两行,则循环两次,但是只对鼠标当前点选的值求和两遍
比如
    姓名   总计
    张三   5.25
    李四   2.23事实上我已经通过设置DBGRID的OPTION的dbmultiselect为TRUE，按CTRL+选中上面两行记录，但只对鼠标点选的最后一条记录求和两遍，比如2.23+2.23=4。46下面是我写的，请给改一下，谢谢！var
i:integer;
begin
edit1.Text:='0';
for i:=1 to dbgrid1.SelectedRows.Count do
if dbgrid1.SelectedRows.CurrentRowSelected then
     begin
     edit1.Text:=dbgrid1.Fields[5].Value+strtofloat(edit1.Text);
     end;

Answer 1

你的循环不应是1开始吧，而是0至SelectedRows.Count-1

Answer 2

我不知道dbmultiselect所选黑的所有行记录的某一行怎么表示

Answer 3

For i:=0 To dbgrid1.SelectedRows.Count-1 do
begin
Adoquery1.GotoBook(pointer(dbgrid1.SelectedRows.Items[i]));
edit1.Text:=Adoquery1.FieldValues['XX']+strtofloat(edit1.Text);
End;
 
XX改成第5列的字段名

Answer 4

OK了,多谢!
Adoquery1.GotoBook(pointer(dbgrid1.SelectedRows.Items[i]));就是这句看不懂是什么意思,麻烦解释一下GotoBook(pointer的意思

Answer 5

DataSet.GotoBook(Book:Pointer);就是让DataSet的记录指针移动到Book这这条记录上
参数Book是个指针,所以要用pointer(..)转换一下