DELPHI里面数据库赋值的问题！！！！！！！！！！！！！！！！

Question

我的问题是这样：
  我在SQL SERVER里面建了个数据库test，并建了张表test2,表中有两个字段
t1,t2。现在我在DELPHI里面用QUERY访问数据库。现在我如何把这两个字段
的值取出然后赋给我程序中的两个变量a1,a2。（表中一直只有一行记录）
具体的SQL语句和程序怎么写法？我还有个问题，如何判断一张表是否为空的SQL语句是不是这样的：
select * from test
然后看它的EOF属性是否为真。

Answer 1

with Query1 do
begin
  Close;
  SQL.Text:='select * from test';
  Open;
end;
if not Query1.IsEmpty then  //判断是否为空
begin
  a1:=Query1.FieldByName('t1').value;
  a2:=Query1.FieldByName('t2').value;
end;

Answer 2

1.
with query do
begin
   close;
   sql.clear;
   sql.add(select * from test);
   open;
end;
a1:=query.fieldbyname('t1').asstring;
a2:=query.fieldbyname('t2').asstring;2.
  with query do
begin
   close;
   sql.clear;
   sql.add(select count(*) from test);
   open;
end;
   if query.recordcout=0 then
   showmessage('此表为空');