xBrowse color (Solved)

Post Reply
User avatar
ctoas
Posts: 103
Joined: Wed Oct 26, 2005 2:38 pm
Location: São Paulo - Brasil
Contact:

xBrowse color (Solved)

Post by ctoas »

Good afternoon.

How to set the xBrowse cell / line color when it is out of focus?

Thanks
Last edited by ctoas on Thu Jan 14, 2021 5:47 pm, edited 1 time in total.
Christiano Augusto Silveira
christiano.silveira@gmail.com

MaxxTech Soluções em TI
http://www.maxxtech.com.br
User avatar
FranciscoA
Posts: 1964
Joined: Fri Jul 18, 2008 1:24 am
Location: Chinandega, Nicaragua, C.A.

Re: xBrowse color

Post by FranciscoA »

bClrSel,; // default color pair for selected row
bClrSelFocus,; // default color pair for selected row when control has focus
Francisco J. Alegría P.
Chinandega, Nicaragua.

Fwxh1204-MySql-TMySql
User avatar
FranciscoA
Posts: 1964
Joined: Fri Jul 18, 2008 1:24 am
Location: Chinandega, Nicaragua, C.A.

Re: xBrowse color

Post by FranciscoA »

Code: Select all

local aGradBarSel:= { { 1, RGB(252,252,195)   , RGB(248,195, 134) } }
local aGradRowSel:= {{1, RGB(108,125, 184), RGB(241,222,088)}}

WITH OBJECT oBrw
      :bClrSel          := {|| { nRGB(  0,  0,  0), aGradRowSel } }  // para barra de linea selecc cuando el control no tiene el foco
      :bClrSelFocus    := { || { CLR_BLACK, aGradBarSel } }     // para barra de linea selecc cuando el control tiene el foco
 END
Francisco J. Alegría P.
Chinandega, Nicaragua.

Fwxh1204-MySql-TMySql
User avatar
ctoas
Posts: 103
Joined: Wed Oct 26, 2005 2:38 pm
Location: São Paulo - Brasil
Contact:

Re: xBrowse color

Post by ctoas »

Hello Francisco.

Mine is already like this, the question I want to solve is when it loses focus.

See the images.

with focus
Image

without focus
Image
Christiano Augusto Silveira
christiano.silveira@gmail.com

MaxxTech Soluções em TI
http://www.maxxtech.com.br
User avatar
Otto
Posts: 4470
Joined: Fri Oct 07, 2005 7:07 pm
Contact:

Re: xBrowse color

Post by Otto »

Hello Christiano,
I like your design.
Best regards,
Otto
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org

********************************************************************
User avatar
ctoas
Posts: 103
Joined: Wed Oct 26, 2005 2:38 pm
Location: São Paulo - Brasil
Contact:

Re: xBrowse color

Post by ctoas »

Thanks Otto

See the full image for viewing

Image
Christiano Augusto Silveira
christiano.silveira@gmail.com

MaxxTech Soluções em TI
http://www.maxxtech.com.br
User avatar
nageswaragunupudi
Posts: 8017
Joined: Sun Nov 19, 2006 5:22 am
Location: India
Contact:

Re: xBrowse color

Post by nageswaragunupudi »

I am not sure what exactly you are looking for.
Is this what you want?

Code: Select all

oBrw:bClrStd    := { || { CLR_BLACK, If( GetFocus() == oBrw:hWnd, CLR_WHITE, CLR_HGRAY ) } }
 
Regards

G. N. Rao.
Hyderabad, India
User avatar
ctoas
Posts: 103
Joined: Wed Oct 26, 2005 2:38 pm
Location: São Paulo - Brasil
Contact:

Re: xBrowse color

Post by ctoas »

Nages, the idea is this, but it would be in the color of the cell. He had already tried it, but without success.

Thanks
Christiano Augusto Silveira
christiano.silveira@gmail.com

MaxxTech Soluções em TI
http://www.maxxtech.com.br
User avatar
ctoas
Posts: 103
Joined: Wed Oct 26, 2005 2:38 pm
Location: São Paulo - Brasil
Contact:

Re: xBrowse color

Post by ctoas »

Question resolved!

The answer was in my face and I didn't see ...

Thank you all!

Code: Select all

oBrw:bClrSel := {||{nRGB(255,255,255), nRGB(060,072,251)}}
Christiano Augusto Silveira
christiano.silveira@gmail.com

MaxxTech Soluções em TI
http://www.maxxtech.com.br
Post Reply