难道程序自动进行了隐式的类型转换吗?把Str换成 Int
sql.Add('insert into T_Tem(HBillCode,Data,Type,LingLiaoNum,Style,ColorCode,'+
'CustName,Number,Maker,Sender,Reciever,Zu,ZhiWuType,Checker,Time,Temperature)'
+ 'values (:a,:b,:c,:d,:e,:f,:g,:h,:i,:j,:k,:l,:m,:n,:o,:p)');
parameters.ParamByName('a').Value:=lblBillCodeH2.Caption;
parameters.ParamByName('b').Value:=lblDateH2.Caption;
parameters.ParamByName('c').Value:='高温';
parameters.ParamByName('d').Value:=edtJiaLiaoH.Text;
parameters.ParamByName('e').Value:=edtZhiBieH.Text;
parameters.ParamByName('f').Value:=edtColorH.Text;
parameters.ParamByName('g').Value:=cbbCustNameH.Text;
parameters.ParamByName('h').Value:=edtNumH.Text;
parameters.ParamByName('i').Value:=edtZhiBiaoH.Text;
parameters.ParamByName('j').Value:=edtFaLiaoH.Text;
parameters.ParamByName('k').Value:=edtLingLiaoH.Text;
parameters.ParamByName('l').Value:=edtGroupH.Text;
parameters.ParamByName('m').Value:=edtZhiWuPinZhongH.Text;
parameters.ParamByName('n').Value:=edtFuHeH.Text;
parameters.ParamByName('o').Value:=edtTimeH.Text;
parameters.ParamByName('p').Value:=edtTemH.Text;