Keyboard rate instant setting

Share your advanced PureBasic knowledge/code with the community.
User avatar
Tenaja
Addict
Addict
Posts: 1959
Joined: Tue Nov 09, 2010 10:15 pm

Keyboard rate instant setting

Post by Tenaja »

Does anybody have a one-click plugin, script or program to "instantly" go from fast repeat rate to a reduced repeat rate? Slowing down the repeat rate is awesome for debugging, but kills the delete time... I can't be the only one who has wanted this...

...anyone?

Thanks!
User avatar
Derren
Enthusiast
Enthusiast
Posts: 316
Joined: Sat Jul 23, 2011 1:13 am
Location: Germany

Re: Keyboard rate instant setting

Post by Derren »

Windows only obviously

Code: Select all

Procedure.i GetRepeatRate()
	Protected rate.i
	SystemParametersInfo_(#SPI_GETKEYBOARDSPEED,0, @rate, 0)
	ProcedureReturn rate
EndProcedure 


Procedure.i SetRepeatRate(rate)
	SystemParametersInfo_(#SPI_SETKEYBOARDSPEED,rate, 0, 0)
EndProcedure 


Procedure.i GetRepeatDelay()
	Protected rate.i
	SystemParametersInfo_(#SPI_GETKEYBOARDDELAY,0, @rate, 0)
	ProcedureReturn rate
EndProcedure 


Procedure.i SetRepeatDelay(rate)
	SystemParametersInfo_(#SPI_SETKEYBOARDDELAY,rate, 0, 0)
EndProcedure 

;SetRepeatRate(31) ;0-31 ;Actual RepeatRate ;31 = fastest, 0 = slowest
;SetRepeatDelay(1) ;0-3 ;Delay Until Repeating starts ;0 = almost instantly, 3 = ca. 1 second delay
User avatar
Tenaja
Addict
Addict
Posts: 1959
Joined: Tue Nov 09, 2010 10:15 pm

Re: Keyboard rate instant setting

Post by Tenaja »

Thanks!!!
Post Reply