How to stop cursor flicker in Word?
Hi George,
maybe something changed or is changing the blinking time.
Have a look at GetCaretBlinkTime and SetCaretBlinkTime
Option Explicit
' -----------------------
Declare Function SetCaretBlinkTime Lib "user32" _
(ByVal wMSeconds As Long) As Long
Declare Function GetCaretBlinkTime Lib "user32" () As Long
' ---------------
Sub Test539()
MsgBox GetCaretBlinkTime
SetCaretBlinkTime (500) ' half a second is a common value
End Sub
--
Greetings from Bavaria, Germany
Helmut Weber, MVP WordVBA
Win XP, Office 2003
"red.sys" & Chr$(64) & "t-online.de"
|