用delphi7 编写软件,需要将一个SQL数据库中两个表中的内容显示在DBGRID 表中。

2025-02-25 19:13:57
推荐回答(2个)
回答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;

回答2:

用ado控件连接上就行了。