我用ADO主从表缓存,主表的数据可以保存到数据库中,但从表数据却一个也没保存进去。
请大家帮忙解答一下
请大家帮忙解答一下
解决方案 »
- TDBGridE这个是那个组件里面的控件呀?
- RvDataSetConnection1和RvProject1做随查询结果更新的报表
- 很久没上CSDN啦,现在失业极度无聊就上来看看~~故散分帮助需要帮助的人。
- 如何将摄像头的图像中的指定颜色识别
- 怎样激活一个MDI窗体?
- 哪里有delphi中使用richedit2.0的资料?
- delphi 读取txt文件数据 用chart做曲线
- 动态数组问题
- 哪有RXRichEdit或RichEdit98 For Delphi6下载
- Delphi编译时进行怎样的设置后可以在调试时跟踪到其源代码中?
- DBGRID能像EXCEL自动编号吗?可以把左边的一格拉大吗?
- 关于通信,请大家讨论
ADODataSetMaster.UpdateBatch(arAll);
ADODataSetDeatil.UpdateBatch(arAll);記住,最好在添加從表前,把主表Post。
ADODataSetDeatil.UpdateBatch(arAll);
sell_qy和sellchild_qy的locktype属性都设为ltBatchOptimistic.
SellChild_QY的TParameters添加了一个CONID
Sell_QY.sql.Add('select * from sell_tb order by autoid');
SellChild_QY.commandtext:='select * from sellchild_tb where conid=:conid';
主表的CONID字段是自动编号的,与从表的CONID字段相关联
//---------------------------------------------
procedure TDM_FM.SellChild_QYAfterInsert(DataSet: TDataSet);
begin
if sell_qy.State in [dsinsert,dsedit] then sell_qy.Post;
end;procedure TDM_FM.SellChild_QYNewRecord(DataSet: TDataSet);
begin
SellChild_QY.FieldByName('Conid').Value:= SellChild_QY.Parameters[0].Value;
end;procedure TDM_FM.Sell_QYAfterScroll(DataSet: TDataSet);
begin
SellChild_QY.Parameters[0].Value := Sell_QY.FieldByName('conid').AsInteger;
end;按照ypnet(高原)所说的加了一条
procedure TDM_FM.Sell_QYAfterPost(DataSet: TDataSet);
begin
SellChild_QY.UpdateBatch(arall);
end;
现在的情况是可以保存进去了,但关联字段没有与主表关联上
保存语句:
SellChild_QY.UpdateBatch;
Sell_QY.UpdateBatch;
能详细的说一下吗?事务我不懂的