入库的添加功能中 同时添加单身和单头怎样写代码

[Magiccrystal]

单头表：字段：bID_ (int),No_ (varchar(50)),hT_ (int ),hCreator_ (varchar(30)),hCreateTime_ (datetime),hEditor_ (varchar(30)),hEditTime_ (datetime)

单身：bID_ bSerial_ pCode_ pName_ pNorms_ pUnited_ bNum_

就在入库窗体的添加功能中如何实现添加啊，这有两张表，我用两个ADOQuery分别是
ADOQuery1 的SQL 语句：select * from 单头表

ADOQuery2 的SQL 语句：select * from 单身表
添加功能的代码怎么写？我写了但是我昏了，我刚学希望各位教我写，感谢哦

[bdmh]

要批量添加吗，如果是不需要两个数据集，一个就够，用sql添加
insert into table1(a,b) select a,b from table2

[varick_zhong]

没看懂。。。

[tgbd]

楼主是想实现动态显示表格的栏标题么？可以这样去试一下：

一般是这样做：

　　一个表用来存放：业务ID，字段名，标题，宽度（注意是界面上表格的宽度），是否求和，显示顺序

　　那么传递一个“业务ID”进行一次查询，根据查询的结果，做一次循环，动态创建表格的列，创建时，设置对应的绑定值，这样：标题、字段名称、列宽度、是否列小计都设置成功了。

　　此时再用一个adodataset作数据源（注意：该数据源要包含上面查询所用到的字段名称).

[fstao]

建议楼主参看delphi里自还的demo例子，里面有如何实现主从表添加的代码的。

[ddwkmn]

主从表添加记录最好采用事务处理

[dd_zhouqian]

try
ADOConnection1.BeginTrans;

ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Text:='insert into mast_table';
ADOQuery1.ExecSQL;

ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Text:='insert into child_table';
ADOQuery1.ExecSQL;

ADOConnection1.CommitTrans;
except
ADOConnection1.RollbackTrans;
Exit;
end;

[Magiccrystal]

问题早已解决，谢谢各位大侠了