Disable mouse wheel

[cdmmaui]

Hello,

How do I disable mouse wheel events?

Thank You,

[Antonio Linares]

Darrell,

On what controls do you want to disable the mouse wheel support ?

You can disable it for any control, including this in the desired class:

METHOD MouseWheel( nKeys, nDelta, nXPos, nYPos ) VIRTUAL

[cdmmaui]

Hi Antonio,

I have a function that is called from a listbox where the user highlights the record then clicks a button. What is happening is that the user is using the mouse wheel by accident and it is causing the highlighted record in the listbox to move. I would like to disable the mouse wheel when this function is called. Can you provide sample code?

Thank You,

[Antonio Linares]

Darrell,

Is it a standard listbox or a browse ?

If it is a browse, is it a TWBrowse or a TXBrowse ? or a third party one ?

[cdmmaui]

Hi Antonio,

Yes,

@135,000 LISTBOX oLbx FIELDS ...

[Antonio Linares]

Darrell,

You have to modify fwh\source\classes\wbrowse.prg this way:

METHOD MouseWheel( nKeys, nDelta, nXPos, nYPos ) VIRTUAL

and comment its source code in the same PRG