TOTVSTEC

Árvore de páginas

Carregando...
Tempo aproximado para leitura: 9 minutos

Você está vendo a versão antiga da página. Ver a versão atual.

Comparar com o atual Ver Histórico da Página

« Anterior Versão 2 Próxima »

Classe: TButton

Cria um objeto do tipo botão.


Hierarquia

TSrvObject -> TControl -> TButton


Construtores
Create

Create

Método construtor da classe.


Sintaxe

TButton(): Create ( [ oWnd], [ nRow], [ nCol], [ cCaption], [ bAction], [ nWidth], [ nHeight], [ uParam8], [ oFont], [ uParam10], [ lPixel], [ uParam12], [ cMsg], [ uParam14], [ bWhen], [ bValid], [ uParam17] ) --> oObjeto


Parâmetros
NomeTipoDescriçãoObrigatórioReferência
oWndObjetoIndica a janela ou controle visual onde o botão será criado.
nRowNuméricoIndica a coordenada vertical em pixels ou caracteres.
nColNuméricoIndica a coordenada horizontal em pixels ou caracteres
cCaptionCaracterIndica o título do botão.
bActionBloco de códigoIndica o bloco de código que será executado quando clicar, com o botão esquerdo do mouse, sobre o botão.
nWidthNuméricoIndica a largura em pixels do botão.
nHeightNuméricoIndica a altura em pixels do botão.
uParam8NuméricoCompatibilidade.
oFontObjetoIndica o objeto do tipo TFont utilizado para definir as características da fonte aplicada na exibição do título do botão.
uParam10LógicoCompatibilidade.
lPixelLógicoIndica se considera as coordenadas passadas em pixels (.T.) ou caracteres (.F.).
uParam12LógicoCompatibilidade.
cMsgCaracterIndica a mensagem, do tipo dica de contexto (tooltip/hint), ao posicionar o ponteiro do mouse sobre o botão.
uParam14LógicoCompatibilidade.
bWhenBloco de códigoIndica o bloco de código que será executado quando a mudança de foco da entrada de dados, na janela em que o controle foi criado, estiver sendo efetuada. Observação: O bloco de código retornará verdadeiro (.T.), se o controle permanecer habilitado; caso contrário, retornará falso (.F.).
bValidBloco de códigoIndica o bloco de código de validação que será executado quando o conteúdo do objeto for modificado. Retorna verdadeiro (.T.), se o conteúdo é válido; caso contrário, falso (.F.).
uParam17LógicoCompatibilidade.
Retorno
    oObjeto()
  • Retorna o objeto criado.

Observações



Exemplos 
oTButton3 := TButton():Create( oDlg,062,002,"Botão 04",{||alert("Botão 04")},;                  40,10,,,,.T.,,,,,,)
New

New

Método construtor da classe.


Sintaxe

TButton(): New ( [ nRow], [ nCol], [ cCaption], [ oWnd], [ bAction], [ nWidth], [ nHeight], [ uParam8], [ oFont], [ uParam10], [ lPixel], [ uParam12], [ uParam13], [ uParam14], [ bWhen], [ uParam16], [ uParam17] ) --> oObjeto


Parâmetros
NomeTipoDescriçãoObrigatórioReferência
nRowNuméricoIndica a coordenada vertical em pixels ou caracteres.
nColNuméricoIndica a coordenada horizontal em pixels ou caracteres.
cCaptionCaracterIndica o título do botão.
oWndObjetoIndica a janela ou controle visual onde o botão será criado.
bActionBloco de códigoIndica o bloco de código que será executado quando clicar, com o botão esquerdo do mouse, sobre o botão.
nWidthNuméricoIndica a largura em pixels do botão.
nHeightNuméricoIndica a altura em pixels do botão.
uParam8NuméricoCompatibilidade.
oFontObjetoIndica o objeto do tipo TFont utilizado para definir as características da fonte aplicada na exibição do conteúdo do controle visual.
uParam10LógicoCompatibilidade.
lPixelLógicoIndica se considera as coordenadas passadas em pixels (.T.) ou caracteres (.F.).
uParam12LógicoCompatibilidade.
uParam13LógicoCompatibilidade.
uParam14LógicoCompatibilidade.
bWhenBloco de códigoIndica o bloco de código que será executado quando a mudança de foco da entrada de dados, na janela em que o controle foi criado, estiver sendo efetuada. Observação: O bloco de código retornará verdadeiro (.T.), se o controle permanecer habilitado; caso contrário, retornará falso (.F.).
uParam16Bloco de códigoCompatibilidade.
uParam17LógicoCompatibilidade.
Retorno
    oObjeto()
  • Retorna o objeto criado.

Exemplos 
oTButton1 := TButton():New( 002, 002, "Botão 01",oDlg,{||alert("Botão 01")},;                   40,10,,,.F.,.T.,.F.,,.F.,,,.F. )

Métodos
Click

Click

Dispara o evento, configurado na propriedade bAction, do botão.


Sintaxe

TButton(): Click ( ) -->


Exemplos 
oTButton:Click()
SetPopupMenu

SetPopupMenu

Define o objeto do tipo TMenu referente ao botão.


Sintaxe

TButton(): SetPopupMenu ( < oMenu> ) -->


Parâmetros
NomeTipoDescriçãoObrigatórioReferência
oMenuObjetoIndica o objeto do tipo TMenu que será apresentado quando clicar, com o botão esquerdo do mouse, sobre o objeto. X

Exemplos 
#include "TOTVS.CH"User Function TButton()  DEFINE DIALOG oDlg TITLE "Exemplo TButton:SetPopupMenu" FROM 180,180 TO 550,700 PIXEL	    // Cria Menu    oMenu := TMenu():New(0,0,0,0,.T.)    // Adiciona itens no Menu    oTMenuItem1 := TMenuItem():New(oDlg,"TMenuItem 01",,,,{||Alert("TMenuItem 01")};                                   ,,,,,,,,,.T.)    oTMenuItem2 := TMenuItem():New(oDlg,"TMenuItem 02",,,,{||Alert("TMenuItem 02")};                                   ,,,,,,,,,.T.)    oTMenuItem3 := TMenuItem():New(oDlg,"TMenuItem 03",,,,{||Alert("TMenuItem 03")};                                   ,,,,,,,,,.T.)    oMenu:Add(oTMenuItem1)    oMenu:Add(oTMenuItem2)    oMenu:Add(oTMenuItem3)    // Cria botão que sera usado no Menu    oTButton1 := TButton():New( 002, 002, "Botão 01",oDlg,{||alert("Botão 01")},;                   40,10,,,.F.,.T.,.F.,,.F.,,,.F. )    // Define botão no Menu    oTButton1:SetPopupMenu(oMenu)      ACTIVATE DIALOG oDlg CENTERED Return

Preview
Exemplo do método SetPopupMenu

Propriedade
PropriedadeDescriçãoTipo
bActionIndica o bloco de código que será executado quando clicar, com o botão esquerdo do mouse, sobre o botão.Bloco de código
lProcessingIndica que, verdadeiro (.T.), o bloco de código bAction não será executado quando clicar, com o botão esquerdo do mouse, sobre o objeto; caso contrário, falso (.F.).Lógico

Exemplos 
#include "TOTVS.CH"User Function TButton()  DEFINE DIALOG oDlg TITLE "Exemplo TButton" FROM 180,180 TO 550,700 PIXEL	    // Usando o New    oTButton1 := TButton():New( 002, 002, "Botão 01",oDlg,{||alert("Botão 01")},;                   40,10,,,.F.,.T.,.F.,,.F.,,,.F. )    oTButton2 := TButton():New( 022, 002, "Botão 02",oDlg,{||alert("Botão 02")},;                   40,10,,,.F.,.T.,.F.,,.F.,,,.F. )    oTButton3 := TButton():New( 042, 002, "Botão 03",oDlg,{||alert("Botão 03")},;                   40,10,,,.F.,.T.,.F.,,.F.,,,.F. )                       // Usando o Create    oTButton3 := TButton():Create( oDlg,062,002,"Botão 04",{||alert("Botão 04")},;                  40,10,,,,.T.,,,,,,)      ACTIVATE DIALOG oDlg CENTERED Return

Preview
Exemplo da classe TButton

Abrangência
Advanced Protheus 6.09 , Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Microsiga Protheus 11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server

  • Sem rótulos