Aviso
Autor: Eurai Criado: 01/01/2016 Atualizado: 09/05/2025Descrição
Aviso - Apresenta Caixa/Tela. Possibilidade de Customizar botões, texto, mensagens, etc…. |
Sintaxe
Aviso( <cTitulo>, <cMensagem>, <aBotoes>, <nTamTela>, <cSubTitulo>, <nRotAut>, <cBitMap>, <lEditMemo>, <nTimer> ) |
Parâmetros
Par | Nome | Tipo | Descrição | Default | Obg | Ref |
01 |
cTitulo | Caracter | Titulo a ser Exibido | |||
02 | cMensagem | Caracter | Mensagem a ser Exibida na Tela | |||
03 | aBotoes | Array | Botões a ser Apresentado na tela | |||
04 | nTamTela | Numérico | Tamanho da Tela. Valores: 1, 2 ou 3 | X | ||
05 | cSubTitulo | Caracter | SubTitulo. Titulo apresentado abaixo do Titulo definido | |||
06 | nRotAut | Numérico | Reservado Sistema | |||
07 | cBitMap | Caracter | Nome da Imagem ser apresentado. Imagem compilada no APO | |||
08 | lEditMemo | Boolean | Permite editação do Memo? | |||
09 | nTimer | Numérico | Segundos para a Tela ser fechada Automaticamente |
Retorno
Retorno | Tipo | Descrição |
nRet | Numérico |
Número da opção que foi Selecionada. Clique no botão. |
Exemplo
#INCLUDE "TOTVS.CH" User Function AVISO() Local nOpc := 0 nOpc := Aviso( "UniversoADVPL", 'Mensagem', { "Sim", "Não", "Sim - Todos", "Não - Todos" }, ; 3, "Titulo da Descrição",, 'ENGRENAGEM', .F., 5000 ) //nOpc := Aviso( "UniversoADVPL", 'Mensagem', { "Sim", "Não", "Sim - Todos", "Não - Todos", 3, "Titulo da Descrição",, 'ENGRENAGEM', } ) //nOpc := Aviso( "UniversoADVPL", 'Mensagem', { "Sim", "Não", "Sim - Todos", "Não - Todos" } ) If nOpc == 1 MsgInfo( 'Sim', 'UniversoADVPL' ) ElseIf nOpc == 2 MsgInfo( 'Não', 'UniversoADVPL' ) ElseIf nOpc == 3 MsgInfo( 'Sim - Todos', 'UniversoADVPL' ) ElseIf nOpc == 4 MsgInfo( 'Não - Todos', 'UniversoADVPL' ) Endif Return( Nil )
Resultado
Informações adicionais
aBotões |
Máximo de 5 |
nTamTela |
Tamanho da Tela são obtidos automaticamente caso não passe por parâmetro |
Botão "Timer Off" |
Adicionado automaticamente quando definido parâmetro nTimer |
Gostou? Compartilhe com seus amigos e deixe um comentário! 😎
Discussão (0)
Sem comentários ainda
Realize o LOGIN no site para poder comentar