Insertar datos en 2 tablas, ayudaa

[[Caral]]

Hola
A ojo

Código Delphi [-]
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;

Saludos