Problemas de pintado en xBrowse

[horacio]

Colegas, adjunto imagen



Uso FWH14.12 BCC 5.82 y Harbour 3.2.0dev (r1412151448). Alguna idea ??? Gracias.

[horacio]

+1

[nageswaragunupudi]

The color used in recordselector-footer rectangle is Eval( oBrw:bClrFooter )[ 2 ]
Please set oBrw:bClrFooter to match the footer gradient.

[horacio]

Muchas gracias Rao, funcionó perfectamente.

Saludos

[nnicanor]

Hola,

Como estas colega, me puedes regalar los parámetros y colores del Xbrowse que usaste para que la apariencia sea completamente gris ?

Saludos

[horacio]

Aqui los parámetros de color

Code: Select all

    
Local aRowGrad     := { { .5, nRGB( 255, 255, 255 ), nRGB( 240, 240, 240 ) }, ; 
                           { .5, nRGB( 240, 240, 240 ), nRGB( 232, 232, 232 ) } }
Local aSelGrad      := { { .5, RGB( 255, 255, 180 ), RGB( 255, 237, 178 ) }, ;
                           { .5, RGB( 255, 218, 103 ), RGB( 255, 233, 162 ) } }
With Object oBrw               
:nColDividerStyle  := 5
:nMarqueeStyle     := 5 //MARQSTYLE_HIGHLCELL
:nColorPen         := Rgb( 225, 225, 225 )
:nRecSelColor      := nRGB( 240, 240, 240 )
:bClrSel           := { || { CLR_BLACK, RGB( 255, 255, 255 ) } }
:bClrSelFocus      := { || { CLR_BLACK, aSelGrad } }
:bClrRowFocus      := { || { CLR_BLACK, aRowGrad } }
:bClrGrad          := { | lInvert | If( !lInvert,  { { 0.5, nRGB( 255, 255, 255 ), nRGB( 240, 240, 240 ) }, ;
{ 0.5, nRGB( 240, 240, 240 ), nRGB( 232, 232, 232 ) } },; 
{ { 0.50, 12961221, 16777215 }, { 0.50, 16777215, 12961221 } } ) }
:bClrHeader        := {|| { CLR_BLUE, nRGB( 245, 245, 245 ) } } 
:bClrFooter        := {|| { CLR_BLUE, 16777215 } } 
:lAllowRowSizing    := .f.
:lAllowColSwapping  := .f.
:lAllowColHiding    := .f.          
:lKinetic          := .f. 
:lColDividerComplete := .t.
EndWith
Return 0    
 

Saludos

[nnicanor]

Gracias, colega.

Saludos,