自動的にリストビューがスクロールされると思います。
これをやめさせたいのですが、どうすればいいのでしょうか?
わかる方教えてください _ _
#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