Hi,

Many years ago i have used this checkcol.prg from Mr J.A Diego and it works
perfectly.

Yesterday i have enlarged the brow font from 8.Arial to 10 or 12.Arial but
the check box will have a white color edge on the highlighted row. If you
move the mouse pointer to the check box, the edge will be filled with blue
again. But once the highlight blue move to another row, the edge in the
privious row will became blue.

It looks like the box needs to expand follow the font size. Does anyone
know to change that?

Thank you

Frankie

hi,

> It looks like the box needs to expand follow the font size. Does anyone
> know to change that?

original


INLINE METHOD CreaChecks( nPosIni, nPosFin )
   ********************************************
   LOCAL aPos  := ::cellRect( nPosIni, .T. )
   LOCAL nSize := aPos[ 4 ] - aPos[ 2 ]
   LOCAL aSize := { nSize, nSize }

enhance to

   aSize[1] := newSize / default 16x 16

Hi.

Thank you for the head up.

I have checked the aSize will change when the font size has be changed. But
the XbpCheckBox size never change.

And I also have checked when aSize is 13,13 that all works well. To wrap it
up i just fixed aSize to 13,13 for the time being.

Thanks

On Fri, 13 Dec 2019 02:22:16 +0100, Jim Lee wrote:

> hi,
> 
>> It looks like the box needs to expand follow the font size. Does anyone
>> know to change that?
> 
> original
> 
> 
> INLINE METHOD CreaChecks( nPosIni, nPosFin )
>    ********************************************
>    LOCAL aPos  := ::cellRect( nPosIni, .T. )
>    LOCAL nSize := aPos[ 4 ] - aPos[ 2 ]
>    LOCAL aSize := { nSize, nSize }
> 
> enhance to
> 
>    aSize[1] := newSize / default 16x 16