Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   Cerrar formularios (https://www.clubdelphi.com/foros/showthread.php?t=31104)

zvf 28-04-2006 02:16:28

Cerrar formularios
 
Hola a todos!

Tengo dos formulario, uno se llama FPrincipal, el cual manda llamar a FUsuario.
Lo que pasa es que mando llamar FUsuario, y al momento de escribir la linea de codigo:
Código Delphi [-]
     FUsuario.close;

Cierra el formulario FUsuario, pero automaticamente despues se ejecuta el procedimiento
Código Delphi [-]
 procedure TFPrincipal.FormActivate(Sender: TObject);
y yo no quiero que se ejecute, quiero que solo cierre el formulario FUsuario, y deje las ventanas de FPrincipal tal cual están, sin volver de nuevo al inicio.

¿ Hay forma de hacerlo?

roman 28-04-2006 02:47:30

Supongo que tienes código en el evento OnActivate de FPrincipal que no quieres que vuelva a ejecutarse. En ese caso quiza dicho código estaría mejor en el evento OnShow. De no ser esto factible entonces podrías valerte de una variable booleana que te sirva de bandera para saber si es la primera vez que se ejecuta dicho evento:

Código Delphi [-]
procedure TFPrincipal.FormActivate(Sender: TObject);
begin
  if PrimeraVez then
  begin
    { Tu código }
  end;
end;

// Saludos

zvf 28-04-2006 17:11:34

¡Gracias!
Se solucionó enviandolo al evento onshow.
:D


La franja horaria es GMT +2. Ahora son las 21:40:18.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi