|
|
|
2013/6/29(Sat) 13:13:01|NO.55327
llmod3を使わずにリストビューを作っていて、
リストビューの情報を取得しようといろんなサイトをみて回ったのですが、
難しく理解できなかったのでお助けしていただけないでしょうか?
クリックした場所の文字列を取得したいです。
(test1.jpgをクリックしたらtest1.jpgという文字列を取得)
winobj "SysListView32", "", 0x00000200, 0x50000001, 640, 480
hList = objinfo(stat, 2)
sendmsg hList, $1036, , $20
loopcount=10
;リスト
szText = "No" : LVCOLUMN = 0x000F, 0, 30, varptr(szText), 0, 0
sendmsg hList, 0x101B, 0, varptr(LVCOLUMN)
szText = "ファイル名" : LVCOLUMN = 0x000F, 0, 100, varptr(szText), 0, 1
sendmsg hList, 0x101B, 1, varptr(LVCOLUMN)
szText = "更新" : LVCOLUMN = 0x000F, 0, 100, varptr(szText), 0, 2
sendmsg hList, 0x101B, 2, varptr(LVCOLUMN)
;ナンバー
repeat loopcount
pszText = strf("%02d",cnt+1) : LVITEM = 0x0001, cnt, 0, 0, 0, varptr(pszText)
sendmsg hList, 0x1007, 0, varptr(LVITEM)
loop
;ファイル名
repeat loopcount
pszText = strf("%02d",cnt+1)+".jpg" : LVITEM = 0x0001, cnt, 1, 0, 0, varptr(pszText)
sendmsg hList, 0x1006, 0, varptr(LVITEM)
loop
;更新
repeat loopcount
pszText = strf("%02d",cnt+1)+"日前" : LVITEM = 0x0001, cnt, 2, 0, 0, varptr(pszText)
sendmsg hList, 0x1006, 0, varptr(LVITEM)
loop
stop
| |
|
2013/6/29(Sat) 18:55:37|NO.55333
sendmsgでLVM_GETNEXTITEMとLVNI_SELECTEDを使えば番号がstatに返ってきます。
動作確認できていないので動くかわかりません><
screen 0,640,500
winobj "SysListView32", "", 0x00000200, 0x50000001, 640, 480
hList = objinfo(stat, 2)
sendmsg hList, $1036, , $20
loopcount=10
;リスト
szText = "No" : LVCOLUMN = 0x000F, 0, 30, varptr(szText), 0, 0
sendmsg hList, 0x101B, 0, varptr(LVCOLUMN)
szText = "ファイル名" : LVCOLUMN = 0x000F, 0, 100, varptr(szText), 0, 1
sendmsg hList, 0x101B, 1, varptr(LVCOLUMN)
szText = "更新" : LVCOLUMN = 0x000F, 0, 100, varptr(szText), 0, 2
sendmsg hList, 0x101B, 2, varptr(LVCOLUMN)
;ナンバー
repeat loopcount
pszText = strf("%02d",cnt+1) : LVITEM = 0x0001, cnt, 0, 0, 0, varptr(pszText)
sendmsg hList, 0x1007, 0, varptr(LVITEM)
loop
;ファイル名
repeat loopcount
pszText = strf("%02d",cnt+1)+".jpg" : LVITEM = 0x0001, cnt, 1, 0, 0, varptr(pszText)
sendmsg hList, 0x1006, 0, varptr(LVITEM)
loop
;更新
repeat loopcount
pszText = strf("%02d",cnt+1)+"日前" : LVITEM = 0x0001, cnt, 2, 0, 0, varptr(pszText)
sendmsg hList, 0x1006, 0, varptr(LVITEM)
loop
button "項目取得",*Get
stop
*Get
sendmsg hList, 0x100C,-1,0x0002
dialog stat
stop
| |
|
2013/6/29(Sat) 20:05:42|NO.55335
cats様ありがとうございます。
sendmsg便利ですね。無事番号が取得出来ましたありがとうございます!
これを元に1行まるまる取得と個別取得など出来るように勉強してみます。
|
|