Guardar,Modificar en 2 tablas juntas!

[learning_delphi]

Buen dia a todos.

Me gustaria saber como guardar , modificar y borrar datos de 2 tablas de mi base de datos,
se como hacerlo directamente en 1 tabla , pero ahora tengo 2 tablas desplegadas en un grid del cual al dar dblclick me manda a otro form en el cual me muestra los Field de 3 campos, 2 campos de una tabla y 1 mas de otra en 3 DBedit respectivamente, quiero efectuar dichos cambios en ambas tablas al mismo tiempo aqui tengo los codigos que uso para hacer cambios conectado solo a una.


Begin //para guardar insertar datos pongo este codigo
with IBQuery do
begin
close;
SQL.text:='insert into RUTAS values(1,2)';
ParamByName('p1').AsSmallInt:=StrToInt(edit1.text);
ParamByName('p2').asstring:=edit2.text;
q1.ExecSQL;
showmessage('¡Ruta nueva agregada!');
end;
end;
end.

//para modificar uso este codigo
Begin
With IBQuery do
begin
Close;
SQL.text:='UPDATE RUTAS SET NOMRUTA=1 where RUTA=2';
ParamByName('p1').AsString:=edit2.text;
ParamByName('p2').AsSmallInt:=StrToInt(edit1.Text);
showmessage('¡modificacion realizada!');
ExecSQL;
end;
end;
end.

Espero puedan ayudarme de antemano les doy las gracias por soportarme :$:$ saludos ^^.