Función Msgbox
Personalmente creo que tanto la WinAPI MessageBox y Aplicación.MessageBox y MessageDlg funciones cludgy y siempre agregue la siguiente función para cada aplicación.
la función MsgBox(const Msg: string
& nbsp MsgType: Integer = MB_OK o MB_ICONSTOP): Integer
begin
& nbsp Resultado := MessageBox(de Aplicación.Manejar, PChar(Msg),
& nbsp & nbsp & nbsp PChar(de Aplicación.Título), MsgType)
fin
se requiere que las Formas.pas es en la cláusula uses.
Funcion Msgbox
Funcion Msgbox : Multi-millones de consejos para hacer su vida mas facil.
Personalmente creo que tanto la WinAPI MessageBox y Aplicacion.MessageBox y MessageDlg funciones cludgy y siempre agregue la siguiente funcion para cada aplicacion.
la funcion MsgBox(const Msg: string
& nbsp MsgType: Integer = MB_OK o MB_ICONSTOP): Integer
begin
& nbsp Resultado := MessageBox(de Aplicacion.Manejar, PChar(Msg),
& nbsp & nbsp & nbsp PChar(de Aplicacion.Titulo), MsgType)
fin
se requiere que las Formas.pas es en la clausula uses.
Función Msgbox
By Consejos Y Trucos
Función Msgbox : Multi-millones de consejos para hacer su vida más fácil.