adodataset.Filter := 'a = 1'; adodataset.Filtered := true; //操作
因为我的数据集绑定在grid中,会有数据变化,所以我想对数据集进行操作var totalM,totalE:integer; begin for i:= 1 to dataset.RecordCount do begin if dataset.Fields[0].Value = 1 then totalM := totalM + dataset.Fields[1].AsInteger else if dataset.Fields[0].Value = 2 then totalE := totalE + dataset.Fields[1].AsInteger; end; end; 这样写有问题吗?
adodataset.Filtered := true;
//操作
begin
for i:= 1 to dataset.RecordCount do
begin
if dataset.Fields[0].Value = 1 then
totalM := totalM + dataset.Fields[1].AsInteger
else if dataset.Fields[0].Value = 2 then
totalE := totalE + dataset.Fields[1].AsInteger;
end;
end;
这样写有问题吗?