Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   pasaje de datos entre dbgrids (https://www.clubdelphi.com/foros/showthread.php?t=46214)

mastergav 26-07-2007 16:04:28

pasaje de datos entre dbgrids
 
soy de la universidad tecnologica de resistencias,chaco,argentina.
estoy haciendo un programa par la materia cliente/servidor de 4º año, y nos pidieron que elijamos un programa pra relizar el trabajo practico.
por otrosamigos que ya la cursron me decidi por delphi 7.
mi problema es cuando quiero hacer un formulario maestro/detalle.
lo que yo quiero hacer es tener en um form2 un dbgrid con los datos de los productos, y seleccionar desde alli los productos que necesito y enviarlos al form1, que es donde tengo mi formulario maestro/detalle, o sea al dbgrid en el form1.
alguien me puede decir como hacer eso'

eduarcol 26-07-2007 16:23:28

el dbgrid esta mostrando los datos de un dataset, lo que tienes que hacer es que desde el Form1 luego que cierres el Form2 lees todos los datos que estan en ese momento en el dataset.

Para que funcione debes hacer el llamado a form2 como modal

mastergav 27-07-2007 00:20:42

aclaracion
 
aclaracion:
en el form2 el dbgrid contiene 10 productos, entonces lo que yo quiero es elgir el producto 1 que esta en el dbgrid del form2 y enviarlo al dbgrid en el form1, luego elegir el producto 5 en el dbgrid del form2 y enviarlo al dbgrid en el form1 y asi sucesivamente,
de esta forma podria completar el detalle de mi formulario maestro detalle de forma automatica

eduarcol 27-07-2007 01:23:00

a ver es algo asi

Código Delphi [-]
if Form2.ShowModal then
begin
   Form1.MiDataSet.Insert;
   Form1.Midataset.Fields[0].Value :=  Form2.Midataset.Fields[0].Value
   Form1.Midataset.Fields[1].Value :=  Form2.Midataset.Fields[1].Value
   Form1.Midataset.Fields[2].Value :=  Form2.Midataset.Fields[2].Value
   Form1.Midataset.Fields[3].Value :=  Form2.Midataset.Fields[3].Value
                                     ....
   Form1.Midataset.Fields[n].Value :=  Form2.Midataset.Fields[n].Value
   Form1.MiDataSet.Post;
end;

a eso me refiero en mi post anterior no hay una funcion magica, al menos no que yo conozca, jejeje


La franja horaria es GMT +2. Ahora son las 01:14:40.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi