Histórico da Página

TSplitter(): Create ( [ oWnd] ) --> oObjeto

Nome	Tipo	Descrição	Obrigatório	Referência
oWnd	Objeto	Indica a janela ou controle visual onde objeto será criado.

Retorno

oObjeto

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.

Retorno

oObjeto

Retorna o objeto criado.

oSplitter := TSplitter():New( 01,01,oDlg,260,184 )

Métodos

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