Form
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. |
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 |
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;
Saludos! |
¿Seguro que así se cierra?
|
Cita:
|
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 |
Hola
Me imagino: Saludos |
Cita:
Bueno, la única solución que le veo es desde el form que lo invoca.
|
Cita:
Saludos! |
Cita:
// Saludos |
Form cerrarlo en el onActivate
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. |
La respuesta está desde mi primer mensaje.
// Saludos |
Ya te dimos 2 soluciones
Cita:
Cita:
Cita:
Las dos te van a andar perfecto, parece que no las leíste. |
La franja horaria es GMT +2. Ahora son las 00:35:41. |
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