Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Comentário: Amarrar documentação com o comando @ .. FOLDER
portuguese
Composition Setup
import.css=/download/attachments/327912/newLayout.css
import.css=/download/attachments/6062824/tecnologia.css

Pagetitle

...

...

Classe TFolder
Classe

...

TFolder

Cria

...

um

...

objeto

...

para

...

exibir

...

pastas.

Hierarquia

...

...

    • TFolder

Construtores

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

Propriedades

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

Métodos

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

Exemplos

#include "TOTVS.CH"

  User Function TFolder()

    DEFINE DIALOG oDlg TITLE "Exemplo TFolder" FROM 180,180 TO 550,700 PIXEL
    // Cria a Folder
    
aTFolder := { 'Aba 01', 'Aba 02', 'Aba 03' }
    oTFolder := TFolder():New( 0,0,aTFolder,,oDlg,,,,.T.,,260,184 )

    // Insere um TGet em cada aba da folder
    
cTGet1 := "Teste TGet 01"
    oTGet1 := TGet():New( 01,01,{||cTGet1},oTFolder:aDialogs[1],096,009,;
      
"",,0,,,.F.,,.T.,,.F.,,.F.,.F.,,.F.,.F.,,cTGet1,,,, )

    cTGet2 := "Teste TGet 02"
    oTGet2 := TGet():New( 01,01,{||cTGet2},oTFolder:aDialogs[2],096,009,;
      
"",,0,,,.F.,,.T.,,.F.,,.F.,.F.,,.F.,.F.,,cTGet2,,,, )

    cTGet3 := "Teste TGet 03"
    oTGet3 := TGet():New( 01,01,{||cTGet3},oTFolder:aDialogs[3],096,009,;
      "",,0,,,.F.,,.T.,,.F.,,.F.,.F.,,.F.,.F.,,cTGet3,,,, )

    ACTIVATE DIALOG oDlg CENTERED
  Return
Bloco de código
languagecpp
themeEclipse
titleExemplo 1
linenumberstrue
collapsefalse
  

New

Método construtor da classe.

TFolder(): New ( [ nTop], [ nLeft], [ aPrompts], [ aDialogs], [ oWnd], [ nOption], [ nClrFore], [ nClrBack], [ lPixel], [ uParam10], [ nWidth], [ nHeight], [ cMsg], [ uParam14] ) --> oObjeto

 

NomeTipoDescriçãoObrigatórioReferência
nTopNuméricoIndica a coordenada vertical em pixels ou caracteres.  
nLeftNuméricoIndica a coordenada horizontal em pixels ou caracteres.  
aPromptsVetorIndica o título das pastas.  
aDialogsVetorIndica o nome do diálogo.  
oWndObjetoIndica a janela ou controle visual onde o objeto será criado.  
nOptionNuméricoIndica a pasta selecionada.  
nClrForeNuméricoIndica a cor de frente da pasta.  
nClrBackNuméricoIndica a cor de fundo da pasta.  
lPixelLógicoIndica se considera as coordenadas passadas em pixels (.T.) ou caracteres (.F.).  
uParam10LógicoCompatibilidade.  
nWidthNuméricoIndica a largura em pixels do objeto.  
nHeightNuméricoIndica a altura em pixels do objeto.  
cMsgCaracterIndica a mensagem, do tipo dica de contexto (tooltip/hint), que será apresentada ao posicionar o ponteiro do mouse sobre o objeto.  
uParam14LógicoCompatibilidade.  

 

oObjeto
    (objeto)
  • Retorna o objeto criado.
oTFolder := TFolder():New( 0,0,aTFolder,,oDlg,,,,.T.,,260,184 )

AddItem

Inclui uma pasta.

TFolder(): AddItem ( [ cItem], [ lVisible] ) -->

 

NomeTipoDescriçãoObrigatórioReferência
cItemCaracterIndica a título da pasta.  
lVisibleLógicoIndica se a pasta está (.T.) ou não (.F.) visível.  

 

oTFolder:AddItem("Nova Aba", .T.)
Exemplo do método AddItem
Image Removed

aEnable

Habilita/Desabilita uma pasta.

TFolder(): aEnable ( [ nItem], [ lEnable] ) --> lOk

 

NomeTipoDescriçãoObrigatórioReferência
nItemNuméricoIndica a pasta que será habilitada/desabilitada.  
lEnableLógicoIndica se habilita(.T.)/desabilita(.F.) a pasta.  

 

lOk
    (logico)
  • Retorna verdadeiro (.T.), se o processo ocorrer com sucesso; caso contrário, retornará falso (.F.).

A pasta continuará visível, porém não será possível selecioná-la.

oTFolder:aEnable(2, .F.)

HidePage

Oculta uma pasta.

TFolder(): HidePage ( < nItem> ) -->

 

NomeTipoDescriçãoObrigatórioReferência
nItemNuméricoIndica a pasta que será oculta.X 

 

oTFolder:HidePage(2)

SetOption

Seleciona a pasta desejada.

TFolder(): SetOption ( [ nOption] ) -->

 

NomeTipoDescriçãoObrigatórioReferência
nOptionNuméricoIndica a pasta que será selecionada.  

 

oTFolder:SetOption(2)

ShowPage

Apresenta uma pasta.

TFolder(): ShowPage ( < nItem> ) -->

 

NomeTipoDescriçãoObrigatórioReferência
nItemNuméricoIndica a pasta que será apresentada.X 

 

oTFolder:ShowPage(2)

 

PropriedadeDescriçãoTipo
aDialogsIndica o nome dos diálogos.Array of Record
aPromptsIndica o título da pasta.Array of Record
bSetOptionIndica o bloco de código que será executado quando a pasta for selecionada.Bloco de código
nOptionIndica a pasta selecionada.Numérico
Bloco de código
themeEclipse
languagecpp
titleExemplo
linenumberstrue
Painel
titlePreview

Image Removed

Paineltitle

Exemplo da classe TFolder

Image Added

Abrangência

Microsiga Protheus 8.11

...

Protheus 10

, Microsiga Protheus 11

...

, Protheus 10, TOTVS Application Server 10

...

, TOTVS Application Server 11

Referências

A construção de um componente da classe TFOLDER também pode ser feita através do comando AdvPL @ .. FOLDER