>Greetings all,
>
>After create a grid with 4 columns (2 within containners)... Everything works fine, but..
>
>The mousewheel only works with the mouse not pointed on any of those columns...
>
>I've already tried:
>
>
>*grid's init
>With This
> .RecordSource = "cursora"
> .column1.ControlSource = "cursora.ccol1"
> BINDEVENT(.column1.Controls_grid_icon1,"MouseWheel", thisform.grid1, "MouseWheel")
>
>
>But still not scrolling...
>
>TIA
>
>Claudio
For anyone when face this problem..
Here is what found as the solution to workaround with this,. On grid's mousewheel:
Lparameters nDirection, nShift, nXCoord, nYCoord
Local nScrollPos
nScrollPos = Iif(nDirection = -120, 1, 0)
This.DoScroll(nScrollPos)
"Now to him who is able to do immeasurably more than all we ask or imagine, according to his power that is at work within us, Ephesians 3:20