QTemp.SQL.Text := 'Insert Into MiTabla1 (Id, nombre, apellido) '+
'Values (' +Edit1.Text+', '+Edit2.Text+', '+Edit3.Text')'
QTemp.ExecSQL;
QTemp.SQL.Text := 'Insert Into MiTabla2 (id_C, telefono_1, telefono_2) '+
'Values (' +Edit4.Text+', '+Edit5.Text+', '+Edit6.Text')'
QTemp.ExecSQL;