dbgrid中数据逐行提取

Question

dbgrid中，如何逐行提取数据？  
for i:=1 to DBGrid1.DataSource.DataSet.RecordCount do
  begin
    Imgedit1.Image:=StringReplace(s,'codescan.mdb','',[rfReplaceAll])+'tif\'+
    DBGrid1.DataSource.DataSet.FieldByName('createdate').AsString+
    '\'+DBGrid1.DataSource.DataSet.FieldByName('docid').AsString+'.tif';
按上面的代码，编译的时候老是在第一条上，输出后发现Imgedit1.Image的值一直没有变过，该如何解决~！

Answer 1

在循环中要加入DBGrid1.DataSource.DataSet.next;要让数据集的记录指针移动

Answer 2

DBGrid1.DataSource.DataSet.first;
while(not DBGrid1.DataSource.DataSet.eof) do
 begin
 DOSTH;
 DBGrid1.DataSource.DataSet.next;
end;

Answer 3

建议用
while not EOF do
begin
  do something
  next;
end

Answer 4

问题解决了,因为tif这个变量,我定义的是全局变量,在这段代码前再重新声明下它的属性就好了,不然每次就取的是第一个值.