Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Composition Setup
import.css=/download/attachments/327912/newLayout.css
Portuguese

Pagetitle
Aviso
Aviso

Função: Aviso
Abrangências: Microsiga Protheus 11 , Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Nível de Acesso: Nível 1 (Acesso Clientes)
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(numerico)
  • 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:
NomeTipoDescriçãoDefaultObrigatórioReferência
cTituloCaracterTítulo da janela.X
cMsgCaracterTexto a ser apresentado na janela.X
aBotoesVetorArray com as opções dos botões.X
nSizeNuméricoTamanho da janela. Pode ser 1, 2 ou 3.
cTextCaracterTitulo da Descrição (Dentro da Janela)cTitulo
nRotAutDefaultNuméricoOpção padrão usada pela rotina automática.
cBitmapCaracterNome do bitmap a ser apresentado.
lEditLógicoDetermina se permite a edição do campo memo..F.
nTimerNuméricoTempo para exibição da mensagem em segundos.
nOpcPadraoNuméricoOpção padrão apresentada na mensagem.