Antonio: CLASS TRBtn

[byte-one]

Antonio, in this class the buttons are not declared with style WS_TABSTOP!?

I have changed the calls ::nStyle := ...... to

Code: Select all  Expand view  RUN

  ::nStyle    = nOR( WS_CHILD, WS_VISIBLE, if(oWnd:IsKindOf( "TDIALOG" ), WS_TABSTOP, 0 ) )
 

Is this right?

[Antonio Linares]

Günther,

Yes, it is right and it makes pefect sense

Included for next FWH build, many thanks!

[Antonio Linares]

Günther,

I think a better implementation would be:

::nStyle = nOR( WS_CHILD, WS_VISIBLE, If( ! oWnd:IsKindOf( "TRBGROUP" ), WS_TABSTOP, 0 ) )

So the control may be placed any where and only on a RibbonBar would not need the focus.