No cerrar hasta guardar cambios
:cool: Hola amigos, mi pregunta es: Como puedo haser para que cuando a una aplicacion se le de click en el boton superior derecho con la x de serrar, le de al usuario la eleccion de cerrar o no cerrar, como cuando en word escribimos algo y sin guardar le damos click en ese mismo boton y nos envia el mensage.
y si se le dise que no lo cierre no lo hase.:p Saludos. |
Hola mario2000
Trata de hacer lo siguiente
Salud OS y bienvenido al foro. |
Para conseguir lo que deseas, debes emplear el evento OnCloseQuery:
Este evento se dispara en el momento de la orden del cierre del formulario y tiene un parámetro por valor (CanClose) que permite determinar si debe o no cerrarse. Si el valor es verdadero, se ejecuta el evento OnClose que corresponde al cierre, si se pone en falso, se cancela el cierre. MessageBox() es una función que permite mostrar en pantalla un cuadro de díalogo. Y regresa un valor que representa la acción del botón pulsado. Por ejemplo: la constante MB_YESNO, pemite mostrar dos botones: SI y NO. Y dependiendo de cual botón se pulse... se devuelve un valor que comparo con IDYES. Si es igual... se que se ha oprimido el botón SI. Fijate y estudia el evento onCloseQuery. Deberás codificar que hacer ante la orden SI o ante la orden NO. Saludos, |
Gracias
Muchas gracias amigos del foro son ustedes muy amables, me ha funcionado de maravilla.:D
|
La franja horaria es GMT +2. Ahora son las 08:22:52. |
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