主题:小问题请教,几天想不通!
各位大侠好:
设表中有je字段,为货币类型,
不知为什么若不输入edit1.text中的数据,则会提示出错,输入金额则正确?
var
je: string;
begin
je:=trim(edit1.text);
if strfloat(je)<=0 then
begin
showmessage('请输入金额');
exit;
end;
sqlstr:='update 表 set je='''+je+''' where id =3';
adoquery1.close;
adoquery1.clear;
adoquery1.add(sqlstr);
end;
[em10][em12][em1][em1]
设表中有je字段,为货币类型,
不知为什么若不输入edit1.text中的数据,则会提示出错,输入金额则正确?
var
je: string;
begin
je:=trim(edit1.text);
if strfloat(je)<=0 then
begin
showmessage('请输入金额');
exit;
end;
sqlstr:='update 表 set je='''+je+''' where id =3';
adoquery1.close;
adoquery1.clear;
adoquery1.add(sqlstr);
end;
[em10][em12][em1][em1]