Classe: TSplitter
Cria um objeto do tipo barra de divisão.
TSrvObject -> TControl -> TSplitter
Create
Método construtor da classe.
TSplitter(): Create ( [ oWnd] ) --> oObjeto
Nome | Tipo | Descrição | Obrigatório | Referência |
oWnd | Objeto | Indica a janela ou controle visual onde objeto será criado. |
-
oObjeto(objeto)
- Retorna o objeto criado.
oSplitter := TSplitter():Create( oDlg )
New
Método construtor da classe.
TSplitter(): New ( [ nRow], [ nCol], [ oWnd], [ nWidth], [ nHeight], [ nOrientation] ) --> 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. | ||
nOrientation | Numérico | Indica a posição que a barra de divisão será criada, sendo 0 = Horizontal e 1 = Vertical. |
-
oObjeto(objeto)
- Retorna o objeto criado.
oSplitter := TSplitter():New( 01,01,oDlg,260,184 )
MovToFirst
Define qual objeto será o primeiro das divisões.
TSplitter(): MovToFirst ( [ oObj] ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
oObj | Objeto | Indica qual objeto será o primeiro da divisão. |
oSplitter:MoveToFirst( oPanel2 )
Exemplo do método MoveToFirst
MovToLast
Define qual objeto será o último das divisões.
TSplitter(): MovToLast ( [ oObj] ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
oObj | Objeto | Indica qual objeto será o último da divisão. |
oSplitter:MoveToLast( oPanel2 )
Exemplo do método MoveToLast
SetChildCollapse
Define se os elementos serão fechados (Collapsibles).
TSplitter(): SetChildCollapse ( [ lColl] ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
lColl | Lógico | Indica se habilita(.T.)/desabilita(.F.) a opção de fechar (Collapsibles) os elementos. |
oSplitter:SetChildCollapse(.T.)
SetCollapse
Define qual objeto será fechado (Collapsible).
TSplitter(): SetCollapse ( [ oObj], [ lColl] ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
oObj | Objeto | Indica o objeto que será fechado (Collapsed). | ||
lColl | Lógico | Indica se habilita(.T.)/desabilita(.F.) a opção de fechar. |
oSplitter:SetCollapse( oPanel2, .T. )
SetOpaqueResize
Define se o redimensionamento (resize) será opaco.
TSplitter(): SetOpaqueResize ( [ lOpaq] ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
lOpaq | Lógico | Indica se habilita(.T.)/desabilita(.F.) o redimensionamento opaco. |
oSplitter:SetOpaqueResize( .T. )
SetOrient
Especifica a posição (horizontal ou vertical) do objeto.
TSplitter(): SetOrient ( [ nOrient] ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
nOrient | Numérico | Indica a posição do objeto, sendo 0 = Horizontal e 1 = Vertical. |
oSplitter:SetOrient( 1 )
Exemplo do método SetOrient
SetResizeMode
Define a maneira de redimensionar (resize) o objeto.
TSplitter(): SetResizeMode ( [ oObj], [ nMode] ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
oObj | Objeto | Indica o objeto que será redimensionado. | ||
nMode | Numérico | Indica a maneira que o objeto será redimensionado, sendo: 0 = Stretch, 1 = KeepSize, 2 = FollowSizeHint e 3 = Auto. |
oSplitter:SetResizeMode( oPanel2, 1 )
#include "TOTVS.CH"User Function TSplitter() DEFINE DIALOG oDlg TITLE "Exemplo TSplitter:SetOrient" FROM 180,180 TO 550,700 PIXEL oSplitter := tSplitter():New( 01,01,oDlg,260,184 ) oPanel1:= tPanel():New(322,02," Painel 01",oSplitter,,,,,CLR_YELLOW,60,60) oPanel2:= tPanel():New(322,02," Painel 02",oSplitter,,,,,CLR_HRED,60,80) oPanel3:= tPanel():New(322,02," Painel 03",oSplitter,,,,,CLR_HGRAY,60,60) ACTIVATE DIALOG oDlg CENTERED Return
Exemplo da classe TSplitter
Microsiga Protheus 8.11
,
Microsiga Protheus 11
,
Protheus 10
,
TOTVS Application Server 10
,
ByYou Application Server
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas