FiveTech Software tech support forums

La clase es: Ribbonbar
el archivo en carpeta source: tribbon.prg

ejemplos: ribbon.prg, ribbon2.prg, ribbon3.prg

Dear Ubiratan,

Many thanks

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

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 != NI...

Cristobal made a new release of tribbon DEFINE RIBBONBAR [ <oRBar> ] ; [ <of:OF, WINDOW> <oWnd> ] ; [ <prm: PROMPT, PROMPTS, ITEMS> <cPrompt,...> ] ; [ <act: ACTION, EXECUTE, ON CHANGE> <uAction> ...

... renamed as users.xyz can also be used. * New function HtmlView( cURL, [cTitle] ): Displays url in a resizable dialog. * More Enhancements on TRibbon class: Style 2016 * Enhancement: samples\FiveDbu.prg now creates the source code for creating the indexes of a DBF in use with indexes opened ...

... I'm going to share the customization. These are the changes I've made in my ribbon, I do it using the 2010 style as default: * when defining the Tribbon use a size that fits the heighs of the folder and let no space in the top of them. I use 22 as nTopMargin in the New() method. ::oRebar := TRibbonBar():New(::oWndMain, ...

... Error BASE/1132 Bound error: array access Args: [ 1] = A { ... } length: 3 [ 2] = N 5 Stack Calls =========== Called from: .\source\classes\TRIBBON.PRG => (b)TRIBBONBAR_PAINTFLD( 837 ) Called from: .\source\classes\TRIBBON.PRG => TRIBBONBAR:PAINTFLD( 859 ) Called from: .\source\classes\TRIBBON.PRG ...

Excelent..!

Solo es colocar imagenes o hay acciones individuales como con la TRibbon.? gracias...

> I not think it it animated GIF but only jpg look the link about

if you download the image and inspect it then you will see that it is a GIF

Silvio, The FWH RibbonBar supports the 2015 style but the buttons look orange instead of blue (is this what you meant ?) In Windows 10 mspaint, the ribbonbar shows a lighter blue color and a darker blue border If this is the standard color, then we could try to modify the orange color that we curre...

Silvio, The FWH RibbonBar supports the 2015 style but the buttons look orange instead of blue (is this what you meant ?) In Windows 10 mspaint, the ribbonbar shows a lighter blue color and a darker blue border If this is the standard color, then we could try to modify the orange color that we curren...

I 'm tryng to use tribbonbar 2015 a question the rbutton have the style 2015 ? I wish create this ( see the background of the button) style OfficeUniversal https://documentation.devexpress.com/HelpResource.ashx?help=WindowsForms&document=img118476.jpg it is possible have on f...

... MYC_FLAGS = MYDEFINES = MYPRG_FLAGS = [Source\Classes\tgdiplus.prg] MYC_FLAGS = MYDEFINES = MYPRG_FLAGS = [source\classes\tribbon.prg] MYC_FLAGS = MYDEFINES = MYPRG_FLAGS = [source\classes\trpanel.prg] MYC_FLAGS = MYDEFINES = MYPRG_FLAGS = [source\classes\trbgroup.prg] ...

No se si en los samples de la TRibbon vi algo como lo que quieres, un boton con un despliegue, saludos...

This is the line with the error (in tribbon.prg):

Code: Select all  Expand view

::hBmpBrushEx   = GradientBmp( Self, ::nRight - ::nRightMargin - 3, ::nBottom - ::nTopMargin + 1, ::aGrad )

It looks like ::nBottom and/or ::nTopMargin have no value.

EMG