Histórico da Página
Composition Setup |
---|
import.css=/download/attachments/327912/newLayout.css |
HTML |
<link type="text/css" rel="stylesheet" href="http://tdn.totvs.com/download/attachments/6062824/tecnologia.css" > |
Portuguese |
Pagetitle | ||||
---|---|---|---|---|
|
Cria um objeto para exibir pastas.
...
Hierarquia
...
- TControl
- TFolder
...
Construtores
Inclusão de trecho | ||||||
---|---|---|---|---|---|---|
|
Propriedades
Inclusão de trecho | ||||||
---|---|---|---|---|---|---|
|
Métodos
Inclusão de trecho | ||||||
---|---|---|---|---|---|---|
|
Exemplos
Bloco de código | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
Painel | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
NewMétodo construtor da classe.
TFolder(): New ( [ nTop], [ nLeft], [ aPrompts], [ aDialogs], [ oWnd], [ nOption], [ nClrFore], [ nClrBack], [ lPixel], [ uParam10], [ nWidth], [ nHeight], [ cMsg], [ uParam14] ) --> oObjeto
oObjeto
oTFolder := TFolder():New( 0,0,aTFolder,,oDlg,,,,.T.,,260,184 ) |
Painel | |||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| |||||||||||||||
AddItemInclui uma pasta.
TFolder(): AddItem ( [ cItem], [ lVisible] ) -->
oTFolder:AddItem("Nova Aba", .T.)
Exemplo do método AddItem |
aEnable
Habilita/Desabilita uma pasta.
TFolder(): aEnable ( [ nItem], [ lEnable] ) --> lOk
Nome | Tipo | Descrição | Obrigatório | Referência |
nItem | Numérico | Indica a pasta que será habilitada/desabilitada. | ||
lEnable | Lógico | Indica se habilita(.T.)/desabilita(.F.) a pasta. |
- (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> ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
nItem | Numérico | Indica a pasta que será oculta. | X |
oTFolder:HidePage(2)
SetOption
Seleciona a pasta desejada.
TFolder(): SetOption ( [ nOption] ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
nOption | Numérico | Indica a pasta que será selecionada. |
oTFolder:SetOption(2)
ShowPage
Apresenta uma pasta.
TFolder(): ShowPage ( < nItem> ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
nItem | Numérico | Indica a pasta que será apresentada. | X |
oTFolder:ShowPage(2)
Propriedade | Descrição | Tipo |
aDialogs | Indica o nome dos diálogos. | Array of Record |
aPrompts | Indica o título da pasta. | Array of Record |
bSetOption | Indica o bloco de código que será executado quando a pasta for selecionada. | Bloco de código |
nOption | Indica a pasta selecionada. | Numérico |
theme | Eclipse |
---|---|
language | cpp |
title | Exemplo |
linenumbers | true |
#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
Painel | ||
---|---|---|
| ||
Exemplo da classe TFolder
Abrangência
Microsiga Protheus 8.11
...
, 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