代码演示从 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;
温馨提示:内容为网友见解,仅供参考