Form

[roman]

Empezado por BrunoBsso

Bueno, la única solución que le veo es desde el form que lo invoca.

Puede hacerse como lo indiqué en mi primer mensaje. No obstante, yo concuerdo más contigo en el sentido de que quien debe hacer la comprobación es el formulario que llama.

// Saludos

[shoulder]

Gracias a todos, probe
if nvacio = 1 thenbeginIf Form4.visible = true thenform4.close;end;Pero me pasa de largo, tendria que existir una instancia porterior al onActivate, para cerralo ahi.

[roman]

La respuesta está desde mi primer mensaje.

// Saludos

[BrunoBsso]

Empezado por roman

La respuesta está desde mi primer mensaje.

// Saludos

Empezado por roman

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.

Ahí tenés la solución de roman que es pasándole messages.

Empezado por BrunoBsso

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;

Ahí tenés mi solución que es verificar antes de llamar al formulario.
Las dos te van a andar perfecto, parece que no las leíste.