Question

delphi+sql做系统，如何将dbgrid表中的一行数据转移到另一个dbgird表中，具体内容看补充

在一个窗体中，有两个dbgrid，用的adoquery和datasource，调用两张表出来，我想选中其中一个表的一行数据，然后点击button，就可以将这行数据转移到另一个表中，请问如何实现呢？

急，请写出源代码！~~
按你的答案做了，结果如图，一行一行的，怎么办

Answer 1

很简单，可以这样实现：

假定dbgrid1，用的adoquery1；dbgrid2，用的adoquery2 。现将dbgrid1中选中的一行移到dbgrid2：

for i:=0 to adoquery1.fieldcooun-1 do
bein
ADOQuery2.append;
ADOQuery2.Fields[i].Value:=ADOQuery1.Fields[i].Value;
ADOQuery2.post;
end;

试试看，应该OK了。

Answer 2

还是不明白你的意思。
是不是是说 有2个表，在窗口上分别用2个dbgrid分别对应显示2个表的内容。你想把第一个dbgrid1的选定的一列，点击button后直接复制到另一个dbgrid2？
思路：
1、2个表必须有相近的结构
2、可以把表一选定的记录复制下来直接在dngrid2中进行 append