by yata » 2011年2月06日(日) 15:12
WinXPSp3 AB Ver4.20
MainWnd_Creatイベントでテキストファイルからリストビューに取り込んで表示させて
いますが、最初はどの行も選択(青色表示)されずに表示されます。
マウスで1回はクリックしないと[↓]キーでリスト内を操作できません。
そこで、下記コードの一番下でビュー上の1行目(Index=0)を選択状態(強調表示)
で表示されるように処理をしたいです。
Radで「選択を常に表示」にしています。
SendMessageでどのように指定したらよいですか?。
item.mask=LVIF_STAYE
item.state=LVIS_SELECTED
item.iItem=0
SendMessage(hList,LVM_SETITEM,0,VarPtr(item))
でうまく行きません
お願いできるなら hList とindexを指定して特定の行を選択表示させる
関数を作って頂けたらと思いますが厚かましいでしょうか?
よろしくお願いいたします。
変数宣言等は略
Open strFile For Input As #1
i=0
While( Eof(1)=0 )
LineInput (1, strBuf)
lngCommaPos=InStr(1,strBuf,",") 'コンマの位置
strBuf1=Left$(strBuf,lngCommaPos-1)
strBuf2=Mid$(strBuf,lngCommaPos+1)
With item
.mask=LVIF_TEXT
.pszText=StrPtr(strBuf1)
.iItem=i
.iSubItem=0
SendMessage(hList,LVM_INSERTITEM,i,VarPtr(item))
.pszText=StrPtr(strBuf2)
.iItem=i
.iSubItem=1
SendMessage(hList,LVM_SETITEM,i,VarPtr(item))
End With
i=i+1
Wend
Close #1
----------此処に追加したい---- item.iItem=0 を選択表示にする
WinXPSp3 AB Ver4.20
MainWnd_Creatイベントでテキストファイルからリストビューに取り込んで表示させて
いますが、最初はどの行も選択(青色表示)されずに表示されます。
マウスで1回はクリックしないと[↓]キーでリスト内を操作できません。
そこで、下記コードの一番下でビュー上の1行目(Index=0)を選択状態(強調表示)
で表示されるように処理をしたいです。
Radで「選択を常に表示」にしています。
SendMessageでどのように指定したらよいですか?。
item.mask=LVIF_STAYE
item.state=LVIS_SELECTED
item.iItem=0
SendMessage(hList,LVM_SETITEM,0,VarPtr(item))
でうまく行きません
お願いできるなら hList とindexを指定して特定の行を選択表示させる
関数を作って頂けたらと思いますが厚かましいでしょうか?
よろしくお願いいたします。
変数宣言等は略
Open strFile For Input As #1
i=0
While( Eof(1)=0 )
LineInput (1, strBuf)
lngCommaPos=InStr(1,strBuf,",") 'コンマの位置
strBuf1=Left$(strBuf,lngCommaPos-1)
strBuf2=Mid$(strBuf,lngCommaPos+1)
With item
.mask=LVIF_TEXT
.pszText=StrPtr(strBuf1)
.iItem=i
.iSubItem=0
SendMessage(hList,LVM_INSERTITEM,i,VarPtr(item))
.pszText=StrPtr(strBuf2)
.iItem=i
.iSubItem=1
SendMessage(hList,LVM_SETITEM,i,VarPtr(item))
End With
i=i+1
Wend
Close #1
----------此処に追加したい---- item.iItem=0 を選択表示にする