Composition Setup |
---|
import.css=/download/attachments/3279126062824/newLayouttecnologia.css |
portuguese
|
...
...
...
Cria
...
um
...
objeto
...
do
...
tipo
...
caixa
...
de
...
ferramenta,
...
cujo
...
objetivo
...
é
...
agrupar
...
diferentes
...
tipos
...
de
...
objetos.
Hierarquia
...
...
Construtores
Inclusão de trecho |
---|
| Classe TToolBox - Construtores |
---|
| Classe TToolBox - Construtores |
---|
nopanel | true |
---|
|
Propriedades
Inclusão de trecho |
---|
| Classe TToolBox - Propriedades |
---|
| Classe TToolBox - Propriedades |
---|
nopanel | true |
---|
|
Métodos
Inclusão de trecho |
---|
| Classe TToolBox - Métodos |
---|
| Classe TToolBox - Métodos |
---|
nopanel | true |
---|
|
Exemplos
Bloco de código |
---|
language | cpp |
---|
theme | Eclipse |
---|
linenumbers | true |
---|
collapse | false |
---|
|
TToolBox(): Create ( [ oWnd] ) --> oObjeto Nome | Tipo | Descrição | Obrigatório | Referência | oWnd | Objeto | Indica a janela ou controle visual onde o objeto será criado. | | |
oObjeto()- Retorna o objeto criado.
oTb := TToolBox():Create(oDlg) TToolBox(): New ( [ nRow], [ nCol], [ oWnd], [ nWidth], [ nHeight], [ oFont], [ cMsg], [ bWhen] ) --> oObjeto Nome | Tipo | Descrição | Obrigatório | Referência | nRow | Numérico | Indica a coordenada vertical em pixels ou caracteres. | | | nCol | Numérico | Indica a coordenada horizontal em pixels ou caracteres. | | | oWnd | Objeto | Indica a janela ou controle visual onde o objeto será criado. | | | nWidth | Numérico | Indica a largura em pixels do objeto. | | | nHeight | Numérico | Indica a altura em pixels do objeto. | | | oFont | Objeto | Indica o objeto do tipo TFont utilizado para definir as características da fonte aplicada na exibição do conteúdo do controle visual. | | | cMsg | Caracter | Indica a mensagem, do tipo dica de contexto (tooltip/hint), que será apresentada ao posicionar o ponteiro do mouse sobre o objeto. | | | bWhen | Bloco de código | Indica o bloco de código que será executado quando a mudança de foco da entrada de dados, no objeto criado, estiver sendo realizada. Se o retorno for verdadeiro (.T.), o objeto continua habilitado; caso contrário, falso (.F.). | | |
oObjeto()- Retorna o objeto criado.
oTb := TToolBox():New(01,01,oDlg,200,184) TToolBox(): AddGroup ( [ oObj], [ cName], [ oIcon] ) --> Nome | Tipo | Descrição | Obrigatório | Referência | oObj | Objeto | Indica o objeto (pai) que será adicionado no grupo. | | | cName | Caracter | Indica a descrição do grupo. | | | oIcon | Objeto | Indica o ícone que representará o grupo. | | |
oPanel1:= TPanel():New(01,01," Painel 01 ",oDlg,,,,,CLR_YELLOW,100,80)oTb:AddGroup( oPanel1, 'Opção 1', ) TToolBox(): RemoveGroup ( [ oObj] ) --> Nome | Tipo | Descrição | Obrigatório | Referência | oObj | Objeto | Indica qual objeto (pai) será excluído do grupo. | | |
oTb:RemoveGroup( oPanel2 ) TToolBox(): SetCurrentGroup ( [ oObj] ) --> Nome | Tipo | Descrição | Obrigatório | Referência | oObj | Objeto | Indica qual objeto (pai) será posicionado. | | |
oTb:SetCurrentGroup( oPanel2 ) Propriedade | Descrição | Tipo | bChangeGrp | Indica o bloco de código que será executado na mudança da caixa de ferramenta existentes. Observação: O codeblock recebe como parâmetro o código da caixa de ferramenta atual. | Bloco de código |
Bloco de código |
---|
|
theme | Eclipse |
---|
language | cpp |
---|
title | Exemplo |
---|
linenumbers | true |
---|
|
#include "TOTVS.CH"
User Function TEC3060()
DEFINE DEFINE DIALOG oDlg TITLE "Exemplo TToolBox" FROM 180,180 TO 550,700 PIXEL
// Cria os painéis que conterão os containers
oPanel1 oPanel1:= TPanel():New(01,01," Painel 01 ",oDlg,,,,,CLR_YELLOW,100,80)
oPanel2 oPanel2:= TPanel():New(01,01," Painel 02 ",oDlg,,,,,CLR_HRED,100,80)
// Cria a Toolbox e adiciona os painéis
oTb oTb := TToolBox():New(01,01,oDlg,200,184)
oTb oTb:bChangeGrp := {|x|
changeGrpAlert(Str(x))}
oTb oTb:AddGroup( oPanel1, 'Opção 1',nil )
oTb oTb:AddGroup( oPanel2, 'Opção 2',nil )
ACTIVATE ACTIVATE DIALOG oDlg CENTERED
Return
Static
Function
changeGrp(nGroup)
Alert(Str(nGroup))
ReturnExemplo da classe TToolBoxReturn
Resultado do Exemplo
Image Modified
Abrangência
Microsiga Protheus 8.11 , Microsiga Protheus 11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server
...