首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > .NET >

delphi 菜鸟

2013-08-09 
delphi 初学者 求助!FORM1.ADOQuery1.CloseFORM1.ADOQuery1.SQL.ClearFORM1.ADOQuery1.SQL.Add(insert

delphi 初学者 求助!
FORM1.ADOQuery1.Close;
FORM1.ADOQuery1.SQL.Clear;
FORM1.ADOQuery1.SQL.Add('insert into T_message(cartype,num,color,prices,memo) values(:cartype,:num,:color,:prices,:memo)');
FORM1.ADOQuery1.Parameters.Items[0].Value:= trim(LabeledEdit1.Text);
FORM1.ADOQuery1.Parameters.Items[1].Value:= StrToInt(LabeledEdit2.Text);
FORM1.ADOQuery1.Parameters.Items[2].Value:= trim(LabeledEdit3.Text);
FORM1.ADOQuery1.Parameters.Items[3].Value:= StrToInt(LabeledEdit4.Text);
FORM1.ADOQuery1.Parameters.Items[4].Value:= trim(LabeledEdit5.Text);
FORM1.ADOQuery1.ExecSQL;

好蛋疼阿 上星期这样写能够插入数据的~这星期就报 list index out of bound[0]
delphi insert list
[解决办法]
List index out of bound (0) 是访问出界,是ItemIndex越界,断点跟踪一下看看
[解决办法]
断点看一下
edit1是不是有值,数据类型能不能正常转换
[解决办法]
.Parameters参数要先创建下吧

热点排行