FiveTech Software tech support forums

... lista de palabras que se transforma en un array: [ <prm: PROMPT, PROMPTS, ITEMS> <cPrompt,...> ] #xcommand DEFINE RIBBONBAR [ <oRBar> ] ;                           [ <of:OF, WINDOW> <oWnd> ] ;                           [ <prm: PROMPT, PROMPTS, ...

... => TWINDOW:ACTIVATE( 1097 )   Called from: rbdesign.prg => MAIN( 26 )  I'm afraid the function ChangeStyle( oRBar, nStyle ) have an error because it set the style but then not refresh all the tab and all the control set on each tab

... sample < ribbon2.prg > The image doesn't change. http://www.pflegeplus.com/IMAGES/ribbon10.jpg ADD GROUP oGr1 RIBBON oRBar TO OPTION 1 PROMPT "Font" WIDTH 205 @ 10, 05 ADD BUTTON oBtn5 GROUP oGr1 BITMAP "..\bitmaps\bold16.bmp" GROUPBUTTON FIRST ...

... down below the tabs again. Please, set height of ribbonbar, look .../... local nTopMarg := 24 local nHeight := 128 + nTopMarg DEFINE RIBBONBAR oRBar WINDOW oWnd ; PROMPT "One and more", "Two and minus", "Three and more or minus" ; HEIGHT nHeight TOPMARGIN nTopMarg ...

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> ] ; [ OPTION <nOption> ...

Me respondo, me puse a revisar el archivo rbdesign.prg, ahi viene como generar el ribbonBar desde 0.

oRBar:AddTab( "CIERRE DIARIO" )

Gracias por no darme el pescado y forzarme a buscarlo por mi mismo.

... es: ¿Es posible administrar estas opciones usando un RibbonBar? Leyendo encontré que se pueden deshabilitar los "Tabs" del RibbonBar (oRBar:aEnable[NoDeTab]:=.F.) y efectivamente lo deshabilita, pero me gustaría poder esconderlo (trate con la opción oRBar:hide[2]:=.T., pero no funciona). ...

Cristobal, It is actually oRBar:setStyles() with an "s" at the end. I think it should have been setStyle() since it only changes one style, but changing the name of the method now could break existing code in use now. It may ...

Please try with and tell me

James Bott wrote:
oRBar:= TRibbonbar():New(…)
oRbar:setStyle(…)
oRBar:Default()

James

... And there are some complications in adding a setStyle() method since the style is mostly setup in the New() method so you can't do something like: oRBar:= TRibbonbar():New(…) oRbar:setStyle(…) At least you can't without revising the New() method a lot. Actually, there is already a setStyles() method ...

... is already drawn at the end of the New() method so you can't change lots of things outside the class. One would like to just be able to do: oRBar:= TRibbonbar():new(...) oRBar:nClrRBar := RBG(54,54,54) For some colors you can do this, but for others you can't. Actually most of the colors ...

Gracias Antonio, esta funcionando.

Saludos.
Ruben Dario Fernandez

Ruben, En este codigo tienes un array con 3 elementos. Como tienes 5 pestañas en la ribbon, tienes que modificarlo para que tenga cinco elementos: oRBar:aClrTabTxt = { { | oSelf , nPrompt | If( nPrompt == oRBar:nOption, CLR_GREEN , CLR_WHITE ) },; { | oSelf , nPrompt | If( nPrompt == oRBar:nOption, ...

Amigos: haciendo un cambio de colores en la ribbon con un ejemplo del foro de inglés me da un error. DEFINE RIBBONBAR oRBar WINDOW oWinMain  PROMPT  "Inicio    " ,  "    Archivos    ", "    Reportes Impresos    ", "Utilidades    ",;          ...

first problem correct with

DEFINE RIBBONBAR oRBar WINDOW oWnd PROMPT "One", "Two", "Three" HEIGHT 163 TOPMARGIN 45 2015