create table aaa (id char(5),num number(5,2))var
t:string;
i:integer;
begin
i:=strtoint(edit2.text);
t:='insert into aaa values ('+edit1.text+'''+','+'''+i+')';
.....
end为什么这样的i不给通过?
t:string;
i:integer;
begin
i:=strtoint(edit2.text);
t:='insert into aaa values ('+edit1.text+'''+','+'''+i+')';
.....
end为什么这样的i不给通过?
t:='insert into aaa values ('''+edit1.text+''' , '''+edit2.text+''' )';
对不对
t:string;
i:integer;
begin;
if trim(edit2.text)='' then
begin
showmessage('edit2不能为空');
exit;
end;
t:='insert into aaa values ('''+edit1.text+''','+edit2.text+')';
.....
end
当是我在edit2.text里输入的是12.5报 '12.5' is not valid integer value.
t:='insert into aaa values ('+'trim('+''''+edit1.text+''''+'),'+'trim('+''''+edit2.text+'))';