mmmmm, si los quieres pasar todos de una vez desde delphi
Código Delphi
[-]
with TuDataset do begin
SQL.Clear;
SQL.Add('insert into tabla2(campo1, campo2)');
SQL.Add('select campo1, campo2 from tabla1');
ExecSQL;
end;
en este caso Campo3 quedaría vacio....
si lo que queires es ir pasando campo1 y campo2 y tambien asignar un valor a campo3, lo que tendrías que hacer es un ciclo que recorra todo tu dataset y luego asignar T1.campo1=T2.campo1 y asignarle el valor a campo3.... de uno por uno... a menos que campo 3 se pueda calcular con campo1 y campo 2.....