2017-03-07 55 views
2

我希望能夠在我的vb.net應用程序中查看.Tif文件 - 是否有可用於執行此操作的組件。我一直在使用Tiff Viewer,但由於某種原因,這個文件超出了任何東西 - 你幾乎不知道它說了什麼。我試圖調整瀏覽器的寬度,但沒有做太多,仍然水平拉伸。是否可以在vb.net應用程序中查看多頁.Tif文件?

+0

你試過把他說的大小屬性來調整爲全屏,變焦等? – Juanche

+0

@JuanJoséDiazYoris什麼組件?我嘗試過使用tiff查看器,但沒有太多的在線幫助我使用它 – BobSki

+0

我以爲你在pictureBox編碼 - 解碼中顯示它。請看下面這個:https://msdn.microsoft.com/es-es/library/system.windows.media.imaging.tiffbitmapdecoder(v=vs.110).aspx?cs-save-lang=1&cs-lang= vb#code-snippet-1 and https://msdn.microsoft.com/es-es/library/aa969817(v=vs.110).aspx?cs-save-lang=1&cs-lang=vb#code-snippet -1 – Juanche

回答

2

基於https://stackoverflow.com/a/401579/741136,這將加載一個多幀TIF成單個幀的集合:

Function LoadTif(filename As String) As List(Of Image) 
    Dim lstTif As New List(Of Image) 
    Dim bmp As Bitmap = DirectCast(Image.FromFile(filename), Bitmap) 
    For i As Integer = 0 To bmp.GetFrameCount(Imaging.FrameDimension.Page) - 1 
    bmp.SelectActiveFrame(Imaging.FrameDimension.Page, i) 
    Dim ms As New System.IO.MemoryStream 
    bmp.Save(ms, Imaging.ImageFormat.Tiff) 
    lstTif.Add(Image.FromStream(ms)) 
    ms.Dispose() 
    Next i 
    Return lstTif 
End Function 
相關問題