【结贴】[请求]datagrid循环取数据

Crazy_wen2006

创建FormDocCreate事件，每次打开窗体，自动从打开的数据集中判断符合条件的值，并更改状态，代码如下：
var
i:integer;
begin
DataSetMain.DataSet.Open;
for i:=0 to  DataSetMain.Dataset.Recordcount-1 do
begin
if DataSetMain.Dataset.FieldByName('HTJSRQ').AsString<>''then
   begin
     if DateUtils.DateOf(SysSrv.SysService.Time)>DataSetMain.Dataset.FieldByName('HTJSRQ').AsDateTime then
     begin
       DataSetMain.DataSet.Open;
       DataSetMain.DataSet.Edit;
       DataSetMain.Dataset.FieldByName('HTZT').Asstring:='待续签';
       DataSetMain.DataSet.ApplyUpdates;
     end;
     end;
    end;
end;
但每次只第一行变化（焦点所在行），怎么能自动循环？

shangxy

DataSetMain.DataSet.ApplyUpdates;
后加：
DataSetMain.DataSet.next

Crazy_wen2006

循环后焦点怎么定位到第一行？

shangxy

DataSetMain.DataSet.First

Crazy_wen2006

万分谢谢。结贴