Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
VFP Tip - Mouse Cursor
Message
 
 
To
22/07/1999 12:38:10
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00244825
Message ID:
00244859
Views:
18
>>I posted a question on how do you get the mouse cursor to reapper if a user TABs to a command button and presses the ENTER key. Whenever a users moves between controls using the keyboard the mouse cursor disappears. To resolve this, I placed the following code in the KeyPress of the command button:
>>LPARAMETERS nKeyCode, nShiftAltCtrl
>>if nKeyCode = 13
>>   Mouse Click at ;
>>      This.Top + This.Height/2, ;
>>      This.Left + This.Width/2 ;
>>      pixels window (wontop()) left
>>   NoDefault
>>else
>>   DoDefault()
>>endif
>>
>
>Sounds good. Just FYI, I found you can also use something like this to force the mouse pointer to appear:
>
>x=mrow("SCREEN",3)
>y=mcol("SCREEN",3)
>mouse drag to x+1,y+1 pixels
>mouse drag to x,y pixels
>
>Bill

I tried that as well. I wanted the cursor to appear over the command button that just fired. You could modify your code to do the same thing. The problem with drag is if you are over data it gets highlighted, but then your reverse drag would un-highlight anything [as if 1 pixel would really be noticeable to the user :)]
Mark McCasland
Midlothian, TX USA
Previous
Reply
Map
View

Click here to load this message in the networking platform