Hallo zusammen,
ich habe mir Code besorgt, mit dem ich ein Bild rotieren kann. Das Bild lässt sich jedoch nicht mit der PictureBox darstellen.
Der Fehler liegt in Zeile 11. BMP.Metadata löste eine Ausnahme aus. Somit ist
Übrigens: Ich verwende einen
ich habe mir Code besorgt, mit dem ich ein Bild rotieren kann. Das Bild lässt sich jedoch nicht mit der PictureBox darstellen.
VB.NET-Quellcode
- Using memory As System.IO.MemoryStream = New System.IO.MemoryStream()
- Dim BMP As New BitmapImage()
- BMP.BeginInit()
- BMP.UriSource = New Uri(Pfad)
- BMP.StreamSource = memory
- BMP.Rotation = Rotation_1
- BMP.EndInit()
- BMP.Freeze()
- Try
- PictureBox1.Image = New Bitmap(BMP.StreamSource)
- Catch ex1 As System.ArgumentException
- MessageBox.Show($"{ex1.Message}", "Fehler", MessageBoxButtons.OK, MessageBoxIcon.Error)
- End Try
- End Using
Der Fehler liegt in Zeile 11. BMP.Metadata löste eine Ausnahme aus. Somit ist
.StreamSource
auch nicht gültig.Übrigens: Ich verwende einen
MemoryStream
, weil ich ein System.Windows.Media.Imaging.BitmapImage
zu einem normalen Bitmap machen muss....An die Neulinge: Nutzt
Option Strict On
und Option Infer Off
. Dadurch kommt ihr mit Datentypumwandlungen nicht durcheinander und der Code verbessert sich um Einiges! Solche Fehler à la Dim Beispiel As Integer = "123" können nicht mehr passieren.