FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Opcion de cerrar el programa
Hola amigos, estoy tratando de enviar un mensaje de confirmacion de cierre de programa de la siguiente manera...
Aqui llamé a la ventana que hara la pregunta si realmente se quiere salir.... el boton aceptar
y el boton cancelar
pero resulta que el "aceptar" no hace nada...... y coloco cancelar y se cierra la ventana pero no el programa..... Alguna idea por favor..... parece facil pero no se me ocurre...
__________________
[Lo que a veces es tan facil, a veces parece imposible] |
#2
|
|||
|
|||
Usa el evento CloseQuery de la forma principal:
Tu forma Form_Pregunta solo va a tener un boton con su propiedad ModalResult en mrYes y otro más con su ModalResult en mrNo. También podría ser mrOk y mrCancel. Espero que te sirva... Saludos... |
#3
|
||||
|
||||
Propiedad ModalResult
Los botones tienen una propiedad que se llama ModalResult, es muy util en estos casos...
En la propiedad ModalResult del boton aceptar pon la opcion de mrOk, en la del boton cancelar pon mrCancel y en lugar de poner el codigo form_salir.showmodal pon If form_salir.showmodal = Id_Cancel then abort Con esto debe de quedar lo que quieres hacer. Saludos, Dios te bendiga |
#4
|
||||
|
||||
Me olvide de un detalle
En los procedimientos de OnClick de los botones Aceptar y Cancelar no tienes que poner nada de codigo.
|
#5
|
||||
|
||||
Hola, en vez de crear un formulario para preguntar si esta seguro de cerrar la aplicacion te conviene utilizar la funcion MessageDlg que puede hacer lo que necesitas. Busca en la ayuda de Delphi que hay un ejemplo.
Cita:
Saludos... |
#6
|
|||
|
|||
Gracias
Tenia el problema que no sabia cómo se podia hacer para sacar un mensaje da aviso antes de cerrar la ventana en Delphi.
Con la opción buscar he encontrado vuestros mensajes que me han solucionado el problema. Muchas gracias por vuestras aportaciones. Desconecia de la existencia de CanClose y de lo que hacia el evento OnCloseQuery. |
Herramientas | Buscar en Tema |
Desplegado | |
|
|
|