|
Hombre a mi la solución mas sencilla me parece que es declarar un campo público de tipo TForm en el formulario que muestras al pulsar el botón en uno de los dos formularios anteriores, y en el momento de pulsar el botón le asignas el formulario de origen (Self)
En el formulario a mostrar:
TForm2 = class(TObject)
...
public
FormOrigen: TForm;
end;
...
procedure TForm2.DBGridDblClick(Sender: TObject);
begin
// por ejemplo, mostrar el formulario de origen
FormOrigen.Show;
end;
En el formulario de origen:
procedure Form1.Button1Click(Sender: TObject);
begin
Form2.FormOrigen := Self;
Form2.Show;
end;
|