Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
How can I change custom MousePointer on object.
Message
From
12/09/1996 12:44:25
 
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Miscellaneous
Thread ID:
00007346
Message ID:
00007675
Views:
40
>Well commonly vfp3.0 provide 12 or 14 mousepoints on each object in property window.
>but I want to use custom mousepointer.
>I know that I can control custom mousepointer at VisualBasic. But can't at Vfp 3.0
>
>Please tell me how I can contain custom mousepointer in my applications.

Try this in the init of the form

declare integer SetSystemCursor in win32api integer hcur, integer hnum
declare integer LoadCursorFromFile in win32api string lpszFilename

this.icon_pointer = "C:\formation\h_point.cur"
xx = LoadCursorFromFile(this.icon_pointer)
if xx <> 0
=SetSystemCursor(XX, 32641) && replace system icon # 4
endif

You must have an icon file (?.cur) for the cursor you want and set a propertie in your form which contain the name and path of the file for the new pointer. Finally set the mousepointer to 4 for the control you want
the icon will be display with the new design.

Michel Poiré
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform