Ver Mensaje Individual
  #2  
Antiguo 27-03-2009
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is online now
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.295
Reputación: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Desde el form1 llamas al segundo de esta forma:

Código Delphi [-]
  // Show
  Form2.ShowModal;
  // Recuperamos el texto o lo que quiereas del segundo form
  // Nos aseguraremos de que no se haya destruido (*1*)
  Edit1.Text := Form2.RetVal;
  // Lo liberamos nosotros (*2*)
  Form2.Free;

En el form2 creamos una propiedad para guaradar el dato:

Código Delphi [-]
      property RetVal:string read FRetVal write FRetVal;

Al cerrar el segundo form, guardamos el valor para luego consultarlo

Código Delphi [-]
  // Nos guardamos el valor en la propiedad para que luego lo consulte form1
  Self.FRetVal := Edit1.Text;
  // cerrar
  ModalResult := mrOk;

Muy imprtante que no se destruya el form2 al cerrar, ya que el form1 debe consultar el valor (*1*) y ya se encargará de destruirlo form1 (*2*)

Código Delphi [-]
procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  Action := caHide;
end;

Creo que eso es lo que necesitas, en tu caso deberás quedarte con la referencia al registro selecionado y al volvar activarlo en tu Grid.

Un saludo.
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita