delphi Ado更新在2条记录之间插入

Question

我需要将记录从一个表更新到另一个表(这对于主表来说是这样，对于详细表来说也是如此。

第一个位置是我要从中复制更新的表的记录的记录:

Tabelamestre(Local_deste_cliente) (1 条记录)

NInterv.text:=dbedit1.text;

 Begin
   with  ADOTable_casa do  
      Begin
        Close;
        SQL.Clear;
        SQL.Add('SELECT * from  Vibrometria_');
        SQL.Add('Where numeracao LIKE ''%'+NInterv.text );
        Open;
       end;
 end

现在我需要更新/插入来自Vibrometria := Local_deste_cliente (TADOTABLE)的记录 现在我需要获取上面的记录并对 2 个详细表执行相同的操作

    Vibrometria_Sub (J)  :=   Tabeladetail  (Variaveis_neste_local). ((J) Records 

我还有另一个表可以从 (K) Tabeladetail (Variaveis_neste_local) 获取主记录

Vibrometria_Sub1 (K)  :=   Tabeladetail1(Variaveis_neste_local1). ((k) Records

以免说我需要从第一个表开始更新 1 到 N!!!!!!!!

有没有快速的解决方案!!!!!!

谢谢

Answer 1

在主数据集的 AfterInsert() 事件中创建子记录。

使用子数据集的 MasterSource 和 MasterFields 属性，可以在主记录更改时自动更改记录。