这是我的代码
with ADOQuery1 do
begin
close;
sql.Clear;
//sql.Add('insert into T_RS_SYSCOLORSET values(:p0,:p1,:p2,:p3,:p4');
sql.Add('update T_RS_SYSCOLORSET');
sql.Add(' set goodcolor=:p0,dancolor=:p1,flashcolor=:p2,badcolor=:p3,flashinterval=:p4');
Parameters[0].Value := inttostr(g_statecolorgood);
Parameters[1].Value := inttostr(g_statecolordangerous);
Parameters[2].Value := inttostr(g_statecolorbad);
Parameters[3].Value := '22';
Parameters[4].Value := suidbedt_interval.Field.Value;
ExecSQL;
end;我就是想更新那张表,但是总是出现“未指定的错误”这种提示错误,这段代码我在一个新的程序里单独试过,可以正常更新,不知道是怎么回事,请大家帮忙,谢谢
with ADOQuery1 do
begin
close;
sql.Clear;
//sql.Add('insert into T_RS_SYSCOLORSET values(:p0,:p1,:p2,:p3,:p4');
sql.Add('update T_RS_SYSCOLORSET');
sql.Add(' set goodcolor=:p0,dancolor=:p1,flashcolor=:p2,badcolor=:p3,flashinterval=:p4');
Parameters[0].Value := inttostr(g_statecolorgood);
Parameters[1].Value := inttostr(g_statecolordangerous);
Parameters[2].Value := inttostr(g_statecolorbad);
Parameters[3].Value := '22';
Parameters[4].Value := suidbedt_interval.Field.Value;
ExecSQL;
end;我就是想更新那张表,但是总是出现“未指定的错误”这种提示错误,这段代码我在一个新的程序里单独试过,可以正常更新,不知道是怎么回事,请大家帮忙,谢谢
解决方案 »
- 能否让按钮(bitbtn,speedbutton)支持png格式?
- 找一份兼职做做!
- 高分求看!!为什么运行不稳定,总报invaid pointer operation错误 ??
- 请问这样的报表用fastreport怎么作,有200分的
- 数据库访问问题(超时)
- delphi中有带多选框的目录树形控件吗?(在线等待)
- 取数问题!!
- 有人写过这样的函数(文件拷贝)吗?可否共享?
- ListBox第一项的字体/大小和第二项及后面的不致,请问何故?
- 求助:我需要一下Unix系统下的账号,要有写入权限,空间只要1M就够了,用于测试我的数据备份程序?一天时间就可以了哪位能帮助我呀特给100分以作酬谢!!!!
- 等不急了。。快来看看!!有分送
- @@@@@@打印问题!!!多页打印,合计总是打印最后一个.?????????????真是想不想原因,!!!!!!!!
不是suidbedt_interval.Field[0].Value吗?
或者inttostr(g_statecolorgood) 出错因为g_statecolorgood不是正常的整数,调试一下