Saludos
Podrias usar una sentencia de insercion
Código SQL
[-]
Delete from tablaB
insert into tablaB
select * from tablaA
o con Delphi (mas costoso)
Código Delphi
[-]
TablaB.EmptyTable;
with tablaA do begin
Open;
with not eof() do begin
tablaB.Insert;
tablaB.FieldByname('campo1').AsString:=FieldByName('campo1').AsString;
tablaB.FieldByname('campo2').AsString:=FieldByName('campo2').AsString;
tablaB.FieldByname('campo1').AsInteger:=FieldByName('campo3').AsInteger;
tablaB.Post;
Next;
end;
end;