TOTVSTEC

Árvore de páginas

Versões comparadas

Versão antiga 4

changes.mady.by.user Usuário desconhecido (thiago.masaki)

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Fernando Henrique Lubianco

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
portuguese
Composition Setup
import.css=/download/attachments/3279126062824/newLayouttecnologia.css

Pagetitle

...

Classe TMultiBtn

Classe

...

TMultiBtn

Cria

...

um

...

objeto

...

do

...

tipo

...

múltiplos

...

botões.

Hierarquia

...

...

    • TMultiBtn

Construtores

Inclusão de trecho
Classe TMultiBtn - Construtores
Classe TMultiBtn - Construtores
nopaneltrue

Propriedades

Inclusão de trecho
Classe TMultiBtn - Propriedades
Classe TMultiBtn - Propriedades
nopaneltrue

Métodos

Inclusão de trecho
Classe TMultiBtn - Métodos
Classe TMultiBtn - Métodos
nopaneltrue

Exemplos

Bloco de código
languagecpp
themeEclipse
titleExemplo 1
linenumberstrue
collapsefalse
New

New

Método construtor da classe.

Sintaxe

TMultiBtn(): New ( [ nRow], [ nCol], [ oWnd], [ bAction], [ nWidth], [ nHeight], [ cimgName], [ nOri], [ cMsg], [ nBtnPerLine] ) --> 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.  
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 objeto.  
nHeightNuméricoIndica a altura em pixels do objeto.  
cimgNameCaracterIndica o nome da imagem que será inserida ao lado esquerdo do componente.  
nOriNuméricoIndica a coordenada (vertical/horizontal) do botão na janela.  
cMsgCaracterIndica a mensagem, do tipo dica de contexto (tooltip/hint), ao posicionar o ponteiro do mouse sobre o botão.  
nBtnPerLineNuméricoIndica a quantidade de botões por linha.  

 

Retorno
oObjeto
    (objeto)
  • Retorna o objeto criado.
Exemplos
otMultiBtn := tMultiBtn():New( 01,01,'Titulo',oDlg,;              {|x,y| Alert("Selecionado botão: "+Str(y,2)) },200,150,;              'Afastamento',0,'Mensagem',3 )
Métodos
AddButton

AddButton

Adiciona um botão.

Sintaxe

TMultiBtn(): AddButton ( [ oNovoBotao] ) -->

Parâmetros

 

NomeTipoDescriçãoObrigatórioReferência
oNovoBotaoObjetoIndica o botão que será criado.  

 

Exemplos
otMultiBtn:AddButton('Opção 01')
SetFonts

SetFonts

Altera a fonte do título e dos botões.

Sintaxe

TMultiBtn(): SetFonts ( [ cFonteTitulo], [ nSizeTitulo], [ cFonteBotoes], [ nSizeBotoes] ) -->

Parâmetros

 

NomeTipoDescriçãoObrigatórioReferência
cFonteTituloCaracterIndica o nome da fonte que será utilizada no título.  
nSizeTituloNuméricoIndica o tamanho da fonte no título.  
cFonteBotoesCaracterIndica o nome da fonte que será utilizada nos botões.  
nSizeBotoesNuméricoIndica o tamanho da fonte no botão.  

 

Exemplos
otMultiBtn:SetFonts('Tahoma',16,'Tahoma',10)
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

 

Exemplos
#include "TOTVS.CH"


  User Function TMultiBtn() 

 

 DEFINE DIALOG oDlg TITLE "Exemplo TMultiBtn" FROM 180,180 TO 550,700 PIXEL

 

  otMultiBtn := tMultiBtn():New( 01,01,'Titulo',oDlg,
{|x
,
y|Alert("Selecionado botão: "+Str(y,2)) },
200,150, 'Afastamento',0,'Mensagem',3 )


   otMultiBtn:SetFonts('Tahoma',16,'Tahoma',10) 
  

 otMultiBtn:AddButton('Opção 01')


   otMultiBtn:AddButton('Opção 02')


   otMultiBtn:AddButton('Opção 03')


   otMultiBtn:AddButton('Opção 04')


   otMultiBtn:AddButton('Opção 05'
)
)
   otMultiBtn:bAction := {|x,y|Alert("Click no botão: "+Str(y,1)) }

  ACTIVATE DIALOG oDlg CENTERED 
  Return
Preview
Exemplo da classe TMultiBtn
Image Removed

Resultado do Exemplo

Image Added

Abrangência

Microsiga Protheus 8.11, Microsiga Protheus 11, Protheus 10, TOTVS Application Server 10, ByYou Application Server

...