Form

[shoulder]

Hola, porque no me cierra una ventana cuando en el onActivate, doy esta orden


if nvacio = 1 then
form4.close;


entra dentro del if, pasa por el close, pero sigue de largo, no se como hacer.
Gracias.

[roman]

Por favor, asigna títulos adecuados a tus mensajes y utiliza las etiquetas [code] o [delphi] para escribir código.

En cuanto a tu pregunta, no puedes cerrar una ventana desde el OnActivate u Onshow; esto es, no puedes cerrar una ventana que aun no termina de mostrarse.

Lo que puedes hacer es lanzar enviar un mensaje personalizado con PostMessage y en el manejado de dicho mensaje mandar cerrar la ventana. Busca AfterShow o CM_AFTERSHOW en los foros para ver un ejemplo de lo que digo.

// Saludos

[BrunoBsso]

En realidad SI se puede hacer eso. En el evento OnActivate del form podes cerrarlo sin problemas. Al menos eso me demuestra D2010.
Te recomiendo ke directamente no uses el identificador del form (o sea, "form4"). Simplemente ponele Close;
Sino, también podrias ponerle Self.Close;

Código Delphi [-]
procedure TForm1.FormActivate(Sender: TObject);
begin
  Close;
end;

Saludos!

[Casimiro Notevi]

¿Seguro que así se cierra?

[BrunoBsso]

Empezado por Casimiro Notevi

¿Seguro que así se cierra?

Sip. Estaba seguro que si, pero lo probé antes de comentarlo por las dudas

[roman]

A mi me funciona tanto en el OnShow como en el OnActivate, pero, sólo si es el formulario principal. Si se usa Show para mostrar otro formulario, entonces no cierra. De hecho, me lanza la excepción:

---------------------------
Project1
---------------------------
Cannot change Visible in OnShow or OnHide.
---------------------------
Aceptar
---------------------------

// Saludos