FiveTech Software tech support forums

CLASS TRibbonBar FROM TControl

CLASSDATA lRegistered AS LOGICAL

DATA oBold, oFont

DATA aLeft
DATA aPrompts
DATA aDialogs
DATA aSizes
DATA aGrad
DATA aGradFld
DATA aGradOver
DATA aGradHigh
DATA aQuickRGrad
DATA nQuickHigh INIT 32 <---- New

METHOD Paint() CLASS TRibbonBar
...
if ::aQuickRGrad != NIL
GradientFill( ::hDC, 0, 0, ::nQuickHigh, ::nWidth, ::aQuickRGrad )
endif
...

Dear Ubiratan,

Many thanks

we have included it in the official FWH repo, so next FWH build will include it