Árvore de páginas

Ponto-de-Entrada: TK070ABOT - Criação de botões na Enchoicebar
Versões: Microsiga Protheus 8.11 , Microsiga Protheus 10
Idiomas: Espanhol , Inglês
Descrição:

Esse ponto de entrada permite a criação de botões na Enchoicebar.

Programa Fonte
.PRW
Sintaxe

TK070ABOT - Criação de botões na Enchoicebar ( ) --> aBot

Retorno
    aBot(vetor)
  • Array deve conter as informações dos botões.
Exemplos
User Function TK070ABOT()Local aBot := {}	Alert("Ponto de Entrada TK070ABOT")	AAdd(aBot,{ "EDITABLE"	,	{|| Mensagem1()}, 'Teste 1','Teste 1'})	AAdd(aBot,{ "VERNOTA"	,	{|| Mensagem2()}, 'Teste 2','Teste 2'})	AAdd(aBot,{ "FILTRO"	,	{|| Mensagem3()}, 'Teste 3','Teste 3'})Return(aBot)                                               Static Function Mensagem1()	Alert('Teste 1')ReturnStatic Function Mensagem2()	Alert('Teste 2')ReturnStatic Function Mensagem3()	Alert('Teste 3')Return