Hola.
Cita:
A ver Form1, es el principal, los demás están disponibles (Project - Options - Forms - Available forms), por eso las creo en tiempo de ejecución: la Form2 desde la form1, y la Form3 desde la form2.
|
Estimado, ahora que sé como haces la creación de los forms, te diría que el error no se provoca en ella ni en el pasaje de datos de Form3 a Form2 y Form1.
A ver, esta fué la prueba que hice:
Form1:
Código Delphi
[-]
implementation
uses Unit2;
procedure TForm1.btAbrirForm2Click(Sender: TObject);
begin
Form2:= TForm2.Create(self);
try
Form2.ShowModal;
finally
Form2.Free;
end;
end;
Form2:
Código Delphi
[-]
implementation
uses Unit3;
procedure TForm2.btAbrirForm3Click(Sender: TObject);
begin
Form3:= TForm3.Create(self);
try
Form3.ShowModal;
finally
Form3.Free;
end;
end;
Form3:
Código Delphi
[-]
implementation
uses Unit2, Unit1;
procedure TForm3.btPasarTextClick(Sender: TObject);
begin
Edit1.Text:= 'Form3.Edit1';
Edit2.Text:= 'Form3.Edit2';
Edit3.Text:= 'Form3.Edit3';
Edit4.Text:= 'Form3.Edit4';
Form1.Edit1.Text:= Edit1.Text;
Form1.Edit2.Text:= Edit2.Text;
Form2.ECodGrupo.Text:= Edit3.Text;
Form2.EDescGrupo.Text:= Edit4.Text;
end;
De ese modo transfiere los valores desde Form3 a Form1 y Form2 sin ningún tipo de error.
Cita:
Sospecho que me están evadiendo con la respuesta
|
Creo que estás confundido no sólo con el problema sino también con el juicio que emites, nadie ha tratado de evadir las respuestas, aquí cada uno aporta lo que su conocimiento y experiencia le indica y sin percibir un centavo por ello.
Cita:
considero que mi consulta ya ha sido lo suficientemente explicada
|
No, no es así. Recién en el anteúltimo mensaje nos enteramos el órden de creación.
Cita:
agradezco que me colaboren con el problema, pero si no saben como ayudar por favor no confundan más...
|
Lamento muchísimo si en nuestro afán de brindarte ayuda pudimos confundirte aún más.
Y para que no quede ninguna duda de nuestra buena voluntad, te adjunto el ejemplo para que puedas cotejarlo con tu código.
Saludos y no te olvides de leer nuestra
guía de estilo.