adoquery1 --> datasource1
datasource1.dataset --> adoquery1
adoquery2.datasource --> datasource2
datasource2.dataset --> adoquery1 ltmb118
datasource1.dataset --> adoquery1
adoquery2.datasource --> datasource2
datasource2.dataset --> adoquery1 ltmb118
用事务处理
ADODataSet.Append;
ADODataSet.FieldValude['字段名'] := [value];
.
.
. //填完所有要提交的字段
ADODataSet.post;
ADODataSet.close;不知道你是不是这个意思。