FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour xbrowse record selector column
Posts: 845
Joined: Sun Oct 09, 2005 05:36 PM
xbrowse record selector column
Posted: Sat Mar 07, 2015 06:34 PM

se puede cambiar el color de la columna del record selector del xbrowse?
como?

Gracias

____________________

Paco
Posts: 2170
Joined: Fri Jul 18, 2008 01:24 AM
Re: xbrowse record selector column
Posted: Sat Mar 07, 2015 06:54 PM
Paco, intenta con:
Code (fw): Select all Collapse
     oBrw:nRecSelColor := 16777215
Francisco J. Alegría P.

Chinandega, Nicaragua.



Fwxh-MySql-TMySql
Posts: 845
Joined: Sun Oct 09, 2005 05:36 PM
Re: xbrowse record selector column
Posted: Sat Mar 07, 2015 07:22 PM

Bien !! en toda la columna de los registros,
pero sabes, la cabecera del record selector no cambia de color, esa como se cambia de color?

Gracias
Saludos

____________________

Paco
Posts: 2170
Joined: Fri Jul 18, 2008 01:24 AM
Re: xbrowse record selector column
Posted: Sat Mar 07, 2015 10:42 PM
Paco, asi lo hago, cuando cambio todos los colores del browse. Espero sirva de guia para tu implementacion.
Code (fw): Select all Collapse
//------------------------------
Function Color_oBrw(oBrw,cColor)
local aGradBarSelFocus := {{0.65,RGB(212,146,69),RGB(218,215,117)},{0.35,RGB(218,215,117),RGB(159,140,154)}}
local aGradBarSel:= {{1, RGB(108,125,184), RGB(241,222,088)}}

DEFAULT cColor := NIL

IF !cColor = NIL
  if cColor = "PLATA"
     oBrw:bClrGrad :=  { | lInvert | If( ! lInvert, ;
     { { 0.30,12961221,16777215 },;
       { 0.30,16777215,12961221 } },;
     { { 0.10,9363707,16777215 },;
       { 0.10,16777215,9363707 } } ) }
     oBrw:nRecSelColor := 16777215      //aqui le pongo el color de fondo del header.
     oBrw:bClrHeader    := {|| { nRGB(0,0,0), 16777215, } }     //aqui
     oBrw:bClrFooter    := {|| { 0,16777215 } } 
  elseif cColor = "XXXXX"
    ...
  endif
ENDIF
Return nil
Francisco J. Alegría P.

Chinandega, Nicaragua.



Fwxh-MySql-TMySql
Posts: 845
Joined: Sun Oct 09, 2005 05:36 PM
Re: xbrowse record selector column
Posted: Mon Mar 09, 2015 03:35 PM

listo Gracias,

Saludos

____________________

Paco

Continue the discussion