Snippet

Načtení obrázku v jiném formátu (PixelFormat)

Přidáno: 16.10.2007 Kategorie: VB.NET - GDI+ Autor: Tomáš Jecha

Načtení obrázku v předem určeném formátu. Vhodné, pokud chceme například načíst JPG a pak v něm upravovat průhlednost.

Klíčová slova: System.Drawing.Bitmap PixelFormat Format32bppArgb

    ''' <summary>
    ''' Načítá obrázek do objektu typu Bitmap v určeném formátu.
    ''' </summary>
    ''' <param name="fileName">Plné jméno souboru (například c:\obrazek.jpg)</param>
    ''' <param name="format">Výsledný formát, ve kterém bude obrázek otevřen. Defaultně je to ARGB - 32 bitů/pixel.</param>
    ''' <returns>Vytvořený objekt Bitmap v určeném formátu.</returns>
    ''' <remarks></remarks>
    Function LoadFromFile(ByVal fileName As String, Optional ByVal format As Imaging.PixelFormat = Imaging.PixelFormat.Format32bppArgb) As Bitmap
        Dim btmTemp As Bitmap = New Bitmap(fileName) ' načtení
        If btmTemp.PixelFormat = format Then Return btmTemp ' pokud je soubor již v požadovaném formátu, vrátíme ho
        Dim btm As New Bitmap(btmTemp.Width, btmTemp.Height, format)
        Dim gr As Graphics = Graphics.FromImage(btm)
        gr.DrawImage(btmTemp, New Rectangle(Point.Empty, btm.Size)) ' provedení duplikace
        btmTemp.Dispose() ' vyčištění paměti
        gr.Dispose()
        Return btm
    End Function