Feedback

Bildgröße verändern (Manuell)

VB - Tim Hartwig Juli 2, 2006
2 Ratings 4/5

Sprache: VB

Diese Funktion ändert die größe eines Bilds und gibt es als Bitmap zurück. Hier kann man als Größe die Dimensionen angeben: X und Y als Point Objekt
Public Function PicResizeByDimension(ByVal SourceImage As String, ByVal Dimension As Point) As Bitmap
    Dim OutputBitmap As New Bitmap(System.Drawing.Image.FromFile(SourceImage), Dimension)
    PicResizeByPercent = OutputBitmap
    OutputBitmap.Dispose()
End Function
Public Function PicResizeByDimension(ByVal SourceImage As String, ByVal Dimension As Point) As Bitmap
    Dim OutputBitmap As New Bitmap(System.Drawing.Image.FromFile(SourceImage), Dimension)
    PicResizeByPercent = OutputBitmap
    OutputBitmap.Dispose()
End Function
Abgelegt unter Bild Bitmap Größe

Alte URL: /snippet/bildgroesse-veraendern-manuell/118