Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   Crear una ventana de dialogo (https://www.clubdelphi.com/foros/showthread.php?t=10330)

Javier_A 17-05-2004 08:42:13

Crear una ventana de dialogo
 
Saludos a todo@s.
Hace tiempo lo hice y ya no se como.
Es como la ventana del showmessage, pero permite seleccionar dos opciones,( Borrar/Anular, Continuar/Cerrar, etc.. ), ( Incluso creo que se podian poner mas de 2 ).
No quisiera tener que crear un form con 2 botones para realizar una accion de este tipo.
¿ Conoceis la forma ?
Muchas gracias y un saludo a tod@s

Nuria 17-05-2004 10:15:16

Hola Javier!

Lo que buscas es MessageDlg. Ejemplo:

Código Delphi [-]
if MessageDlg('¿Seguro que desea está función?.',
                mtConfirmation, [mbYes,mbNo], 0) = mrYes then begin
  .....
  .....
  .....
end

También con el InputBox puedes pedir al usuario, algún dato. Ejemplo:

Código Delphi [-]
varNombre:= InputBox('Introduce tu nombre :','');

Espero que te sirva.

Saludos! :)

Javier_A 17-05-2004 10:36:33

¡¡¡ Eso es !!!, muchas gracias Nuria, era lo que estaba buscando.

Saludos

__cadetill 17-05-2004 11:34:11

Ampliando algo la respuesta de Nuria, con MessageDlg los botones te saldrán siempre en inglés (Yes, No, Cancel,....). Si quieres que los botones te salgan en el idioma de Windows, usa el MessageBox de Application

Código:

Application.MessageBox('Mi texto', 'Mi título', MB_Ok or MB_ICONWARNING)
Para ver más opciones de botones, imágenes a mostrar, ..... te remito a la ayuda de Delphi


La franja horaria es GMT +2. Ahora son las 07:13:11.

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