Question

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

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

急，请写出源代码！~~

Answer 1

代码演示从 ADOQuery2(连接DBGrid2) 拿 ADOQuery1(连接DBGrid1) 当前选定的行全部字段... 然后, POST就行了..procedure TForm1.Button1Click(Sender: TObject);var
i: integer;
begin
ADOQuery2.Append;
for i:=0 to ADOQuery1.FieldCount -1 do //注意! 如果有主键就要注意处理主键,比如自增型,避开它别给赋值了
ADOQuery2.Fields[i].Value:=ADOQuery1.Fields[i].Value;
ADOQuery2.Post;
end;