TOTVSTEC

Árvore de páginas

Versões comparadas

Versão antiga 2

changes.mady.by.user admin

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.
Composition Setup
import.css=/download/attachments/3279126062824/newLayouttecnologia.css
Portuguese

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

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
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
Exemplos 
otMultiBtn:SetFonts('Tahoma',16,'Tahoma',10)
Propriedade
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.
NomeTipoDescriçãoObrigatórioReferência
oNovoBotaoObjetoIndica o botão que será criado.
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.
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