Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Lazarus, FreePascal, Kylix, etc. (https://www.clubdelphi.com/foros/forumdisplay.php?f=14)
-   -   Messagebox (https://www.clubdelphi.com/foros/showthread.php?t=66591)

bothy 02-03-2010 11:21:10

Messagebox
 
Como Crear Los Menssagebox .. hacemos de cuenta que damos click en un boton de cerrar y nos pregunta desea salir "si" o "no" si damos si se sierra pero si damos no . no se sierra..

Ñuño Martínez 02-03-2010 11:37:24

Cita:

Empezado por bothy (Mensaje 355333)
Como Crear Los Menssagebox .. hacemos de cuenta que damos click en un boton de cerrar y nos pregunta desea salir "si" o "no" si damos si se sierra pero si damos no . no se sierra..

Pues va a ser un poco difícil que sierre sin dientes. (Lo que sí me ha dejado matado es que primero lo escribes bien y luego mal :confused:)

Respecto al problema, tienes varias opciones pero te recomiendo que utilices "Application.MessageBox":
Código Delphi [-]
Function Application.MessageBox (Text, Caption: PChar; Flags: longint) : Integer;

Busca en la ayuda y en el foro (si miras al pie de esta misma página tienes dónde empezar), aunque aquí tienes una pequeña introducción.

Neftali [Germán.Estévez] 02-03-2010 13:24:33

Cita:

Empezado por bothy (Mensaje 355333)
Como Crear Los Menssagebox .. hacemos de cuenta que damos click en un boton de cerrar y nos pregunta desea salir "si" o "no" si damos si se sierra pero si damos no . no se sierra..

Básicamente piensa que los cuadros de Diálogo no realizan operaciones, las operaciones las has de realizar tú cuando se cierra el cuadro.
Estos lo únicos que hacen es devolver el valor pulsado por el usuario.
Dependiendo de ese valor tú haces unas cosas u otras.

Puedes hacer esto más fácil utilizando alguno de los muchos asistentes que hay para Delphi, por ejemplo los GExperts o CnWizards.





Estos asistentes te generan el código necesario para mostrar los cuadros.

bothy 03-03-2010 07:38:23

muy bien colegas problema resuelto...

hise esto


if Application.MessageBox( '¿Desea salir?', 'Catalogo Niños',
MB_ICONQUESTION OR MB_YESNO ) = ID_YES then

Ñuño Martínez 03-03-2010 10:13:08

Bien hecho. :)


La franja horaria es GMT +2. Ahora son las 09:54:59.

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