ウインドウズの縮小版のような表示の仕方

環境/言語:[VB.NET]
分類:[.NET]

初めて投稿させて頂きます。

VBにて、フォルダ内のファイルの情報をサムネイルを使用して表示したいのですが、
VB初心者のため、方法がわかりません。
どなたか教えていただけないでしょうか？

よろしくお願いします。

> VBにて、フォルダ内のファイルの情報をサムネイルを使用して表示したいのですが、
> VB初心者のため、方法がわかりません。
> どなたか教えていただけないでしょうか？

　　ここの掲示板のオオモトにあるTipsではダメ？
　　http://dobon.net/vb/dotnet/graphics/thumbnail.html

以上。

■No24391に返信(オショウさんの記事)
> 　　ここの掲示板のオオモトにあるTipsではダメ？
> 　　http://dobon.net/vb/dotnet/graphics/thumbnail.html
どこまでか次第かなぁ。
JPEG,TIFF,PNG,BMP等のGDI+で読み込める範囲ならその手法でほぼ妥当なのですが、動画とかその他を考え始めると足りません。
また、この手法と縮小版の画像が一致しないかもしれません。

「縮小版」が提供するものと厳密に同じものを求めるとなると、シェル系のインターフェースとかAPIとか使用する必要があるので、実現は難しいでしょう。

■No24394に返信(Azuleanさんの記事)
> ■No24391に返信(オショウさんの記事)
>>　　ここの掲示板のオオモトにあるTipsではダメ？
>>　　http://dobon.net/vb/dotnet/graphics/thumbnail.html
> どこまでか次第かなぁ。
> JPEG,TIFF,PNG,BMP等のGDI+で読み込める範囲ならその手法でほぼ妥当なのですが、動画とかその他を考え始めると足りません。
> また、この手法と縮小版の画像が一致しないかもしれません。
>
> 「縮小版」が提供するものと厳密に同じものを求めるとなると、シェル系のインターフェースとかAPIとか使用する必要があるので、実現は難しいでしょう。

Azuleanさん、オショウさん
ご返答ありがとうございます。
返答が遅れましてすみません。

>>　　ここの掲示板のオオモトにあるTipsではダメ？
>>　　http://dobon.net/vb/dotnet/graphics/thumbnail.html
こちらを参考にして作成してみます。
ただ、
> JPEG,TIFF,PNG,BMP等のGDI+で読み込める範囲ならその手法でほぼ妥当なのですが、動画とかその他を考え始めると足りません。
こちらにあるようにJPEG等の場合はよろしいのですが、
PDFのサムネイル表示も行いたいのです。

何か御知恵のある方、よろしくお願いします。

以上、よろしくお願いします。

> ただ、
>>JPEG,TIFF,PNG,BMP等のGDI+で読み込める範囲ならその手法でほぼ妥当なのですが、動画とかその他を考え始めると足りません。
> こちらにあるようにJPEG等の場合はよろしいのですが、
> PDFのサムネイル表示も行いたいのです。

　　検索すれば・・・

　　http://wazly.blog87.fc2.com/blog-entry-13.html

　　こういうのもヒットする。

　　Explorerでさえ万能ではなく、必要な機能をアドインする
　　ことで実現しているので、何をどう表示させるか？
　　と言うプログラムの仕様をまず限定して実現させれば？

　　最初からすべてを完全にサムネイル表示させるのは無理で
　　は？ＯＳでさえ、そうしているんだから・・・

以上。

■No24400に返信(オショウさんの記事)
>>ただ、
> >>JPEG,TIFF,PNG,BMP等のGDI+で読み込める範囲ならその手法でほぼ妥当なのですが、動画とかその他を考え始めると足りません。
>>こちらにあるようにJPEG等の場合はよろしいのですが、
>>PDFのサムネイル表示も行いたいのです。
>
> 　　検索すれば・・・
>
> 　　http://wazly.blog87.fc2.com/blog-entry-13.html
>
> 　　こういうのもヒットする。
>
> 　　Explorerでさえ万能ではなく、必要な機能をアドインする
> 　　ことで実現しているので、何をどう表示させるか？
> 　　と言うプログラムの仕様をまず限定して実現させれば？
>
> 　　最初からすべてを完全にサムネイル表示させるのは無理で
> 　　は？ＯＳでさえ、そうしているんだから・・・
>
> 以上。

オショウさん、ご返答ありがとうございます。

> 　　Explorerでさえ万能ではなく、必要な機能をアドインする
> 　　ことで実現しているので、何をどう表示させるか？
> 　　と言うプログラムの仕様をまず限定して実現させれば？
おっしゃるとおりです。。。

よってJPGとPDFだけの表示にしようと思います。

JPGは下記のようなコードで実現できました。

Dim imageDir As String = imagepath ' 画像ディレクトリ
Dim jpgFiles As String() = _
System.IO.Directory.GetFiles(imageDir, "*.jpg")

Dim width As Integer = 50
Dim height As Integer = 40

ImageList1.ImageSize = New Size(width, height)
ListView1.LargeImageList = ImageList1

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

PDFの方はいまだにわかりません。
もう少し調査してみます。

以上、よろしく御願します。

> PDFの方はいまだにわかりません。
> もう少し調査してみます。

　　http://bbs.wankuma.com/index.cgi?mode=al2&namber=3122&KLOG=12

　　検索したらそのものやっていた人、居ました〜

※　Acrobat Reader 7以降をインストール必須のようです。

参考まで。