[Alfonso Jurado]

Por qué no pruebas a hacer esto (supongo que son todos los registros de tabl2):

Código Delphi [-]
While not(table2.eof) do begin
 table2.insert;
 table2.fieldvalues['serial']:= table1.fieldvalues['serial'];.
 table2.post;
 table1.next;
end;