چرا شما به سورس دقت نمیکنی؟
این کد رو میزاری تو فرم لود برنامت بعد با ماژول سورسی که جناب
m.4.r.m دادند میتونی دیتاگرید را با موس حرکت بدی
'Subclass the datagrid control to allow mousewheel useage
lpPrevWndProc = SetWindowLong(DataGrid1.hWnd, GWL_WNDPROC, AddressOf WndProc)