HSP Tips

キャレットを表示させない方法

inputでキャレットを表示させない

説明

 キャレットを非表示にするにはWM_CTLCOLOREDITが渡されたら キャレットを非表示にします。また書き込み不可なmesboxなどを指定する場合はWM_CTLCOLORSTATICメッセージの上に この処理を施します。



HSPスクリプト


#uselib "user32.dll"
#func global HideCaret "HideCaret" sptr
#define global	  WM_CTLCOLOREDIT                 0x0133

	sdim test,640
	test="カーソルが表示されません"
	pos 5,5:input test,150,21
	hinput=objinfo(0,2)
	
	oncmd gosub *ON_WM_CTLCOLOREDIT, WM_CTLCOLOREDIT
	stop

*ON_WM_CTLCOLOREDIT
	hideCaret hinput
	return