好长的一段查询的代码,我反复的写了几次,可是在EDIT中填写后,一单击保存BUTTON的时候都会出现:

的错误.
我的数据库表设计如下:

我在相应EDIT中填写的数据如下图:


大家帮我看下的,谢谢先
adoqueryCQ.SQL.Clear;
adoqueryCQ.SQL.Text:='Update 长期客户管理 set cqkhid=:a,cqkhxm=:b,cqcph=:c,cqckh=:d,cqckqx=:e,cqkhzz=:f,cqtel=:g,cqvalue=:h,cqtype=:i,cqbkh=:j,cqrktime=:k,cqcktime=:l where cqckh=:cqckh';
adoqueryCQ.Parameters.ParamByName('cqckh').Value:=editCKH_CQ.Text;
adoqueryCQ.Parameters.ParamByName('a').Value:=editID_CQ.Text;
adoqueryCQ.Parameters.ParamByName('b').Value:=editNAME_CQ.Text;
adoqueryCQ.Parameters.ParamByName('c').Value:=editCPH_CQ.Text;
adoqueryCQ.Parameters.ParamByName('d').Value:=editCKH_CQ.Text;
adoqueryCQ.Parameters.ParamByName('e').Value:=editCKQX_CQ.Text;
adoqueryCQ.Parameters.ParamByName('f').Value:=editADDRESS_CQ.Text;
adoqueryCQ.Parameters.ParamByName('g').Value:=editTEL_CQ.Text;
adoqueryCQ.Parameters.ParamByName('h').Value:=editVALUE_CQ.Text;
adoqueryCQ.Parameters.ParamByName('i').Value:=comboboxCQ.Text;
adoqueryCQ.Parameters.ParamByName('j').Value:=editBKH_CQ.Text;
adoqueryCQ.Parameters.ParamByName('k').Value:=MessageDesignForm.DateTimePicker1.Date;
adoqueryCQ.Parameters.ParamByName('l').Value:=editCKTIME_CQ.Text;
adoqueryCQ.ExecSQL;
showmessage('修改保存成功');

adoqueryCQ.Parameters.ParamByName('h').Value:=editVALUE_CQ.Text;
这里是货币类型吧，应该转换一下
adoqueryCQ.Parameters.ParamByName('h').Value:=strtoint(editVALUE_CQ.Text);