TFolder nao esta aparecendo dentro de um TGroup

[gibaf]

ola a todos...

tenho seguinte bloco:



Function Teste()

Local oDlg,oFld
Local nAlias := 1 , aAlias := {"bla1","bla2","bla3"}

DEFINE DIALOG oDlg From 00,00 to 555,790 bla bla bla

TGroup():New(015,005,165,390,"",oDlg,CLR_BLACK,CLR_WHITE,.T.,.F. ,oFont,.T.)

@ 030,020 SAY "Alias:" OF oDlg bla bla bla
@ 030,035 COMBOBOX oAlias VAR nAlias ITEMS aAlias OF oDlg bla bla

@ 030,105 SAY "Banco:" OF oDlg bla bla bla
@ 030,125 GET cBanco OF oDlg bla bla bla

oFld := TFolder():New(050 ,020 ,{"Aba_1","Aba_2"}, ,oDlg,1 ,CLR_BLUE,CLR_RED ,.T. ,.F. , 300 ,100 , , ,oFont,)

ACTIVATE DIALOG oDlg CENTERED

Return(Nil)

mas, o TFolder nao aparece no TGroup.

DETALHE:
1) se eu comentar o TGroup, dae o TFolder aparece (logicamente - hehehe);
2) mesmo se eu deixar transparente ou nao o TGroup, o TFolder nao aparece;
3) o SAY, GET e COMBOBOX aparecem sempre

qual é o problema ???

desde já fico agradecido pela ajuda que virá: MUITO OBRIGADO !!!!

[Arthur Silvestre]

Substitua isso:

TGroup():New(015,005,165,390,"",oDlg,CLR_BLACK,CLR_WHITE,.T.,.F. ,oFont,.T.)

Por

oGrp:= TGroup():New(015,005,165,390,"",oDlg,CLR_BLACK,CLR_WHITE,.T.,.F. ,oFont,.T.)

e depois tente isso:

oGrp:lTransparent:=.T.

[gibaf]

Substitua isso:

TGroup():New(015,005,165,390,"",oDlg,CLR_BLACK,CLR_WHITE,.T.,.F. ,oFont,.T.)

Por

oGrp:= TGroup():New(015,005,165,390,"",oDlg,CLR_BLACK,CLR_WHITE,.T.,.F. ,oFont,.T.)

e depois tente isso:

oGrp:lTransparent:=.T.

ola.. obrigado por responder...

mas, o ultimo parametro nao faz isso ??

[aferra]

Olá Giba, blz?

Coloque o tgroup por ultimo.

[gibaf]

Olá Giba, blz?

Coloque o tgroup por ultimo.

ola... obrigado por responder...

ja tinha feito tambem... se colocar por ultimo cobre tudo, inclusive o SAY, GET e COMBOBOX q, se colocar no inicios, esses aparecem, soh o Folder q nao aparece

att

[gibaf]

olha soh:

usei o

TSLines():New(015,005,390,165,"BLACK BOX",oDlg,nRGB(160,160,160),nRGB(160,160,160),,.T.,.F.,.F.,"",oFont,,.F.)

e tudo certo...

agora, fica a duvida, pq com o TGroup o TFolder nao aparece ???