数据库记录无法移动，大家帮忙分析一下，是什么原因。(50分)

dm.temp1.Recordset.Movefirst;
dm.temp1.Recordset.MoveNext;
dm.temp1.Recordset.MoveNext;
dm.temp1.Recordset.MoveNext;
a:= dm.temp1.Fields[2].AsString;
for p:=0 to dm.temp1.RecordCount do
begin
//从第一条记录循环比较５０米成绩，如果L大于当前记录的值，则退出循环，
if (strtofloat(L) <= strtofloat(dm.temp1.Fields[2].AsString)) orS dm.temp1.Eof then
begin
a:= dm.temp1.Fields[1].AsString;
exit;
end;
dm.temp1.Recordset.MoveNext;
end;

是不是数据集加上排序了？
你为什么不使用sql实现啊？
sql:='select * from tablename where fieldname>L'

dm.temp1.Recordset.MoveNext;
dm.temp1.Recordset.MoveNext;
dm.temp1.Recordset.MoveNext;
是为了测试。。
我将数据集组件换成了　adotable还是不行，无法取当前记录的值。。。是什么原因，快急死了。

zywcd已经在QQ帮我处理好了。原来是dm.temp1.Recordset.MoveNext;这样的语句在这里不起作用，需要temp1.recordset.next;

十分感谢zywcd。。。祝你快乐。。大富翁正是因为有了你这样的好人，才吸引人。祝大富翁越办越好！！！！！