WM'S de cierre de windows?

[[marceloalegre]]

Despues de meditar un poco todo esta "aventura" que queria generar pense... debo tener algo al cerrar

y en el CloseQuery tengo un : CanClose:=False;

sacando esto el windows cierra perfectamente....

pero... he arruinado mi objetivo de cuando puse esa linea... evitar que me cierren la aplicacion con un alt + f4 .... que puedo hacer?
Dilema: dejo la linea.. y no me cierra el windows
saco la linea.. y me cierran la aplicacion los usuarios

[roman]

Empezado por kanvictor

Dilema: dejo la linea.. y no me cierra el windows
saco la linea.. y me cierran la aplicacion los usuarios

Así es. El problema está en que el evento OnCloseQuery no distingue si la aplicación se está cerrando porque se cierra la sesión de Windows o simplemente porque un usuario la cierra.

Lo único que tienes que hacer es ayudarle un poco. Declara una variable booleana TerminandoSesion que normalmente estará en false y que le indicará al evento si debe o no cerrarse:

Código Delphi [-]
procedure Form1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
  CanClose := TerminandoSesion;
end;

En el manejador del mensaje WM_QUERYENDSESSION pones TerminandoSesion en true.

// Saludos

[[marceloalegre]]

GRANDE ROMAN!!! SIEMPRE CON ESTOS "MILAGROS" PARA LOS MORTALES...

jaja era tan simple ahora que lo veo!, pero bueno, era cuestion de que alguien aclarara la situación, Muchas gracias!

[roman]

Aunque si yo fuera tu usuario, podría cerra tu aplicación sin salirme de Windows:

Para ello abriría el block de notas y escribiría cualquier cosa sin guardar el archivo. Luego le diría a Windows que cierre la sesión. Tu aplicación se va a cerrar pero entes de que Windows se cierre, el bloc de notas me preguntará si deseo guardar los cambios. Le pongo que cancele y ¡listo!, Windows no se cierra pero tu aplicación sí.



Claro, hay un remedio. No sé si es la mejor opción pero a mi me ha funcionado.

// Saludos

[[marceloalegre]]

Ya le puse el remedio tambien, todo excelente, Mil gracias! me solucionaste un problema que me estaba retrasando mucho!!!

Graciassss!