Cria barra de botões padrão na janela
Sintaxe
EnchoiceBar( oDlg, bOk, bCancelar, [ lMensApag ] , [ aBotoes ] ) -> nil
Descrição
Esta função cria uma barra com botões padrão e outros passados como parâmetro na janela tambem passada por parâmetro. A EnchoiceBar dever ser chamada antes do ACTIVATE da janela.
Exemplo
User Function <nome-do-programa>()
Local oDlg
DEFINE MSDIALOG oDlg TITLE “Exemplo” FROM 00,00 TO 300,400 PIXEL
ACTIVATE MSDIALOG oDlg CENTERED ON INIT,;
EnchoiceBar(oDlg,{|| APMsgInfo(“Ok”)}, {|| ApMsgInfo(“Cancelar”)}, , {{“BMPINCLUIR”,{|| APMsgInfo(“Teste”)},”Teste”}})
Return