Código en Delphi 6, válido para Delphi for win32 y CodeGear RAD Studio (Delphi win32) | ||
AlertDlg es un componente no visual que permitirá crear de forma rápida y sencilla ventanas de alerta y aviso.
Propiedades:
Buttons: Botones mostrados en la ventana de alerta. Son de tipo TMsgDlgButtons (mirar en ayuda de delphi)
Caption: Título de la ventana de alerta.
Color: Color utilizado como fondo de la ventana.
DlgPosX,
DlgPosY: Posición (X,Y) de la ventana en la pantalla. Si (-1,-1) entonces se situará en el centro de la pantalla.
DlgType: Tipo del icono de la ventana de alerta. Tipo TMsgDlgType (mtWarning, mtError, mtInformation, mtConfirmation, mtCustom). Mirar ayuda delphi.
HelpContext: Número de ID para ayuda de contexto. Es la ayuda que aparecerá en pantalla si se pulsa sobre el botón Help de la ventana de alerta.
HelpFile: Fichero de ayuda.
Icon: Icono que aparecerá en la ventana de alerta para el caso en que se haya elegido mtCustom como tipo de ventana (DlgType)
MsgInfo: Texto del mensaje que aparecerá en la ventana de alerta.
Métodos:
ShowModal: Muestra la ventana de alerta y espera la pulsación de uno de los botones de la misma para devolver un valor. Es un método sobrecargado por lo que hay varias formas de llamarlo :
AlertDlg1.ShowModal : Muestra la alerta y devuelve el valor del botón pulsado.
AlertDlg1.ShowModal(Msg): Muestra la alerta y devuelve el valor del botón pulsado. Cambia el texto de la ventana por el que se le pasa como parámetro. El texto original no se pierde.
AlertDlg1.ShowModal(Title,Msg): Muestra la alerta y devuelve el valor del botón pulsado. Ocurre lo mismo que en el caso anterior pero además cambia el Título (Caption) de la ventana por el pasado como parámetro, el caption antiguo no se pierde.
Eventos:
OnOpen : Evento que salta antes de mostrar la ventana de diálogo.
OnClose : Evento que salta después de cerrar la ventasna de diálogo. Uno de los parámetros que devuelve es el valor del botón pulsado, es decir, el mismo valor que devolver