Foros Club Delphi - EDIT guardar en dos tablas distintas

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)

- - EDIT guardar en dos tablas distintas (https://www.clubdelphi.com/foros/showthread.php?t=22568)

el_barto

20-06-2005 15:10:58

EDIT guardar en dos tablas distintas

Muyyy buenos dias foristas:

tengo un inconveniente y es que necesito que cuando yo escriba un cod_prod y un nom_prod en dos Edit respectivamente me los guarde en dos tablas distintas instantaneamete se puede hacer esto??, lo estuve intentando haciendo un clear al isertsql y luego un add escribiendo una nueva instruccion sql pero no funciona para nada...:(

Gracias por la atencion prestada

mosorio

20-06-2005 15:53:46

Hola, podrías decir la versión de D que utilizas, componentes. Ya que se podría hacer de varias formas.

Saludos

el_barto

20-06-2005 15:56:26

Uso delphi 6, interbase6 y uso los elementos IB de delphi, mi edit esta conectado a un DataSet y un datasource

mosorio

20-06-2005 16:11:53

Haber si recuerdo, ya que tengo tiempo que no utilizo D.
Lo importante es que primero realices una inserción a la primera tabla, asi si funciona, lo siguiente será cambiar la instrucción por la segunda tabla.
Esto debes hacerlo asignandole la sentencia sql mediante código, luego limpias la propiedad donde se inserta la sentencia y la asignas nuevamente.
Ojo que debes ejecutar los pasos indicados para cada acción. Es decir cerrar el SQLDataSet, asignar el valor SQL, ejecutar la sentencia, hacer commit. Por más que quieras no podrás hacerlas instantáneas como deseas, se hará una tras otra, pero con una diferencia de tiempo mínima que dependerá de la máquina.
Espero te ayude en algo.

Carlex

20-06-2005 16:12:59

Buenas, bueno mi forma para guardar datos en 2 tablas es usar un simple edit no un dbedit, a fin d tener mejor control sobre el mismo; luego d esto solo uso el siguiente codigo:

Código:

 Table1.insert; //o append con esto preparo la tabla para una insercion

 Table2.insert;

 Table1.FieldByName('cod_prod').asinteger:=edit1.text; //asigno lo q esta en el edit al campo de la tabla

 Table2.FieldByName('cod_prod').asinteger:=edit1.text;

 Table1.FieldByName('nom_prod').asinteger:=edit2.text;

 Table2.FieldByName('nom_prod').asinteger:=edit2.text;

 Table1.post; //o insert con esto se guarda los datos

 Table2.post;

 Edit1.clear;

 Edit2.clear;

Bueno como t dije esta es mi forma debe haber otras talvez hasta mas simples, espero q t sirva

Saludos

Carlex

el_barto

20-06-2005 16:21:04

Gracias funciona muy bien, pero para los que qieran hacerlo de otra forma recomiendo:

http://www.programacion.com/tutorial...izacion_select

jachguate

20-06-2005 17:10:07

Podes lanzar la inserción en la segunda tabla desde un trigger en la base de datos, o desde el evento before/after post de tu programa de delphi.

Saludos.

dmagui

20-06-2005 20:14:17

Y si lo quiero usar con un dataset como lo haria?

La franja horaria es GMT +2. Ahora son las 12:45:08.