Tipo: Tela DOS/Windows

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

Sintaxe

Aviso(cTitulo,cMensagem,aOpcoes)

Parâmetros

cTitulo         – Titulo da janela.

cMensagem – Mensagem para ser exibida no interior da janela. O tamanho máximo é de 90 caracteres.

AOpcoes      – Array de caracteres com as opções para a montagem de menu (na versão DOS) ou dos botões (na versão Windows).

Retorna

nResp – Retorno. Retorna o número da opção escolhida pelo usuário.

Exemplo

Exemplo de uso da função Aviso:

While .T.

GravaArq() // Função qualquer (apenas p/exemplo)

If !File(ifTESTE.TXTle)

aOp:= {i.SimlO,l=NaolJ,l.Cancelal.}

cTit:= i.Atencao!l=

cMsg:= iMO arquivo TESTE.TXT nao foi gravado!lT

cMsg:= cMsg + iM Tenta novamente?l=

nOp:= Aviso(cTit,cMsg,aOp)

If nOp == 1 // Sim

Loop

ElseIf nOp == 3 // Cancela

Return

Else // Nao ou <ESC>

Exit

Endif

Endif

Exit

EndDo

// Faz o processamento…
Return

Deixe um comentário

O seu endereço de e-mail não será publicado. Campos obrigatórios são marcados com *

Necessita de ajuda?