mouse scroll help

[oxicottin]

hello, I want to add this "http://www.lebans.com/mousewheelonoff.htm" to my
2003 database. I am having trouble figuring it out! I have a few form and
some I want to be able to scroll the records and some I want to be able to
scroll the current record. It says I just add the .dll with my databse in the
same folder and apply code. Do I go to the form properties under Event/On
Load and apply this code?

' Turn the MouseWheel On
Dim blRet As Boolean
blRet = MouseWheelON

Then go to form properties under Event/On close and apply this code?

' Turn the MouseWheel Off
Dim blRet As Boolean
blRet = MouseWheelOFF

If so then its not working for me. Can someone please help? Thanks a million!

Reguards,
Chad

 

[Cheese_whiz]

Hi oxi,

What you're suppose to do, to elimante all mousewheel scrolling, is to put
the following code in form that always opens in your database (like a for you
use for a switchboard):

In the on_load event of that form, add:

Sub Form_Load
Dim blRet as Boolean

blRet = MouseWheelOFF

End Sub

Now, if you want to have a situation where each form does a different thing,
I'd probably still put the same code in my form used as a switchboard, then
for each form I wanted to scroll in, I'd add:

Sub Private ScrollingForm_Load
Dim blRet as Boolean

blRet = MouseWheelON

End Sub

Then this in the On_Close Event of the same form:

Sub Private FormScrollingForm_Close()
Dim blRet as Boolean

blRet = MouseWheelOFF

End Sub

I believe if you did that, every form would default to NOT scrolling but the
forms you added the two prodedures right above WOULD scroll.

Give it a try and post back if you have a problem. I think that should work.

CW