Hola a todos
El detalle que tengo es que al abrir un browse me pinta el primer registro en color gris obscuro y en algunos equipos demis clientes es inperceptible.
se soluciona con un click sobre el , pero quisiera que no pase esto...
saludos y gracias
primer registro invisible en xbrowse
-
- Posts: 132
- Joined: Sun Oct 23, 2005 4:09 pm
- Location: Pánuco,Ver. México
-
- Posts: 179
- Joined: Sun Jan 31, 2010 3:30 pm
- Location: Bucaramanga - Colombia
Re: primer registro invisible en xbrowse
METHOD New( oWnd ) CLASS TXBrowse
::bClrStd := {|| { CLR_BLACK, GetSysColor( COLOR_WINDOW )} }
::bClrSel := {|| { CLR_WHITE, GetSysColor( COLOR_INACTIVECAPTIONTEXT )} } // JR BLACK
::bClrSelFocus := {|| { CLR_WHITE, GetSysColor( COLOR_HIGHLIGHT )} }
::bClrStd := {|| { CLR_BLACK, GetSysColor( COLOR_WINDOW )} }
::bClrSel := {|| { CLR_WHITE, GetSysColor( COLOR_INACTIVECAPTIONTEXT )} } // JR BLACK
::bClrSelFocus := {|| { CLR_WHITE, GetSysColor( COLOR_HIGHLIGHT )} }
-
- Posts: 132
- Joined: Sun Oct 23, 2005 4:09 pm
- Location: Pánuco,Ver. México
Re: primer registro invisible en xbrowse
voy a probarlo, Gracias
- FranciscoA
- Posts: 1964
- Joined: Fri Jul 18, 2008 1:24 am
- Location: Chinandega, Nicaragua, C.A.
Re: primer registro invisible en xbrowse
Hola, puedes hacer algo como esto:
Function MYFunction()
local aGradBarSel:= { { 1, RGB(252,232,171) , RGB(248,195, 34) } }
local aGradRowSel:= {{1, RGB(108,125, 184), RGB(241,222,088)}}
oLbx := TXBrowse():New( oDlg )
oLbx:bClrStd := {|| { nRGB( 0, 0, 0), nRGB(255,248,220) } } // colores para lineas normales
oLbx:bClrSel := {|| { nRGB( 0, 0, 0), aGradRowSel } } // para barra de linea selecc cuando el control no tiene el foco
oLbx:bClrSelFocus := { || { CLR_BLACK, aGradBarSel } } // para barra de linea selecc cuando el control tiene el foco
.......
.......
.......
return nil
Espero te sirva
Function MYFunction()
local aGradBarSel:= { { 1, RGB(252,232,171) , RGB(248,195, 34) } }
local aGradRowSel:= {{1, RGB(108,125, 184), RGB(241,222,088)}}
oLbx := TXBrowse():New( oDlg )
oLbx:bClrStd := {|| { nRGB( 0, 0, 0), nRGB(255,248,220) } } // colores para lineas normales
oLbx:bClrSel := {|| { nRGB( 0, 0, 0), aGradRowSel } } // para barra de linea selecc cuando el control no tiene el foco
oLbx:bClrSelFocus := { || { CLR_BLACK, aGradBarSel } } // para barra de linea selecc cuando el control tiene el foco
.......
.......
.......
return nil
Espero te sirva
Francisco J. Alegría P.
Chinandega, Nicaragua.
Fwxh1204-MySql-TMySql
Chinandega, Nicaragua.
Fwxh1204-MySql-TMySql
-
- Posts: 132
- Joined: Sun Oct 23, 2005 4:09 pm
- Location: Pánuco,Ver. México
Re: primer registro invisible en xbrowse
Era Justamente lo que necesitaba..
gracias a todos
gracias a todos