with datamodule.CustomerData.login do
    begin
      close;
      sql.Clear;
      sql.Add('select * from customer where custid=:srh');
      parameters.ParamByName('srh').Value:=trim(seskinedit1.Text);
      prepared;
      open;
      if recordcount=1 then
        begin
          close;
          sql.Clear;
          sql.Add('insert into products values(:srh1,:srh2,:srh3,:srh4)');
          parameters.ParamByName('srh1').Value:=trim(seskinedit1.Text);
          parameters.ParamByName('srh2').Value:=seskinedit2.Text;
          parameters.ParamByName('srh3').Value:=seskinedit3.Text;
          parameters.ParamByName('srh4').Value:=strtocurr(trim(seskinedit4.Text));
          prepared;
          execsql;
        end else
        begin
          showmessage('数据库内不存在客户编号为”'+trim(seskinedit1.Text)+'“的记录,请先添加客户资料,然后在添加此客户的产品资料!');
        end;
    end;运行提示说,"查询值的数目与目标字段的数目不同",我的插入语句错了吗?
表products有5个字段其中第一个是自增的,其余四个我已经表示出来了
请问错在那里?