ADO开发的问题

问题是这样的
代码如下
Qry := TADOQuery.Create(Application);
try
  with Qry,Qry.Sql do
  begin
     Close;
     Connection := ADoConnection;
     Clear;
     Add('select * from tab1');
     Open;
     如果查询的结果为空,在win2000下报错 
     Close;
  end;
except
    Qry.Free;
end;