HSPTV!掲示板

llmod3のListviewで作成したリストビューの行を指定して
その背景色を変更させたいのですが、どうすればいいのでしょうか？

他の掲示板に書かれていたカスタムドローのスクリプトを読んだのですが、よくわかりませんでした。
わかる方、ご教授お願いします。

すみませんがllmod3ではなくwinobj命令でリストビューを
表示させてますー。

>他の掲示板に書かれていた
このスレッドですか？ HSPの分野外の知識が必要ですが、
詳細はここをチェックしてください。
http://smile.poosan.net/perl-bin/hsp/ver3/hsp3.cgi?print+200509/05090019.txt

#define LVM_INSERTITEM $1007
#define LVM_INSERTCOLUMN $101B
#define LVM_SETEXTENDEDLISTVIEWSTYLE $1036


	oncmd gosub *notify, $4E

	winobj "syslistview32", "", $200, $50000001, 300, 200
	hListview = objinfo (stat, 2)

//	選択項目の場合にフォーカス外の背景色が消える？みたいなので
//	項目全体フォーカス
	sendmsg hListview, LVM_SETEXTENDEDLISTVIEWSTYLE, , $20

	szText = "ああああ"
	LVCOLUMN = $F, 0, 200, varptr (szText), 0, 0
	sendmsg hListview, LVM_INSERTCOLUMN, 0, varptr (LVCOLUMN)

	pszText = "AAAAAA"
	LVITEM = 1, 0, 0, 0, 0, varptr (pszText)
	sendmsg hListview, LVM_INSERTITEM, , varptr (LVITEM)

	pszText = "BBBBBB"
	LVITEM = 1, 1, 0, 0, 0, varptr (pszText)
	sendmsg hListview, LVM_INSERTITEM, , varptr (LVITEM)

	stop


*notify
	dupptr NMHDR, lparam, 12
	if NMHDR.0 = hListview {
		if NMHDR.2 = -12 {
			dupptr LPNMLVCUSTOMDRAW, lparam, 60

			if LPNMLVCUSTOMDRAW.3 = $1 {
				return $20
			}

			if LPNMLVCUSTOMDRAW.3 = $10001 {
				if LPNMLVCUSTOMDRAW.9 = 0 {
					LPNMLVCUSTOMDRAW.12 = $FFFF00
					LPNMLVCUSTOMDRAW.13 = $00FFFF
					return $2
				}
				if LPNMLVCUSTOMDRAW.9 = 1 {
					LPNMLVCUSTOMDRAW.12 = $FFFFFF
					LPNMLVCUSTOMDRAW.13 = $0000FF
					return $2
				}
			}

		}
	}

	return

レスがめちゃくちゃ遅くなって申し訳ありませんでした。

>すみませんがllmod3ではなくwinobj命令でリストビューを
>表示させてますー。

>このスレッドですか？ HSPの分野外の知識が必要ですが、
>詳細はここをチェックしてください。
>http://smile.poosan.net/perl-bin/hsp/ver3/hsp3.cgi?print+200509/05090019.txt

そのスレッドです。
ここの掲示板に質問する前に、いろいろと検索してそのスレッドを読んだんですが、わかりませんでした。
やっぱり、llmod3のlistviewで行色分けするには、HSP以外の知識が必要みたいで……。

駄目だったら、HSPwikiに載ってたwinobjの方法も試してみようと思っていましたので
Kpanさんのスクリプトは大変勉強になりました。
そのスクリプトを見ながら、もう一度自分で勉強してみたいと思います。

ありがとうございました。