Ronald Anderson a écrit :

> What am I missing.
> 
> LOCAL FN FindBox
> gVo = gV:gHo = gH
> gH = INT(MOUSE(_horz)-185)/50+1
> gV = INT(MOUSE(_vert)-100)/50+1
> END FN
> 
> 
> LOCAL FN goWhite(v,h)                             'paint cell white
> COLOR _zWhite
> DIM myRect.0, t,l,b,r

The above line should read like this:
DIM myRect.8;0,t,l,b,r

> t = gBox.gT(v,h)+6
> l = gBox.gL(v,h)+6
> b = gBox.gB(v,h)-6
> r = gBox.gR(v,h)-6
> CALL PAINTRECT(myRect)                            'paint it white
> END FN
> 
> 
> LOCAL FN Process                                  'select cell
> DIM myRect.0, t,l,b,r

ditto

See if that fixes your problem.

Alain