Crear una ventana de dialogo

[Javier_A]

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]

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]

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

Saludos

[__cadetill]

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

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