| タイトル | ： Re^2: リストビューへのアイコン表示方法。 |
| 記事No | ： 8117 |
| 投稿日 | ： 2008/09/09(Tue) 18:00 |
| 投稿者 | ： 芸灼朗 |
ダンボさん、ありがとうございます。
紹介していただいたURLの一つ目の
> http://www.atmarkit.co.jp/fdotnet/dotnettips/336listviewimage/listviewimage.html
を参考に試したところ、ラージサイズでのアイコン表示は成功しました。
上記のページのコードを以下のように変えたところ本来アイコンが表示される箇所に
アイコンへのフルパスが表示されるようになりました。
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim imageDir As String = "C:\image" ' 画像ディレクトリ
Dim jpgFiles As String() = System.IO.Directory.GetFiles(imageDir, "*.ico")
'' ＊＊アイコンのサイズを縮小
Dim width As Integer = 10
Dim height As Integer = 10
ImageList1.ImageSize = New Size(width, height)
ListView1.LargeImageList = ImageList1
'' ＊＊リストビューの表示モードを詳細に変更
ListView1.View = View.Details
'' ＊＊列を３列追加
ListView1.Columns.Add("アイコン", 200, HorizontalAlignment.Left)
ListView1.Columns.Add("ファイル名", 200, HorizontalAlignment.Left)
ListView1.Columns.Add("拡張子", 200, HorizontalAlignment.Left)
For i As Integer = 0 To jpgFiles.Length - 1
Dim original As Image = Bitmap.FromFile(jpgFiles(i))
Dim thumbnail As Image = createThumbnail(original, width, height)
'' 変更なし。
ImageList1.Images.Add(thumbnail)
ListView1.Items.Add(jpgFiles(i), i)
original.Dispose()
thumbnail.Dispose()
Next
End Sub
詳細モードでアイコンを表示する場合はどのように設定を行えばよいのでしょうか？
追加の質問なのですが教えていただいたURLの記述は画像ファイルをパス指定して
イメージリストに入れ込んでいますが、前もってイメージリストに登録しておいた
画像をそのまま使う、ということはできないのでしょうか？
以上よろしくお願いします
|