[BrunoBsso]

Empezado por 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

Tenés razón, no lo había probado en otro form que no sea el main.
Bueno, la única solución que le veo es desde el form que lo invoca.

Código Delphi [-]
//Form1 llama a Form4 en un OnClick de cualquier botón
procedure TForm1.Button1Click(Sender: TObject);
begin
  Form4.Show;
end;

//Pero en vez de llamarlo podría verificar NVacio = 1 antes
procedure TForm1.Button1Click(Sender: TObject);
begin
  if NOT(NVacio = 1) then
    Form4.Show;
end;