DBGrid1.SelectedRows.CurrentRowSelected:=True; //默认当前行为选中状态 for i:=0 to DBGridEh1.SelectedRows.Count -1 do begin ADOQuery1.GotoBook(Pointer(DBGridEh1.SelectedRows.Items[i]));//指向选中行 if ADOQuery1.FieldByName(折扣列).AsFloat=100 then begin ADOQuery1.Edit; ADOQuery1.FieldByName(折扣列).AsFloat:=80; ADOQuery1.Post; end; end;
for i:=0 to DBGridEh1.SelectedRows.Count -1 do
begin
ADOQuery1.GotoBook(Pointer(DBGridEh1.SelectedRows.Items[i]));//指向选中行
if ADOQuery1.FieldByName(折扣列).AsFloat=100 then
begin
ADOQuery1.Edit;
ADOQuery1.FieldByName(折扣列).AsFloat:=80;
ADOQuery1.Post;
end;
end;
多谢victor_yang兄