query insert작업을 하는데 계속 type mismatch in expression예외가 발생합니다.
도와주세요.
with query1 do
begin
close;
sql.clear;
sql.add('insert into "customer.db" ')
sql.add(' values(:c1,:c2,:c3,:c4,:c5,:c6)');
parambyname('c1').asinteger:=strtoint(edit1.text);
parambyname('c2').asstring:=edit2.text;
parambyname('c3').asstring:=maskedit1.text;
parambyname('c4').asstring:=edit3.text;
parambyname('c5').asstring:=maskedit2.text;
parambyname('c6').asinteger:=strtoint(edit4.text);
execsql;
sql.clear;
sql.add('select * from "customer.db" ');
open;
end;
참고로 연결된 db(paradox) 필드는 cno(short),cname(alpha),ctel(alpha),caddr(alpha),clicence(alpha),cpoint(short)로 되어 있습니다.
무엇때문에 타입이 안맞는건지 고수님들의 한수 가르침 부탁드립니다.
cpoint(alpha) <--- 6번째 필드 타입
parambyname('c6').asinteger:=strtoint(edit4.text); <-- 숫자 대입
델파이궁금이 wrote:
> query insert작업을 하는데 계속 type mismatch in expression예외가 발생합니다.
> 도와주세요.
> with query1 do
> begin
> close;
> sql.clear;
> sql.add('insert into "customer.db" ')
> sql.add(' values(:c1,:c2,:c3,:c4,:c5,:c6)');
> parambyname('c1').asinteger:=strtoint(edit1.text);
> parambyname('c2').asstring:=edit2.text;
> parambyname('c3').asstring:=maskedit1.text;
> parambyname('c4').asstring:=edit3.text;
> parambyname('c5').asstring:=maskedit2.text;
> parambyname('c6').asinteger:=strtoint(edit4.text);
> execsql;
> sql.clear;
> sql.add('select * from "customer.db" ');
> open;
> end;
>
> 참고로 연결된 db(paradox) 필드는 cno(short),cname(alpha),ctel(alpha),caddr(alpha),clicence(alpha),cpoint(alpha)로 되어 있습니다.
> 무엇때문에 타입이 안맞는건지 고수님들의 한수 가르침 부탁드립니다.