Scroll wheel causing big problem. Major Help.

[Antonio Linares]

Harvey,

Could you provide a small and self contained example to reproduce it here ? thanks,

[James Bott]

Harvey,

Try this. Change the mouse setting in Windows to use a different number of lines, 2 or 4. Then see if the new number is showing up in the GETs. If it is not, then the 3 value is just a coincidence and I would look at the privates. Are you initializing the GETs with a private?

James

[Antonio Linares]

Harvey,

Please understand that if you don't provide a small and self contained example (this time and many times when you ask for tech support) it is quite difficult for us to help you in a proper way, thanks

[hag]

Please understand that if you don't provide a small and self contained example (this time and many times when you ask for tech support) it is quite difficult for us to help you in a proper way, thanks

Antonio
I appreciate your comment but its a very large and complex program and finding a snipet of code that is self contained is very difficult. The scrolling is in one part of the program and the get entering is in another. The problem happens in any get after the scroll is activated. Scrolling at one line per scroll takes the problem away.

[James Bott]

Harvey,

>I appreciate your comment but its a very large and complex program and finding a snipet of code that is self contained is very difficult.

Yes, and debugging a program we don't have is very difficult. Antonio is not asking you to find a snipet of code in your existing program, but to create a small program that shows the problem. If you can do this, then the problem is probably a FWH/Harbour problem. If you cannot do this, then the problem is probably in your own code.

>The scrolling is in one part of the program and the get entering is in another. The problem happens in any get after the scroll is activated.

This is one reason that I am concerned about the privates.

>Scrolling at one line per scroll takes the problem away.

How did you change it to scroll only one line--using the windows setting? Please try my suggested test (in previous message) using either 2 or 4 lines. Then also using 1 line, and let us know the results.

James

[hag]

James:
Set wheel in control panel. Set to 5,2 and the gets had the 5 and 2 appear.

>How did you change it to scroll only one line--using the windows setting? >Please try my suggested test (in previous message) using either 2 or 4 >lines. Then also using 1 line, and let us know the results.

The schroll was set to 1 with this function at top of program

function wheelScroll()
return nil

Get problem goes away.
Odd stuff.

[James Bott]

Harvey,

Ok, thanks for those results.

You still haven't answered how the GETs are being initialized. Are you using a private?

James

[hag]

Most of the gets are static or local.

The interesting thing is that once the odd number is enter intio the get it cant be removed thats why it seems as though the keyboard is affected in someway. If the get is character and i hit the space bar the odd number shows up.

[James Bott]

Harvey,

>In the data entry section I have a set key to command. Could this have anything to do with it? I'll take out set key to and see if it makes a difference.

Did you ever try this? If so, what was the result?

I see that in the Harbour source there is in the INKEY.CH file this:

#define INKEY_MWHEEL 64 /* Mask for mouse wheel events */

This leads me to believe that mouse events are going through the inkey() function, so SET KEY may be the source of the problem and/or the inkey() code might not be properly masking it. Most of FW does not use inkey() function.

James

[hag]

#define INKEY_MWHEEL 64 /* Mask for mouse wheel events

Where would I set it. In top prg. I do have a number of set key commands.

At work at this time I'll try later in the day.
Thanks for all of your help. Much appreciated.

[James Bott]

Harvey,

>#define INKEY_MWHEEL 64 /* Mask for mouse wheel events

>Where would I set it. In top prg. I do have a number of set key commands.

No, I didn't mean that you need to use this define--it is already being used by Harbour in the Inkey() function which is just a function to make Harbour compatible with Clipper. Windows uses it's own event handler.

However, SET KEY is probably going though the Inkey() function and possibly the mouse wheel events are also. Since you are using SET KEY which is also an old Clipper technique, this may be causing the problem with the mouse wheel that you are seeing. So, just comment out all your SET KEY commands and test the program again. If the problem goes away then we know the source of the problem is in the Inkey() routine.

If it is an Inkey()/SET KEY issue then it will probably have to be solved by either the Harbour or xHarbour group (depending on which you are using).

James

[hag]

Thanks james I'll let you know sometime this evening.

[nageswaragunupudi]

In the old DOS Clipper programs we used to SET EVENTMASK TO INKEY_ALL to capture mouse events by way of Inkey() values. If Eventmask is set, some mouse operations are read by Inkey.

When we use FWH in windows, I think we should not use the SET EVENTMASK. ( or Set the mask to KEY_BOARD ).

[hag]

nageswaragunupudi

Where might it be set and how do you unset it? I'm not familiar with this.

[nageswaragunupudi]

If it was not expressly set somewhere in your programs, you can safely ignore it. Default is okay. Please make sure it was not set in any of the programs. You may search for EVENTMASK in all your programs.