高手帮忙!看看这是什么错误啊!我疯了!急急!
高手帮忙!看看这是什么错误啊!我疯了!急急! Delphi / Windows SDK/API
http://www.delphi2007.net/DelphiDB/html/delphi_20061221131048187.html
self.Query2.Close;
self.Query2.SQL.Clear;
self.Query2.SQL.Text:='insert into CJB(教师姓名,学时,金额) values(:教师姓名,:学时,:金额)';
self.Query2.ParamByName('教师姓名').AsString:=(self.JSXMDBLookupComboBox.Text);
self.Query1.Params[0].AsString:='李令';
self.Query1.Params[1].AsString:='100';
self.Query1.Params[2].AsString:='100';
self.Query2.Open;
错误提示!
"Project1.exe raised exception class EListError with message 'List index out of bound(1)'.Pross stopped Use Step or Run to conntinue"
http://www.delphi2007.net/DelphiDB/html/delphi_20061221131048187.html
self.Query2.Close;
self.Query2.SQL.Clear;
self.Query2.SQL.Text:='insert into CJB(教师姓名,学时,金额) values(:教师姓名,:学时,:金额)';
self.Query2.ParamByName('教师姓名').AsString:=(self.JSXMDBLookupComboBox.Text);
self.Query1.Params[0].AsString:='李令';
self.Query1.Params[1].AsString:='100';
self.Query1.Params[2].AsString:='100';
self.Query2.Open;
错误提示!
"Project1.exe raised exception class EListError with message 'List index out of bound(1)'.Pross stopped Use Step or Run to conntinue"
应该对Query2.Params赋值,怎么对Query1赋值呢?
错误显示这一句的下标1超范围
self.Query1.Params[1].AsString:='100';
注意:
切莫用中文作为数据表的字段名与SQL语句的参数名称!!
楼上有理,建议以后编程都用英文,这个也是编程规范
一会query2,一会query1,
楼上正解 ,参数别弄汉字
楼主有待进一步提高代码的规范性,不过还好,比较整齐 呵呵! 还有数据集对象的使用没看到,怎么冒出个1来了!