如何检测最后一条记录，delphi

Question

奇怪的问题，但这就是我所在的地方。 我在表单上有一个下一个/上一个按钮，它在数据集上是下一个/上一个。 我有代码在 BOF 时禁用上一个，在 EOF 时禁用下一个。 问题是那些标志没有到达 BOF/EOF，除非我 go PAST 第一条/最后一条记录，所以当我在第一条记录或最后一条记录时，我必须单击它们两次。 由于排序的东西（已经尝试过），使用 recno 将不起作用，那么，我如何检测第一条和最后一条记录？

Answer 1

对于Eof ：

  DataSet.DisableControls;
  try
    DataSet.Next;
    if not DataSet.Eof then
      DataSet.Prior;
  finally
    DataSet.EnableControls;
  end;

Bof类似。