Page 1 of 1

Background Color

Posted: Sat Aug 24, 2013 2:38 pm
by 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

Image

Re: Background Color

Posted: Mon Aug 26, 2013 11:37 am
by arthursilvestre
Up

Re: Background Color

Posted: Wed Sep 11, 2013 8:07 pm
by Antonio Linares
Arthur,

Look for this code in tribbon.prg:

Code: Select all

   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 )

Re: Background Color

Posted: Thu Sep 12, 2013 7:49 pm
by arthursilvestre
thank you antonio, got it. :)