Кто-нить делал прокрутку колесом в flexgride? И вообще, скролинг в нем реален?

Выдает ошибку: Object does't support this property or method

Private Function WindowProc(ByVal hw As Long, ByVal uMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
Static lpPrevWndProc As Long
Static GridPtr As Long
Dim gList As Object
If lpPrevWndProc = 0 And uMsg < WM_USER Then Exit Function
Select Case uMsg
Case 522
If GridPtr <> 0 Then
Set gList = ObjFromPtr(GridPtr)
If Abs(wParam) = 7864320 Then
gList.Scroll 0, -(wParam / Abs(wParam))
Else
gList.Scroll 0, -(wParam / Abs(wParam)) * 10
End If
End If
Case WM_SETPREVPTR
lpPrevWndProc = wParam
Case WM_SETGRID
GridPtr = wParam
Case WM_RESTORE
SetWindowLong hw, GWL_WNDPROC, lpPrevWndProc
End Select
WindowProc = CallWindowProc(lpPrevWndProc, hw, uMsg, wParam, lParam)
End Function

Дык и я об ентом! Какой тогда у него есм метод?

НЭМА :-(

нэма метода такого. Есм scrolltrack, но это не то