2008年4月5日

HOW TO:建立縮圖影像

資料來源處: http://msdn2.microsoft.com/zh-tw/library/ets0sayh(vs.80).aspx

HOW TO:建立縮圖影像
縮圖影像是影像的縮小版本。您可以藉由呼叫 Image 物件的 GetThumbnailImage 方法來建立縮圖影像。

下列範例會從 Compass.bmp 檔案建構 Image 物件。原始影像的寬度為 640 個像素,高度為 479 個像素。程式碼會建立寬度為 100 個像素,高度為 100 個像素的縮圖影像。
下圖顯示的是縮圖影像。

Dim image As New Bitmap("Compass.bmp")
Dim pThumbnail As Image = image.GetThumbnailImage(100, 100, Nothing, _
New IntPtr())
e.Graphics.DrawImage( _
pThumbnail, _
10, _
10, _
pThumbnail.Width, _
pThumbnail.Height)