|
分類:[.NET 全般]
Visualstudio2019、VB.NETでFORMアプリケーションを作成しています。
サムネイル画像を持っているファイルからサムネイル画像を取り出して表示を行おうとしています。
サイトを参考に、以下のロジックで表示を行いました。
Shared Function dummy() As Boolean
Return False ' このメソッドの内容は何でもよい
End Function
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim fs As FileStream = File.OpenRead("C:\TEST.svs")
Dim orig As Image = Image.FromStream(fs, False, False)
Dim thumbnail As Image = orig.GetThumbnailImage(120, 90, New Image.GetThumbnailImageAbort(AddressOf dummy), IntPtr.Zero)
PictureBox1.Image = thumbnail
orig.Dispose()
End Sub
「C:\TEST.svs」は高解像度デジタル画像です。
ファイルの容量が25MB程度なのですが、サムネイル画像の表示に3秒ほどかかってしまいます。
エクスプローラー上でのサムネイル表示は1秒もかからないうちに表示がかかっているのですが、
もっと早く表示が行えるようにならないでしょうか。
教えていただけたらと思います。 |