Pues primero que todo y antes que nada, Bueno dias y bienvenido al foro de delphi:
La respuesta a tu pregunta es asi:
with TuDataset do begin
SQL.Clear;
SQL.Add('insert into tabla2(campo1, campo2)');
SQL.Add('select campo1, campo2 from tabla1');
ExecSQL;
end; //Fin with
esta es solo una manera de hacerlo y es la mas profesional que conozco, espero te sirva.