delphi+access查询问题，整了一晚，还是出现“未知错误”

使用的是delphi7+access2003
表结构如下：
ID 产品编号
Size 产品型号
Price 产品价格
Type  产品类型
Unit  单位
Package 装箱数查询我使用的是adoquery，查询语句如下：begin
  with dm.ADOQuery1 do
  begin
    close;
    sql.Clear;
    sql.Add('select * from products where Size like :a');
    parameters.ParamByName('a').Value:=edit1.Text+'%';
    open;
  end;
end;查询时为什么老是出现“未知错误”，抓狂啊！