Aviso

Descrição:

Monta uma janela exibindo o texto desejado e disponibiliza opções de escolha para o usuário.

Programa Fonte:

MATXFUNA.PRX

Sintaxe:

Aviso ( cTitulocMsgaBotoes [ nSize ] [ cText ] [ nRotAutDefault ] [ cBitmap ] [ lEdit ] [ nTimer ] [ nOpcPadrao ] ) --> nOpcAviso

Retorno:
nOpcAviso

Número da opção escolhida pelo usuário.

Exemplos

#include "protheus.ch"User Function Aviso()Local cArq := "TESTE.TXT"Local cTit:= "Atencao!"Local aOp 	:= {}Local cMsg 	:= ""Local nOpWhile .T.	If !File(cArq)	    aOp:= {"Sim","Nao","Cancela"}	    cMsg:= "O arquivo "+cArq+" não foi encontrado!”	    cMsg:= cMsg + " Tenta novamente?"	    nOp:= Aviso(cTit,cMsg,aOp)                   	    If nOp == 1 // Sim               	    	ApMsgAlert("Usuário tentando novamente")		    Loop	    ElseIf nOp == 3 // Cancela	    	ApMsgAlert("Usuário cancelou operação")	    	    	Return	    Else // Nao ou ESC                   	    	ApMsgAlert("Usuário não tentou novamente")	    	    	Exit	 	Endif	 EndifEndReturn

Parâmetros:

Nome	Tipo	Descrição	Default	Obrigatório	Referência
cTitulo	Caracter	Título da janela.		X
cMsg	Caracter	Texto a ser apresentado na janela.		X
aBotoes	Vetor	Array com as opções dos botões.		X
nSize	Numérico	Tamanho da janela. Pode ser 1, 2 ou 3.
cText	Caracter	Titulo da Descrição (Dentro da Janela)	cTitulo
nRotAutDefault	Numérico	Opção padrão usada pela rotina automática.
cBitmap	Caracter	Nome do bitmap a ser apresentado (AVISO: O parâmetro cBitmap foi depreciado, para que a função fique de acordo com o layout do Protheus 12)
lEdit	Lógico	Determina se permite a edição do campo memo.	.F.
nTimer	Numérico	Tempo para exibição da mensagem em segundos.
nOpcPadrao	Numérico	Opção padrão apresentada na mensagem.

Atalhos

Páginas filhas