| 投稿日 | ： 2005/12/14(Wed) 16:48 |
| 投稿者 | ： ひろんた |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Re^2: ListViewにエクスプローラの詳細表示のようにアイコンをだしたい |
早速の御教授ありがとうございます。
質問に答えます。
> 関連付けられたアイコンが取得できているのですか（大・小）
hIcon = ExtractAssociatedIcon(App.hInstance, _
Dir1.path & "\" & s & vbNullC
har, _
0)
で取得したアイコンです。大、小かはわかりません。
二つ取得できるのですね？
> 取得できているが、ImageList1 ImageList2 からの表示ができないのですか？
取得したアイコンをImageList1に追加するのが
DrawIcon ImageList1.hdc, 0, 0, hIcon
です。
> 大きいアイコンは表示できるが、小さいアイコンが表示できないのか？
大きいアイコンはいりません。
小さいアイコンはPicture1にだせているので取得できてると思います。
> 小さいアイコンはどのようにして取得していますか？
hIcon = ExtractAssociatedIcon(App.hInstance, _
path & "\" & ファイル名 & vbN
ullChar, _
0)
です。
> 今一質問が理解できません。
> (中途半端な注釈もないコードは私には理解できません。m(__)m)
すいません私もListViewに関連付けされた小さいアイコンを表示したく
色々コードをコピペして書いていますがなぜアイコンが取得できたのかさえ
解かっていません。
よろしければその辺も含め御教授願いただければ幸いです。