主题:一个很菜的问题.但是很郁闷!!求救!!!
var sxf,money:currency;//money为表里的余额;sxf为此操作实际续费;
kjf:integer;//卡积分;
begin
frm_mainform.q_gl_member.Edit;
sxf:=strtofloat(trim(sxfmoney.Text));
money:=frm_mainform.q_gl_member.FieldValues['KNYE'];
money:=money+sxf;
kjf:=frm_mainform.q_gl_member.FieldValues['kjf'];
kjf:=kjf+trunc(strtoint(frm_memaddmoney.sxfmoney.text)/10);
frm_mainform.q_gl_member.FieldByName('kjf').AsInteger:=kjf;
frm_mainform.q_gl_member.Post;
end;
表结构在有两个字段:KNYE:money;
KJF:integer;
请问一下为什么提交不了数据呢???我明明的已经转换了呀.
提示错误:''某个数' is not a valid integer value'
前两天还好好的能提交的.只是最近把相对应的dbgrid换成了dbgrideh,不可能是它的问题吧?急死人了.请各位帮帮忙吧?谁以前有遇见过类似的情况............
kjf:integer;//卡积分;
begin
frm_mainform.q_gl_member.Edit;
sxf:=strtofloat(trim(sxfmoney.Text));
money:=frm_mainform.q_gl_member.FieldValues['KNYE'];
money:=money+sxf;
kjf:=frm_mainform.q_gl_member.FieldValues['kjf'];
kjf:=kjf+trunc(strtoint(frm_memaddmoney.sxfmoney.text)/10);
frm_mainform.q_gl_member.FieldByName('kjf').AsInteger:=kjf;
frm_mainform.q_gl_member.Post;
end;
表结构在有两个字段:KNYE:money;
KJF:integer;
请问一下为什么提交不了数据呢???我明明的已经转换了呀.
提示错误:''某个数' is not a valid integer value'
前两天还好好的能提交的.只是最近把相对应的dbgrid换成了dbgrideh,不可能是它的问题吧?急死人了.请各位帮帮忙吧?谁以前有遇见过类似的情况............