nLinha / nColunaPosição do controle.
AdvPL Guia@ <nLinha>, <nColuna> BUTTON <cTexto> SIZE <nLargura>, <nAltura> PIXEL OF <oObjetoRef> ACTION <expressao>Documenta o comando visual @ ... BUTTON da ficha TOTVS.
Embora o título oficial seja BUTTON(), a sintaxe documentada é um comando iniciado por @, com posição, texto, tamanho, objeto pai e ação. Não se trata de uma função Button() isolada. A variante desta ficha usa BUTTON cTexto; a página histórica relacionada do site documenta uma variante com CAPTION e não deve ser misturada automaticamente. O exemplo cria um botão em diálogo e mantém a ação restrita a registrar uma escolha e fechar a janela. (TOTVS, s.d., ref. 1)
@ <nLinha>, <nColuna> BUTTON <cTexto> SIZE <nLargura>, <nAltura> PIXEL OF <oObjetoRef> ACTION <expressao>nLinha / nColunaPosição do controle.
cTextoTexto do botão.
nLargura / nAlturaDimensões em pixels.
oObjetoRefObjeto pai.
expressaoAção ao ativar o botão.
Comando de criação de controle; não possui retorno de confirmação documentado.
#Include "TOTVS.ch"
User Function EdButton()
Local oDlg
Local nEscolha := 0
DEFINE DIALOG oDlg TITLE "Teste editorial" FROM 0,0 TO 120,280 PIXEL
// Acao local: nenhuma gravacao.
@ 20,20 BUTTON "Confirmar" SIZE 80,20 PIXEL OF oDlg ACTION (nEscolha := 1, oDlg:End())
ACTIVATE DIALOG oDlg CENTERED
ConOut(cValToChar(nEscolha))
Return NilSe a ação do botão ocorrer, nEscolha passa a 1; o valor começa em zero para distinguir fechamento sem essa ação. Em revisão: exemplo editorial não compilado nem executado em Protheus. Conferir includes, release, RDD e contexto antes de homologar.
© 2026 Usina.BR. Todos os direitos reservados. TOTVS, Protheus, Microsiga e seus respectivos logotipos são marcas de seus titulares. O AdvPL Guia é independente e utiliza citações limitadas, atribuídas e justificadas por finalidade educativa. Consulte os Termos de Uso. Termos de Uso
Comentários
Ainda não há comentários aprovados.
Entre com Google ou Microsoft para comentar.