Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Composition Setup
import.css=/download/attachments/6062824/tecnologia.css

Pagetitle
GetChildrenWindowCountGetChildCtGetChildrenWindowCount
GetChildCt

GetChildrenWindowCount GetChildCt retorna o número de objetos filhos presente em uma janela.

Sintaxe

Bloco de código
collapsefalse
GetChildrenWindowCountGetChildCt( < oWindow > )

Parâmetros

Nome

Tipo

Descrição

Obrigatório

Referência

oWindow

objeto

Instância da janela ao qual se deseja saber a quantidade de objetos filhos. Somente são suportados objetos que herdam da classe TWindow (TWindow e TDialog)

X

 

Retorno

Nome

Tipo

Descrição

nChildrens

numérico

Retorna o número de objetos filhos adicionados na janela. Em caso de erro o valor -1 será retornado.

Observações

  • As janelas possuem uma limitação da quantidade de objetos que podem ser adicionados. Essa função auxilia no desenvolvimento mostrando o total de objetos filhos que estão instanciados e associados a janela informada.
  • Caso parametro informado seja inválido (não derive da classe TWindow) um warning é gerado no log do servidor e o valor -1 é retornado.
  • Caso ocorra algum exception durante o processamento uma mensagem de erro será gerada no log no servidor.

Exemplos

Bloco de código
languagecpp
themeEclipse
linenumberstrue
collapsefalse
 user function tstGetWindowCount
  DEFINE DIALOG oDlg TITLE "Exemplo TGroup" FROM 180,180 TO 650,800 PIXEL
 
   oGroup1:= TGroup():New(02,02,130,130,'Objeto TGroup 1',oDlg,,,.T.)
 
   cTGet1 := "Get dentro do TGroup"
   oTGet2 := TGet():New( 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,,,,)
 
   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.,,cTGet4,,,,)
   oTGet6 := TGet():New( 36,150,{||cTGet4},oGroup2,100,010,"@!",,0,,,.F.,,.T.,,.F.,,.F.,.F.,,.F.,.F.,,cTGet4,,,,)
 
   oTButton1 := TButton():New( 150, 60, "Conta Elementos",oDlg,{||alert("Total de Filhos " + Str(nDgChild))}, 70,10,,,.F.,.T.,.F.,,.F.,,,.F. )
   oTButton2 := TButton():New( 150, 160, "Exemplo Objeto Inválido",oDlg,{||alert("Invalid Object (tGroup)" + Str(nInvObj))}, 70,10,,,.F.,.T.,.F.,,.F.,,,.F. )
   
   nDgChild := GetChildrenWindowCountGetChildCt(oDlg)
   nInvObj  := GetChildrenWindowCountGetChildCt(oGroup1)
   ACTIVATE DIALOG oDlg CENTERED
 
 Return

Abrangência

AppServer 13.1.4.0 e 13.2.4.0

Veja também