query1.open;
I:=query1.recordcount;

解决方案 »

  1.   

    不过好像有的时候用recordcount得到的答案是-1,不知楼上两位碰过没有,主义这时的记录是仅仅有1000--2000条,
      

  2.   

    有的数据库对recordcount的支持是不怎么好
      

  3.   

    RecordCount 有时并不返回记录条数
    只好自己算:
     ...
     Query1.First;
     Count := 0; // 计数
     while not Query1.Eof do begin
      Count := Count + 1;// 计数
      // Do data operation ...
      Query1.Next;
     end;
     ...
    而且好像AdoRecordSet也有同样问题
      

  4.   

    query1.open;
    Query1.First;
    Query1.Last;
    I:=query1.recordcount;