problema traspaso de datos entre formularios hijos

[vtdeleon]

Saludos,

Chequeate este hilo:
http://www.clubdelphi.com/foros/show...8484#post78484

Creo que te pueden ayudar. Esta de dos formas, con Form normales y tambien MDIChild.

Hasta luego y suerte.

[VRO]

Os paso el codigo que me pediste delphi.com.ar, sobre la pregunta que he hecho de declarar las variables globales y pulsar en el grid y que me pase los datos al formulario que le llama.

Os explico más detalladamente lo que pretendo conseguir, el Form2 es un formulario de gestión de clientes, uno de los botones es el de busqueda, que es el que yo pulso y en el creao el Form2_1 de la siguiente forma:

//En el Form2 botón de busqueda

Código Delphi [-]

 procedure TForm2.buscarcliClick(Sender: TObject);
var
  cliente: TForm2_1;
begin

  cliente:=TFoorm2_1.Create(Application);
  cliente.Show;
end;

En el Form2_1 tengo una DBGrid que contiene los datos del todos los clientes dados de alta hasta el momento, cuando pincho en el grid sobre uno de ellos sus datos expuestos en el grid deben pasar a los TDBEdit del Form2 y así se realiza la busqueda de un cliente para observar sus datos. Para ello utilizo el siguiente codigo:

//Declaro las variable globales en el public del Form2_1

Código Delphi [-]

cod,tipo,nif,nom,dir,pobla,cp,pro,p,fn,tlf,movil,s:String;

//En el evento OnClik del DBGrid hago lo siguiente:

Código Delphi [-]

procedure TForm2_1.DBGridCellClick(Column: TColumn);
begin
cod:=cli.Fields[0].Text;
  tipo:=cli.Fields[1].Text;
  nif:=cli.Fields[2].Text;
  nom:=cli.Fields[3].text;
  dir:=cli.Fields[4].Text;
  pobla:=cli.Fields[5].Text;
  cp:=cli.Fields[6].Text;
  pro:=cli.Fields[7].Text;
  p:=cli.Fields[8].Text;
  fn:=cli.Fields[9].Text;
  s:=cli.Fields[10].Text;

  tlf:=cli.Fields[11].Text;
  movil:=cli.Fields[12].Text;

  //Salgo del Form2_1
  free;
end;

yo pienso que lo normal sería que ahora despues de cerrar el Form2_1, en el Form2 igualasemos los TDBEdit al valor de las variables globales, pero sín hacer esto último sale y no se porque?

Y esa es la razón por la que quiero pasar los datos del DBGrid a los TDBEdit del Form2.

Gracias a ambos, probaré también tu forma vtdeleon.

[[Lepe]]

"Si ya sale, sin igualar los datos", significa que el DBGrid de búsqueda está enlazado al mismo dataset (tabla o consulta) que el form donde quieres poner los datos, así, al hacer un clic en el Grid de búsqueda, el apuntador de la tabla Clientes se mueve al que has hecho clic, y por tanto, el Form que tienes los DBedits (que tambien está apuntando a la tabla Clientes), se actualiza y te muestra el cliente.

Solución: No necesitas variables globales. Lo único que necesitas es que el usuario haga clic en la ventana de búsqueda.

Un saludo

[VRO]

Jo!!!, mil gracias.

No puedo ser tan tonta, de no darme cuenta de esto.

Mil gracias.

[[Lepe]]

A todos nos pasa.... El bosque no te deja ver el arbol

Un saludo