Como extraer datos de un DBgrid a otro DBgrid

[mickey]

Hola delphines, a ver si pueden ayudarme con esto.!!

Tengo 3 tablas en un mismo form las cuales son llamadas FACTURAH(H = header), FACTURAD(D= detail) y CLIENTE....gueno, la tabla FACTURAD que contiene los campos (codigo, codigo_producto, cantidad, total, etc...) la tengo conectada a un DBgrid, mi pregunta es la siguiente......

Como puedo desde ese DBgrid abrir otro form que tendra por ende otro DBgrid(lo cual sé hacer, programado en el evento OnDblClick o OnClik del DBgrid) extraer los valores de los campos que me interesan dando doble click, por ejemplo, CODIGO_PRODUCTO, que estara en el otro form tambien, VALOR y cualquiera de los demas campos......tengo una idea bana, pero si pueden por favor ayudenme, puesto que con esto no me funciona....

procedure TProducto_factura.DBGrid1DblClick(Sender: TObject);
begin
Refigerio.TfacturadCODIGO_PRO.Value := Table1ID_PRODUCTO.Value;
Producto_factura.Close;
end;

Pero cuando hago esto no me envia ningun valor al form de donde llamo a este (llamado PRODUCTO_FACTURA).

Alguna documentacion por ahi que pueda leer sobre esto....??

Gracias anticipadas!!

[roman]

¿Qué no hace falta anteponer Producto_factura. a Table1ID_PRODUCTO.Value?

// Saludos

[mickey]

Hola roman!

Gracias por responder tan rapido.....lo que pasa es que

table1ID_PRODUCTO.Value
esta en el form local, que es de donde quiero extraer la data!!!....

alguna otra observación??

Gracias anticipadas

[roman]

Empezado por mickey

table1ID_PRODUCTO.Value
esta en el form local, que es de donde quiero extraer la data!!!....

Bueno, yo preguntaba por que dices que el segundo formulario lo abres para tomar datos de su grid. Si está también en el primer formulario entonces no entiendo de dónde tomas el dato.

¿Podrías aclarar?

// Saludos

[mickey]

Claro roman!

el codigo anterior esta en el segundo formulario de donde quiero extraer los datos y pasarlos al primer formulario que seria REFIGERIO, como sabras mucho mas que yo, ese es el evento DblClick, para cuando yo seleccione una celda, entonces en esta parte

procedure TProducto_factura.DBGrid1DblClick(Sender: TObject);
begin
Refigerio.TfacturadCODIGO_PRO.Value := Table1ID_PRODUCTO.Value;
Producto_factura.Close;
end;
Que solamente me pasaria el valor de el campo Id_producto a Codigo_pro y aqui cuando hago el doble click no me hace nada...osea, ningun dato se inserta en el primer dbgrid de mi primera forma REFIGERIO.....

(Este procedimiento lo pongo en el segundo formulario, de donde extraere los datos, no se si hay otra forma manito para hacer esta accion que deseo!!, si crees que hay otra forma, por favor participamela, soy novato, pero tal vez pueda entender tu hilo!!)

Gracias Anticipadas!!

[fkuong]

Hola Mickey:

He leido tu problemilla, me parece que quieres guardar el valor del ID_PRODUCTO en CODIGO_PRO. Correcto?, si es así, tu error es sencillo.

Primero, cuando trabajas en un DBGrid, y este está relacionado a una Tabla, el puntero del DBGrid es el mismo de la Tabla, es por ello que puedes leer el valor actual del registro. Hasta allí vas bien.

Ahora en el otro Form, supondo que la tabla Tfacturad esta en Open. La línea que te faltaría antes de la asignación del valor es el Insert, o Edit, pues sino, la asignación no tiene ningún efecto, luego colocaría el Post.

Con esas dos lineas creo que puedes solucionar tu problemas.