TOTVSTEC

Árvore de páginas

Versões comparadas

Versão antiga 3

changes.mady.by.user Adriana Panseri Santos

Gravado em

comparado com

Nova versão 4

changes.mady.by.user Acacio Fernandes Egas Junior

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Portuguese

Pagetitle
TGroup
TGroup

Classe: TGroup

Cria um objeto do tipo painel, com borda e título, para que outros possam ser agrupados ou classificados.

Hierarquia

TSrvObject -> TControl -> TGroup


Construtores
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(oDlg,02,02,130,130,'Objeto TGroup',,,.T.)
New

New

Método construtor da classe.


Sintaxe

TGroup(): 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
#include "TOTVS.CH"

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,;


"@!",,0,,,.F.,,.T.,,.F.,,.F.,.F.,,.F.,.F.,,cTGet1,,,,

)


oTGet2

:=

TGet():New(

36,16,{||cTGet1},oGroup,100,010,;


"@!",,0,,,.F.,,.T.,,.F.,,.F.,.F.,,.F.,.F.,,cTGet1,,,,

)


ACTIVATE

DIALOG

oDlg

CENTERED


Return


Preview
Exemplo da classe TGroup

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