Pelo que conheço, o Harbour não tem nenhuma função com este nome.rogeriohfb escreveu:É possível alterar a função MSGINFO do Harbour ?
Código: Selecionar todos
// *---------------------------------------------------------------------------*
// Native Habour MsgInfo
// *---------------------------------------------------------------------------*
PROC My_MsgInfo( cMessage, cTitle )
LOCAL nWindow := wapi_GetActiveWindow()
wapi_MessageBox( nWindow, cMessage, cTitle, WIN_MB_ICONASTERISK )
RETURN/* wapi_MessageBox()/wapi_MessageBeep() flags */
#define WIN_MB_OK 0x00000000
#define WIN_MB_OKCANCEL 0x00000001
#define WIN_MB_ABORTRETRYIGNORE 0x00000002
#define WIN_MB_YESNOCANCEL 0x00000003
#define WIN_MB_YESNO 0x00000004
#define WIN_MB_RETRYCANCEL 0x00000005
#define WIN_MB_CANCELTRYCONTINUE 0x00000006
#define WIN_MB_ICONHAND 0x00000010
#define WIN_MB_ICONQUESTION 0x00000020
#define WIN_MB_ICONEXCLAMATION 0x00000030
#define WIN_MB_ICONASTERISK 0x00000040
#define WIN_MB_USERICON 0x00000080