topic-41829

Posts: 7318

Joined: Thu Oct 18, 2012 07:17 PM

Problem with Ribbonbar
Posted: Fri May 27, 2022 08:06 AM

I have a Mdichild with a Ribbonbar and one xbrowse as you can see here :

and If I click on the tab of the ribbonbar, the ribbon does not shrink and becomes white and the xbrowse does not refresh

and the buttons of the first and only tab disappear as you can see here

Building the ribbon

Code (fw): Select all Collapse

        local aRbPrompts:={"Opzioni"}
        local nAltezzaRibbon:= 140

   ::oRebar := TRibbonBar():New(::oWinTabellone, aRbPrompts,,,,nAltezzaRibbon,30,,,,,,,,,,.T.,)
   ::nBarHeight := ::oRebar:nHeight
   ::oReBar:bLDblClick = { || (iif( ::oReBar:nHeight > 32, ::oReBar:nHeight := 32, ::oReBar:nHeight := nAltezzaRibbon ),;
   ::nBarHeight := ::oRebar:nHeight, ::oLbx:refresh()  ) }

the xbrowse

Code (fw): Select all Collapse

@ ::oRebar:nHeight+2, 0 XBROWSE  ::oLbx OF ::oWinTabellone
      ::oLbx:SetArray(::aTabellone,,,.F.)

....
::oWinTabellone:oClient := ::oLbx
      ::oWinTabellone:oControl := ::oLbx

any solution Please ?

Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)

I use : FiveWin for Harbour March-April 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com

FiveTech Support Forums

Continue the discussion