关于主从表的修改问题！我所有的分都给您！(100分)

pckite2 · 2002-08-11

主表：编号性质从表：编号内容日期
01 1 01 77
02 1 01 88
02 99
02 66
02 55
现在我想修改主表中的编号02改为03，同时从表中编号为02的记录也变为03
即变为：
主表：编号性质从表：编号内容日期
01 1 01 77
03 1 01 88
03 99
03 66
03 55
如何现实？具体一些，谢谢1

truecat · 2002-08-11

1、在主表中定位记录；
2、从定位记录中读出编号；
3、根据所得编号在从表中定位记录；
4、修改从表中的记录数据；
5、修改主表中的记录数据；
OK.......

forgot2002 · 2002-08-11

主表：Select * from tableMaster
从表：Select * from tableDetail where 编号=:编号
主表的OnAfterPost事件：
QueryDetail.fieldbyname('编号').value:=QueryMater.fieldbyname('编号').value;
保存代码：
Database1.StartTransaction;
try
QueryMaster.ApplyUpdates;
Querydetail.ApplyUpdates;
Database1.Commit;
except
Database1.Rollback;
raise;
end;
QueryMaster.CommitUpdates;
QueryDetail.Commitupdates;

jasper · 2002-08-11

注意关闭约束

smallbs · 2002-08-11

update 主表
set 编号=‘03’
where 编号='02'
update 从表
set 编号=‘03’
where 编号='02'

pckite2 · 2002-08-11

TO forgot2002:
谢谢！~ 我是初学者，你的‘保存代码：’后的代码是什么意思？怎么用？

smallbs · 2002-08-11

queryMater.Text:='Select * from tableMaster';
QueryDetail.Text:='Select * from tableDetail where 编号=:编号';
queryMater.Open;

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
...
queryMater.Post;
end;

procedure TForm1.queryMaterAfterPost(DataSet: TDataSet);
begin
QueryDetail.fieldbyname('编号').value:=QueryMater.fieldbyname('编号').value;
Database1.StartTransaction;
try
QueryMaster.ApplyUpdates;
Querydetail.ApplyUpdates;
Database1.Commit;
except
Database1.Rollback;
raise;
end;
QueryMaster.CommitUpdates;
QueryDetail.Commitupdates;
end;

MikeZ · 2002-09-03

主从表建立关系即可！

天与地 · 2002-09-03

同意楼上。
感觉这样设计数据好像不很规范，把从库的编号用主库的自增ID代替，
这样就不用关心从库的数据变化了。

pckite2 · 2002-09-09

给分喽！

关于主从表的修改问题！我所有的分都给您！(100分)

pckite2

Unregistered / Unconfirmed

truecat

Unregistered / Unconfirmed

forgot2002

Unregistered / Unconfirmed

jasper

Unregistered / Unconfirmed

smallbs

Unregistered / Unconfirmed

pckite2

Unregistered / Unconfirmed

smallbs

Unregistered / Unconfirmed

MikeZ

Unregistered / Unconfirmed

天与地

Unregistered / Unconfirmed

pckite2

Unregistered / Unconfirmed

Similar threads