Background Color

[arthursilvestre]

Good morning guys, Saturday morning here and I curled up with a background color. How do I change this color to the same color of blue ribbon?

NOTE: I use RIBBONBAR

[arthursilvestre]

Up

[Antonio Linares]

Arthur,

Look for this code in tribbon.prg:

Code: Select all  Expand view

  IF l2013
      nTopMargin    := 25
      nClrPaneRB    := RGB( 255, 255, 255 )
      nClrBoxOut    := RGB( 192, 192, 192 )
      nClrBoxIn     := RGB( 255, 255, 255 )
      nClrBoxSelOut := RGB( 255, 255, 255 )
      nClrBoxSelIn  := RGB( 255, 255, 255 )
      aGrad         := { { 1, RGB( 255, 255, 255 ), RGB( 255, 255, 255 ) } }
      aGradFld      := {| nOpt | if( nOpt == ::nStart, { { 1, RGB( 255, 255, 255 ), RGB( 255, 255, 255 ) } },;
                                                { { 1, RGB( 43, 87, 154 ), RGB( 43, 87, 154 ) } } ) }
      aGradHigh     := { { 1, RGB( 255, 255, 255 ), RGB( 255, 255, 255 ) } }
      aGradOver     := { { 1, RGB( 255, 255, 255 ), RGB( 255, 255, 255 ) } }
   endif

With the above colors for aGradFld it should be ok. Also you need to change this line in tribbon.prg line 813:

aGradFld = Eval( ::aGradFld, nPrompt )

[arthursilvestre]

thank you antonio, got it.