HSPTV!掲示板

下のサンプルで「アイテム２」と書いてあるのを押すと、
自動的にリストビューがスクロールされると思います。
これをやめさせたいのですが、どうすればいいのでしょうか？
わかる方教えてください _ _

#uselib "user32.dll"
#func CreateWindowEx "CreateWindowExA" int,sptr,sptr,int,int,int,int,int,int,int,int,int
#uselib "comctl32.dll"
#func InitCommonControls "InitCommonControlsEx" var

	dim icce, 2
		icce = 8, 2
	InitCommonControls icce
	CreateWindowEx 0, "SysListView32", "", 0x50800029, 120,140, 400,200 , hWnd, 0, hInstance, 0
		hLV = stat

	dim lvc, 6
		lvc.0 = 7
		lvc.1 = 0
		lvc.2 = 100
	repeat 2
		szColumn = "カラム "+cnt
		lvc.3 = varptr(szColumn)
		sendmsg hLV, 0x101B, cnt, varptr(lvc)
	loop

	dim lvi, 13
		lvi.0 = 1
	repeat 20
		szText = "アイテム "+cnt
		lvi.1 = cnt
		lvi.5 = varptr(szText)
		sendmsg hLV, 0x1007, 0, varptr(lvi)
	loop

見た目ではよくわかりませんが、リストビューの最下行が半欠け（高さが足りない）に
なっているので、全部表示しようとして勝手にスクロールされています。
下のように高さを広げることで回避できます。

CreateWindowEx 0, "SysListView32", "", 0x50800029, 120,140, 400,【202】 , hWnd, 0, hInstance, 0

【202】の部分を210などにすれば、どうして勝手にスクロールする必要があるかわかると思います。

なるほど、そういうわけだったんですか
ご回答ありがとうございます

解決ボタンを押したのに似たような問題が出たので質問します

もし、↑の検証のようにユーザーの操作以外でスクロールされたら、
どのメッセージにその情報が入るのでしょうか？