Código Delphi [-]insert into tabla_b select *, 0 from tabla_a
insert into tabla_b select *, 0 from tabla_a