procedure TFrRowsSelect.BitBtn2Click(Sender: TObject);
var
i: Integer;
begin
ADOQuery2.Active := True;
for i := 0 to xjDBGrid1.SelectedCount - 1 do
begin
ADOQuery1.GotoBookMark(Pointer(xjDBGrid1.SelectedRows[i]));
TranData(ADOQuery2, ADOQuery1, '1');
end;
end;上段代码意思是从ADOQuery1中选择的多行数据转移到ADOQuery2,第一条能转成功,第二条便出错,信息为:list index out of bounds(3).
请各位高手帮忙解决。谢谢!
var
i: Integer;
begin
ADOQuery2.Active := True;
for i := 0 to xjDBGrid1.SelectedCount - 1 do
begin
ADOQuery1.GotoBookMark(Pointer(xjDBGrid1.SelectedRows[i]));
TranData(ADOQuery2, ADOQuery1, '1');
end;
end;上段代码意思是从ADOQuery1中选择的多行数据转移到ADOQuery2,第一条能转成功,第二条便出错,信息为:list index out of bounds(3).
请各位高手帮忙解决。谢谢!
解决方案 »
- 发布PreferenceManager 0.1.5 -软件配置中心框架类库
- delphi7 “没有注册类别”
- 给MDI主窗体加背景出了问题?
- udpsocket接受到的数据为什么是乱码?
- 关于HTTP下载的疑问。
- 一个小问题.
- 请教PCHAR类型与STRING类型是如何进行转换的及原理
- 根据一字符窜在treeview中定位节点
- 【csdn高手多】请大家帮忙看一下这是什么加解密算法
- 找出所有IE的窗口类;而findwindow仅仅返回一个最近的ie窗口类指针?
- 急!在FORM中动态调用dll后,关闭应用程序后出错的问题?
- 请问如何实现treeview的treenode 里具有combobox 下拉选择功能?
"1 "表示什么意思。