表格上多行数据转移有错误，请高手帮忙解决！谢谢！
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).
请各位高手帮忙解决。谢谢！
[解决办法]
TranData
这个函数怎么写的？
[解决办法]
要看你TranData(ADOQuery2, ADOQuery1, "1 "); 这个方法是怎么写的。
"1 "表示什么意思。
[解决办法]
TranData的问题,
