TOTVSTEC

Árvore de páginas

Versões comparadas

Versão antiga 5

changes.mady.by.user Acacio Fernandes Egas Junior

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Julio Wittwer

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Comentário: Relacionar com comando @ GROUP
portuguese
Composition Setup
import.css=/download/attachments/3279126062824/newLayouttecnologia.css

Pagetitle

...

Colapse ALL

...

Classe TGroup
Classe

...

TGroup

Cria

...

um

...

objeto

...

do

...

tipo

...

painel,

...

com

...

borda

...

e

...

título,

...

para

...

que

...

outros

...

possam

...

ser

...

agrupados

...

ou

...

classificados.

Hierarquia

...

...

    • TGroup

Construtores

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

Exemplos

Bloco de código
languagecpp
themeEclipse
linenumbersfalse
collapsefalse
 #include "TOTVS.CH"
  User Function TGroup()
   DEFINE DIALOG oDlg TITLE "Exemplo TGroup" FROM 180,180 TO 650,800 PIXEL

    // USANDO O NEW
    oGroup1
Create

Create

Método construtor da classe.

Sintaxe

TGroup(): Create ( [ oWnd], [ nTop], [ nLeft], [ nBottom], [ nRight], [ cLabel], [ nClrText], [ nClrPane], [ lPixel], [ uParam10] ) --> oObjeto

Parâmetros

 

NomeTipoDescriçãoObrigatórioReferência
oWndObjetoIndica a janela ou controle visual onde o objeto será criado.  
nTopNuméricoIndica a coordenada vertical superior em pixels ou caracteres.  
nLeftNuméricoIndica a coordenada horizontal à esquerda em pixels ou caracteres.  
nBottomNuméricoIndica a coordenada vertical inferior em pixels ou caracteres.  
nRightNuméricoIndica a coordenada horizontal à direita em pixels ou caracteres.  
cLabelCaracterIndica o título do grupo.  
nClrTextNuméricoIndica a cor do texto.  
nClrPaneNuméricoIndica a cor de fundo.  
lPixelLógicoIndica se considera as coordenadas passadas em pixels (.T.) ou caracteres (.F.).  
uParam10LógicoCompatibilidade.  

 

Retorno
oObjeto
    (objeto)
  • Retorna o objeto criado.
Exemplos
oGroup 
:= TGroup():
Create
New(
oDlg,
02,02,130,130,'Objeto TGroup 1',oDlg,,,.T.)
New

New

Método construtor da classe.

Sintaxe
TGroup


    cTGet1 := "Get dentro do TGroup"
    oTGet2 := TGet():New(
[ nTop], [ nLeft], [ nBottom], [ nRight], [ cCaption], [ oWnd], [ nClrText], [ nClrPane], [ lPixel], [ uParam10] ) --> oObjeto
Parâmetros

 

NomeTipoDescriçãoObrigatórioReferência
nTopNuméricoIndica a coordenada vertical superior em pixels ou caracteres.  
nLeftNuméricoIndica a coordenada horizontal à esquerda em pixels ou caracteres.  
nBottomNuméricoIndica a coordenada vertical inferior em pixels ou caracteres.  
nRightNuméricoIndica a coordenada horizontal à direita em pixels ou caracteres.  
cCaptionCaracterIndica o título do grupo.  
oWndObjetoIndica a janela ou controle visual onde o objeto será criado.  
nClrTextNuméricoIndica a cor do texto.  
nClrPaneNuméricoIndica a cor de fundo.  
lPixelLógicoIndica se considera as coordenadas passadas em pixels (.T.) ou caracteres (.F.).  
uParam10LógicoCompatibilidade.  

 

Retorno
oObjeto
    (objeto)
  • Retorna o objeto criado.
Exemplos
oGroup:= TGroup():New(02,02,130,130,'Objeto TGroup',oDlg,,,.T.)
Exemplos
User Function TGroup()
DEFINE DIALOG oDlg TITLE "Exemplo TGroup" FROM 180,180 TO 550,700 PIXEL
oGroup:= TGroup():New(02,02,130,130,'Objeto TGroup',oDlg,,,.T.)
cTGet1 := "Get dentro do TGroup"
oTGet1 := TGet():New( 18,16,{||cTGet1},oGroup,100,010,;
 18,16,{||cTGet1},oGroup1,100,010,"@!",,0,,,.F.,,.T.,,.F.,,.F.,.F.,,.F.,.F.,,cTGet1,,,,)
    oTGet3 := TGet():New( 36,16,{||cTGet1},oGroup1,100,010,"@!",,0,,,.F.,,.T.,,.F.,,.F.,.F.,,.F.,.F.,,cTGet1,,,,)

    // USANDO CREATE
    oGroup2 := TGroup():Create(oDlg,02,140,130,260,'Objeto TGroup 2',,,.T.)

    cTGet4 := "Get dentro do TGroup"
    oTGet5 := TGet():New( 18,150,{||cTGet4},oGroup2,100,010,"@!",,0,,,.F.,,.T.,,.F.,,.F.,.F.,,.F.,.F.,,
cTGet1
cTGet4,,,,)

oTGet2 

    oTGet6 := TGet():New( 36,
16
150,{||
cTGet1
cTGet4},
oGroup
oGroup2,100,010,
;
"@!",,0,,,.F.,,.T.,,.F.,,.F.,.F.,,.F.,.F.,,
cTGet1
cTGet4,,,,)



 ACTIVATE DIALOG oDlg CENTERED

Return
Preview
Exemplo da classe TGroup
Image Removed

  Return

Resultado do Exemplo

Image Added

Referências

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

Abrangência

Advanced Protheus 6.09, Advanced Protheus 7.10, Microsiga Protheus 8.11, Microsiga Protheus 11, Protheus 10, TOTVS Application Server 10, ByYou Application Server

...