批量修改如何做？急！在线等！！！！

[every123]

1。DBGRID如何选择多条记录，进行批量修改？
就是说：其中有20条记录，记录学生资料，要修改其中5条记录的成绩，改成90分，请问怎么做？
2。如上题：修改的5条记录中有2条记录不满足条件，如何将满足条件的3条记录进行处理。（不满足条件的记录不一定在第一条）。
最好有相关代码，谢谢

[WWWWA]

将DBGRID的DGROWSELECT、DGMULTISELECT设为TRUE；
fot I=dbgrid1.SelectedRows.Count-1 do
begin
dbgrid1.DataSource.DataSet.GotoBookmark(pointer(dbgrid1.SelectedRows.items[i]));
IF dbgrid1.DataSource.DataSet.FIELDBYNAME('FIELDNAME').ASSTRING=条件　THEN
DO　SOMETHING
end;

[WWWWA]

将DBGRID的DGROWSELECT、DGMULTISELECT设为TRUE；
fot I=O TO dbgrid1.SelectedRows.Count-1 do
begin
dbgrid1.DataSource.DataSet.GotoBookmark(pointer(dbgrid1.SelectedRows.items[i]));
IF dbgrid1.DataSource.DataSet.FIELDBYNAME('FIELDNAME').ASSTRING=条件　THEN
DO　SOMETHING
end;

[WWWWA]

将DBGRID的DGROWSELECT、DGMULTISELECT设为TRUE；
fot I=O TO dbgrid1.SelectedRows.Count-1 do
begin
dbgrid1.DataSource.DataSet.GotoBookmark(pointer(dbgrid1.SelectedRows.items[i]));
IF dbgrid1.DataSource.DataSet.FIELDBYNAME('FIELDNAME').ASSTRING=条件　THEN
DO　SOMETHING
end;

[Shiyl]

mark

[lmpeel]

根据条件生成一个sql语句 update table1 set xxxx=90 where .........

用 Tquery 执行一下不就行了吗?

[every123]

WWWWA(aaaa)
怎么在批量修改结束后把不满足条件的记录提示出来，谢谢！

[FrameSniper]

支持Impeel

[delphi_xizhousheng]

修改可以用书签(bookmark)来做
要是过滤的话就用filter咯
dbgrid1.DataSource.DataSet.Filter:='分数字段<>90';
dbgrid1.DataSource.DataSet.Filtered:=True;

[WWWWA]

不满足条件的记录提示出来:
设置不同的颜色

[PrgmLover]

不满足条件的记录提示出来: 在你每次处理判断的时候，记录不满足条件的记录，完成之后一起提示

[mxk19791116]

你运气正好，我这儿有个现成的。


if RadioButton1.Checked=true then ／／已选中的。
begin
setlength(idary,dbgrid1.SelectedRows.Count);
with rsWFYH do
for i:=0 to DBGrid1.SelectedRows.Count-1 do
begin
GotoBookmark(pointer(DBGrid1.SelectedRows.Items[i]));
idary[i]:=rsWFYH.Fieldbyname('cLiuSH').AsString;
end;
end
else
if RadioButton2.Checked=true then／／全部选中的
begin
setlength(idary,rswfyh.RecordCount );
rsWFYH.First;
with rsWFYH do
for i:=0 to rswfyh.RecordCount -1 do
begin
idary[i]:=rsWFYH.Fieldbyname('cLiuSH').AsString;
Next;
end;
end
else
if RadioButton3.Checked=true then／／未选中的
begin
setlength(idaryTemp,dbgrid1.SelectedRows.Count);
with rsWFYH do
for i:=0 to DBGrid1.SelectedRows.Count-1 do
begin
GotoBookmark(pointer(DBGrid1.SelectedRows.Items[i]));
idaryTemp[i]:=rsWFYH.Fieldbyname('cLiuSH').AsString;
end;
setlength(idary,rswfyh.RecordCount-dbgrid1.SelectedRows.Count );
rsWFYH.first;
k:=0;
with rsWFYH do begin

for i:=0 to rswfyh.RecordCount -1 do
begin
a:=1;
for j:=low(idaryTemp) to high(idaryTemp) do
begin
if rsWFYH.Fieldbyname('cLiuSH').AsString=idaryTemp[j] then
a:=0;
end;
if a=1 then begin
idary[k]:=rsWFYH.Fieldbyname('cLiuSH').AsString;
k:=k+1;
end;
Next;
end;
end;
end
else
begin／／已选中的
setlength(idary,dbgrid1.SelectedRows.Count);
with rsWFYH do
for i:=0 to DBGrid1.SelectedRows.Count-1 do
begin
GotoBookmark(pointer(DBGrid1.SelectedRows.Items[i]));
idary[i]:=rsWFYH.Fieldbyname('cLiuSH').AsString;
end;
end;