Cerrar formularios

[zvf]

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]

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]

¡Gracias!
Se solucionó enviandolo al evento onshow.