[fabianbbg]

hola:
O para no escribir todos los campos:

Código Delphi [-]
tabla2.append;
for i:=0 to tabla1.fieldcount-1 do
  tabla2.fields[i].value:=tabla1.fields[i].asVariant;

tabla2.post;

Por supuesto si las tablas tienen las misma estructura.

Suerte!