用sql 查询语句，怎样将返回的记录数传递给一个已定义的delphi变量

Question

但我不想用得个属性，　sql 好像能够把得到的记录数传给一个变量吧

Answer 1

var
  CountField:Integer;with Query1 do
begin
  Close;
  DatabaseName:=DatabaseName;
  SQL.Clear;
  SQL.Add('select Count(Field) as CountField From Table');
  Open;
end;CountField:=Query1.FieldByName('CountField').AsInteger;

Answer 2

dataset的recordcount属性对有些数据库不支持，建议使用 jabmoon(刺月) 的方法。

Answer 3

这样
var count:integer;
with Query1 do
   begin
     if Active then
          Close;
      SQL.Text:='select Count(*) as Result from TableName {where }';
      Open;
      count:=FieldByName('Result').value;
   end;
 如果支持recordcount属性，则直接这样var count:integer;
with Query1 do
   begin
     if Active then
          Close;
      SQL.Text:='select * from TableName {where }';
      Open;
    try  
      count:=RecordCount;
    except
      count:=0;
    end;
   end;
 

Answer 4

执行这条SQL语句
‘select Count(*) as cnt from tablename'然后
COUNT ：=Query.FieldbyName(cnt).AsInteger;就搞定了

Answer 5

编个循环：
query.first;
i:=1000;
j:=0;
repeat
  l:=query.moveby(i);
until l<>i;
l:=j*i+l;