DonB
Guest
|
 Posted:
Tue Apr 19, 2005 12:10 am Post subject:
Custom Cursor Size VBA |
|
|
I developed a VBA piece of code which I call up from a button but I would
like to enhance it a bit so that when I place the cursor on the button the
tooltip will say "change to 100% size" and then when I'm at 100% I would
like the tooltip to say "change to 10% size"
Here's the code I use at present.
Public Sub CrosshairToggle()
Dim PrefsDisplay as AcadPreferencesDisplay
Set PrefsDisplay = ThisDrawing.Application.Preferences.Display
If PrefsDisplay.CursorSize = 10 then
PrefsDisplay.CursorSize = 100
Else: PrefsDisplay.CursorSize = 10
End If
End Sub
Can anyone show me how to change the tooltip
TIA
DonB
|
|
FAQ
Memberlist
Register
Profile
Log in to check your private messages
Log in