number:=strtoint(trim(maskedit8.text));
packs:=strtoint(trim(maskedit10.Text));
adoquery1.SQL.Clear;
adoquery1.SQL.Add('exec addlxj '''+trim(dbedit7.Text)+''','''+trim(dbedit8.Text)+''','+number+','+packs+'');
adoquery1.ExecSQL;编译提示'+number+','+packs+'类型不匹配.存储过程的最后2个参数是int型的
packs:=strtoint(trim(maskedit10.Text));
adoquery1.SQL.Clear;
adoquery1.SQL.Add('exec addlxj '''+trim(dbedit7.Text)+''','''+trim(dbedit8.Text)+''','+number+','+packs+'');
adoquery1.ExecSQL;编译提示'+number+','+packs+'类型不匹配.存储过程的最后2个参数是int型的
adoquery1.SQL.Add('exec addlxj '''+trim(dbedit7.Text)+''','''+trim(dbedit8.Text)+''','+strtoint(trim(maskedit8.text))+','+packs:=strtoint(trim(maskedit10.Text))+'');
adoquery1.ExecSQL;参数是否int不用在delphi 里控制
adoquery1.SQL.Add('exec addlxj '''+trim(dbedit7.Text)+''','''+trim(dbedit8.Text)+''','+trim(maskedit8.text)+','+trim(maskedit10.Text));
adoquery1.ExecSQL;