Ver Mensaje Individual
  #7  
Antiguo 12-06-2013
hectormea hectormea is offline
Registrado
NULL
 
Registrado: jun 2013
Posts: 1
Reputación: 0
hectormea Va por buen camino
gracias

Cita:
Empezado por Caro Ver Mensaje
Hola morfeo21, como te indican deberías utilizar la función Assigned, pero si en el OnClose de tu MDIChild liberaras con Action:=caFree; solo va a funcionar la primera ves ya que no te lo pone a nil, por lo que la siguiente ya no se abriría tu formulario.

Código Delphi [-]
//En el OnClose liberas con FreeAndNil
procedure TForm2.FormClose(.....);
begin
 FreeAndNil(Form2);
end;
 
//Y en la llamada a tu MDIChild
if Not Assigned(Form2) then
  Form2:=TForm2.create(Self);

Saluditos




muchas gracias soy nuevo en estoy y me a servido mucho!
Responder Con Cita