FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour :classname() no retorna "TBAR" ????
Posts: 68
Joined: Tue Apr 14, 2009 09:26 PM
:classname() no retorna "TBAR" ????
Posted: Mon Aug 24, 2009 12:47 PM
yo teno un Dialog con una TBAR, mas ao verificar con lo codigo:

for i=1 to len(odlg:acontrols)

? odlg:acontrols[i]:classname()

next

En la Tbar no me mostra "TBAR" , aparece "BTNBMP" .
Y en lo TBTNBMP nada me diz que é um Button de la Tbar, mas lo dato lBarBtn no assume .T.

Pregunta: Como saber que un controle de lo dialog es la Tbar para redimensiona-la durante la execucion de lo programa?


Saludos


William
Posts: 68
Joined: Tue Apr 14, 2009 09:26 PM
BUG ? :classname() no retorna "TBAR" ????
Posted: Tue Aug 25, 2009 01:31 PM

otra cosita estrana, quando se usa la funcion getparent() en un btnbmp de una tbar, me retorna "TXBROWSE" y non "TBAR" como deveria de ser.

Seria un BUG ?

Saludos

William

Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
Re: :classname() no retorna "TBAR" ????
Posted: Tue Aug 25, 2009 01:52 PM

William,

el objeto TBar se almacena en oWnd:oBar.

No se añade a oWnd:aControls, puesto que no debe tomar el foco.

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
Re: :classname() no retorna "TBAR" ????
Posted: Tue Aug 25, 2009 01:53 PM

William,

Para tu segunda pregunta, prueba asi:

MsgInfo( GetParent( oBtnBmp:hWnd ) == oBar:hWnd )

siendo oBtnBmp un botón situado en oBar

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 68
Joined: Tue Apr 14, 2009 09:26 PM
Re: :classname() no retorna "TBAR" ????
Posted: Tue Aug 25, 2009 05:37 PM

ok Antonio, voy a testar con isso.

Muchas Gracias

William

Continue the discussion