一个关于Table的简单问题

Question

  with Query1 do begin
      Close;SQL.Clear();
      SQL.Add('SELECT xxx FROM xxx WHERE (xxx=xxx)');
      try
        Open();
      except      end;
      if not IsEmpty then begin
         First;
         Label1.Caption := FieldByName('xxx').AsString; //这是第一条记录的内容
         Next;
      end;
  end;或者可以使用TTable.Locate;
with Table1 do
  Locate('xxx1,xxx2', VarArrayOf(['abc', 'def']), [loPartialKey]);
然后直接读Table1的当前记录就是查找到的第一条记录

Answer 1

呵呵，
table1.first 
table1.next 
table1.last 

Answer 2

我的做法和Crob一样。query1.close;
query1.sql.clear;
query1.sql.add('select * from dept');
query1.openif query1.recordcount >0 then
  query1.first;  //就是这里.......试一下吧，以下的代码你自己想怎么做就怎么做吧

Answer 3

我一直用的疑是SQL，但我很想知道Delphi下AdoTable的FindFirst的用法！它是不是与VB下的FindFirst有一样的功能？

Answer 4

主要有这个功能，在AdoTable的DataSet指定了过滤条件的情况下，跳转倒第一个纪录。