delphi+mysql 一下代码怎么会报错呢 ？？很简单的问题，

Question

      with ADOQuery1 do
      begin
        close;
        SQL.Clear;
        SqL.Add('select * from mytable where id=:q;');
        Parameters.ParamByName('q').Value  :='22';
        i:=adoquery1.RecordCount;
        execSQL;
      end;
      showmessage('搜到'+inttostr(i)+'条数据');错误信息为adoquery1：cannot perform this operation on a closed dataset。我知道这句话的大体意思是数据集已关闭。但是如何修正这段代码呢 ？？？谢谢啊。

Answer 1

改成
with ADOQuery1 do 
begin 
  close; 
  SQL.Clear; 
  SqL.Add('select * from mytable where id=:q;'); 
  Parameters.ParamByName('q').Value  :='22'; 
  execSQL; 
  i:=adoquery1.RecordCount; 
end; 
没有执行那个哪来的数据？

Answer 2

Open; //先打开表
i:=adoquery1.RecordCount;