2 tablas Paradox a Firebird

[ecfisa]

Hola pmtzg.

No sé si entiendo bién tu problema... Por lo que entendí de tu mensaje y usando un TIBDataSet con su generador, basta con que hagas la copia de forma consecutiva:

Código Delphi [-]
...
while not ViejaTablaParadox.Eof do
begin 
  IBDataSet1.Append;
  For i := 1 to ViejaTablaParadox.Fields.Count -1 do  // i=1 para respetar el campo_ID
     IBDataSet1.Fields[i].Value:= ViejaTablaParadox.Fields[i].Value;
  IBDataSet1.Post;
  ViejaTablaParadox.Next;
end;

while not NuevaTablaParadox.Eof do
begin
  IBDataSet1.Append;
  For i := 1 to NuevaTablaParadox.Fields.Count -1 do 
    IBDataSet1.Fields[i].Value:= NuevaTablaParadox.Fields[i].Value;
  IBDataSet1.Post;
  NuevaTablaParadox.Next;
end;
...

Pero me quedan dudas sobre el papel que juega el campo 'numreg'. Lo supuse como ID, pero no sé si es un código o corresponde al número de algún formulario...

Saludos.