MessageBox

MessageBox ( < cMensagem>, < cCabec>, < nOpc> ) --> nRet

(numerico)
• Retorna o número do botão de acordo com a opção de mensagem selecionada. Para mais informações dos números disponíveis do botões, consulte a área Observações.

// Opções do MessageBox
MB_OK                 0
MB_OKCANCEL           1
MB_YESNO              4
MB_ICONHAND           16
MB_ICONQUESTION       32
MB_ICONEXCLAMATION    48
MB_ICONASTERISK       64

// Retornos possíveis do MessageBox
IDOK                  1
IDCANCEL              2
IDYES                 6
IDNO                  7

User Function MessageBox()
  // Opções do MessageBox
  #define MB_OK                       0
  #define MB_OKCANCEL                 1
  #define MB_YESNO                    4
  #define MB_ICONHAND                 16
  #define MB_ICONQUESTION             32
  #define MB_ICONEXCLAMATION          48
  #define MB_ICONASTERISK             64
  
  // Retornos possíveis do MessageBox
  #define IDOK			    1
  #define IDCANCEL		    2
  #define IDYES			    6
  #define IDNO			    7
  
  // Executa os MessageBox e aguarda os valores de retorno
  nRet1 := MessageBox("MB_OK","",MB_OK)
  nRet2 := MessageBox("MB_OKCANCEL","",MB_OKCANCEL)
  nRet3 := MessageBox("MB_YESNO","",MB_YESNO)
  nRet4 := MessageBox("MB_ICONHAND","",MB_ICONHAND)
  nRet5 := MessageBox("MB_ICONQUESTION","",MB_ICONQUESTION)
  nRet6 := MessageBox("MB_ICONEXCLAMATION","",MB_ICONEXCLAMATION)
  nRet7 := MessageBox("MB_ICONASTERISK","",MB_ICONASTERISK)
Return