Cita:
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