Tiff ビューアーを作成しましたが、既に tiff 画像を表示できます。1200 DPI のような高解像度の場合を除きます。コードに問題の原因となっている回避策はありますか?
Public Function GetTiffImage(path As String, page As Integer) As Image
Dim ms As MemoryStream = Nothing
Dim SrcImg As Image = Nothing
Dim returnImage As Image = Nothing
Try
SrcImg = Image.FromFile(path)
ms = New MemoryStream()
Dim FrDim As New FrameDimension(SrcImg.FrameDimensionsList(0))
SrcImg.SelectActiveFrame(FrDim, Page)
SrcImg.Save(ms, ImageFormat.Tiff)
returnImage = Image.FromStream(ms)
Catch ex As Exception
Throw ex
Finally
SrcImg.Dispose()
GC.Collect()
GC.WaitForPendingFinalizers()
End Try
Return returnImage
End Function
前もって感謝します