xBrowse GroupHeader color

xBrowse GroupHeader color

Postby Rick Lipkin » Thu Aug 27, 2015 1:33 pm

To All

Is it possible to just change the GroupHeader color to make it a different color from the standard Header's ? .. grey perhaps ?
Code: Select all  Expand view

// project plan ---------------------------

              REDEFINE xBROWSE oLbx3  ;
              ARRAY aPlan             ;
              HEADERS "Budget"+CRLF+"Item",         ;
                      "Origional"+CRLF+"Budget",    ;
                      "Budget"+CRLF+"Revision",     ;
                      "Current"+CRLF+"Budget",      ;
                      "Origional"+CRLF+"Contract",  ;
                      "Contract"+CRLF+"Revisions",  ;
                      "Current"+CRLF+"Committed",   ;
                      "Pending"+CRLF+"Proposals",   ;
                      "Potential"+CRLF+"Exposures", ;
                      "Potential"+CRLF+"Costs",     ;
                      "Potential"+CRLF+"Project Costs", "hidden" ;
              COLSIZES 135,75,75,75,75,75,75,75,75,75,75 ; // 11
              PICTURE "","@)999,999,999.99",;
                         "@)999,999,999.99",;
                         "@)999,999,999.99",;
                         "@)999,999,999.99",;
                         "@)999,999,999.99",;
                         "@)999,999,999.99" ;
              ID 174 of oCust     ;
              AUTOCOLS CELL LINES FOOTERS

              oLbx3:SetGroupHeader( 'Before Construction', 2, 4 )  // <-- change color for all three ?
              oLbx3:SetGroupHeader( 'During Construction', 5, 7 )
              oLbx3:SetGroupHeader( 'Un-Forseen Costs', 8, 11 )

              oLbx3:lHScroll := .t.  // turn on horiz scroll bar
              oLbx3:hidden:Hide()    // hide last column used for row color

              oLbx3:nStretchCol  := 1
              oCol           := oLbx3:aCols[ 1 ]
              oCol:bFooter   := { || Ltrim( Str( oLbx3:KeyNo() ) ) + " / " + LTrim( Str( oLbx3:KeyCount() ) ) }

              // maketotals

              oLbx3:nFooterTypes    := AGGR_SUM
              For i = 1 to LEN( oLbx3:aCols )
                  oLbx3:aCols[ i ]:bSumCondition := { || !( IfNil( oLbx3:Hidden:Value(), "" ) $ [24] ) }
              Next
 

Image
User avatar
Rick Lipkin
 
Posts: 2665
Joined: Fri Oct 07, 2005 1:50 pm
Location: Columbia, South Carolina USA

Re: xBrowse GroupHeader color

Postby nageswaragunupudi » Thu Sep 03, 2015 2:55 pm

Firstly, bClrHeader also does not take effect as long as oBrw:l2007 is true.
As of now we have not implemented specifying separate color for group header. It uses the same color of the first column.
It is, however, possible to specify a separate font for each group header.
Regards

G. N. Rao.
Hyderabad, India
User avatar
nageswaragunupudi
 
Posts: 10622
Joined: Sun Nov 19, 2006 5:22 am
Location: India


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 40 guests