Page 1 of 1
Another setcheck xbrowse - RESOLVED -
Posted: Sat Nov 02, 2024 5:02 pm
by Silvio.Falconi
I made this xbrowse to make a selection of Wheels
Code: Select all | Expand
WITH OBJECT :aCols[ 1]
:SetCheck(, .t. )
*:nHeadBmpNo := 2
END
for Now I can click only on first column to check , I wish click on second column to check first column
then I wish colorize with orange color the record selected
I made
:bClrSel := { || { ORANGE,CLR_WHITE } } but not run ok
and I wish no cursor on xbrowse , because at init I see the bx on first line I made also
oBrw:bLostFocus := { || oBrw:nMarqueeStyle := 0 }
oBrw:bGotFocus := { || oBrw:nMarqueeStyle := 2 }
but not run ok
Re: Another setcheck xbrowse
Posted: Sat Nov 02, 2024 10:20 pm
by nageswaragunupudi
I made
:bClrSel := { || { ORANGE,CLR_WHITE } } but not run ok
Naturally it does not.
You may use bClrStd
Re: Another setcheck xbrowse
Posted: Sat Nov 02, 2024 10:25 pm
by nageswaragunupudi
for Now I can click only on first column to check , I wish click on second column to check first column
Code: Select all | Expand
oBrw:aCols[ 2 ]:bLDClickData := { || oBrw:aCols[ 1 ]:CheckToggle() }
Re: Another setcheck xbrowse
Posted: Sun Nov 03, 2024 11:30 am
by Silvio.Falconi
nageswaragunupudi wrote:I made
:bClrSel := { || { ORANGE,CLR_WHITE } } but not run ok
Naturally it does not.
You may use bClrStd
If I made :bClrStd := { || { CLR_WHITE, ORANGE } } no good for me
I wish have the text white on orange when I select one record
and when I click over ( true) the second column ( that is checked) must colorize of orange
Re: Another setcheck xbrowse
Posted: Sun Nov 03, 2024 3:55 pm
by nageswaragunupudi
If I made :bClrStd := { || { CLR_WHITE, ORANGE } } no good for me
Need to make it conditional. Right?
Re: Another setcheck xbrowse
Posted: Sun Nov 03, 2024 4:28 pm
by Silvio.Falconi
nageswaragunupudi wrote:If I made :bClrStd := { || { CLR_WHITE, ORANGE } } no good for me
Need to make it conditional. Right?
I tried also
AEval( oBrw:aCols, { |oCol,i| If( oCol:hChecked , ;
oCol:bClrStd := { || { CLR_WHITE, ORANGE } } , nil ) } )
or
oBrw:aCols[ 2 ]:bClrStd :={ |oCol,i| If( oCol:hChecked , ;
{ || { CLR_WHITE, ORANGE } } , nil ) }
but not work
Re: Another setcheck xbrowse
Posted: Mon Nov 04, 2024 2:09 am
by nageswaragunupudi
Code: Select all | Expand
oBrw:bClrStd := { || { CLR_BLACK, If( oBrw:aRow[ 1 ], METRO_ORANGE, CLR_WHITE ) } }
Re: Another setcheck xbrowse
Posted: Mon Nov 04, 2024 9:38 am
by Silvio.Falconi
nageswaragunupudi wrote:Code: Select all | Expand
oBrw:bClrStd := { || { CLR_BLACK, If( oBrw:aRow[ 1 ], METRO_ORANGE, CLR_WHITE ) } }
Sorry Nages,
it wasn't what I wanted, that is, I wanted that when I passed the mouse over it (in the second column) the
writing could light up in orange just like I do with the menu on the right
I tried with
:nMarqueeStyle := 6 //MARQSTYLE_HIGHLROWMS
:bClrSelFocus := { || { CLR_BLACK, { { 1, LIGHTORANGE , ;
ORANGE } } } }
But I wish it only on second column
Re: Another setcheck xbrowse
Posted: Mon Nov 04, 2024 1:21 pm
by Silvio.Falconi
perhaps I found a solution
:nMarqueeStyle := 3
oBrw:aCols[ 2 ]:bClrSelFocus := { || { CLR_BLACK, { { 1, LIGHTORANGE , ;
ORANGE } } } }
