delphi 如何将下列SQL语句的执行结果赋值给变量？

var 
sql1，str：string；
count：float
如何把sql1：=‘select count(*) from a’这个语句的执行结果赋值给count？

答案：var 
  sql1，str：string；
  count：float
begin
  adoquery1.close; 
  adoquery1.sql.text := 'select count(*) from a';
  adoquery1.open;
  count := adoquery1.fields[0].asinteger; ///////这里
end;
c

其他：楼上回答的是正解。 

上一个：软件开发啊，那你们上学的时候是不是学了C，java，delphi这些编程语言啊？ 那你的其它同学呢?
下一个：Delphi问题，是不是要用Tlist？