Metadaten beim konvertieren eines Bildes übernehmen

25/08/2009 - 22:14 von johann.loewen | Report spam
Hallo,

Ich möchte gerne ein Bild JPEG in das Format WDP (Windows Media Photo,
HD Photo) konvertieren.
Es funktioniert auch soweit nur das die Metadaten nicht in das neue
Bild übernommen werden.

Hier meine Funktion:

Public Shared Sub ConvertToWDP(ByVal sourceStream As
System.IO.Stream, ByVal destinationStream As System.IO.Stream, ByVal
quality As Single, ByVal processMetadata As Boolean)
Dim imageDecoder As
System.Windows.Media.Imaging.BitmapDecoder = Nothing
imageDecoder System.Windows.Media.Imaging.BitmapDecoder.Create(sourceStream,
System.Windows.Media.Imaging.BitmapCreateOptions.PreservePixelFormat,
System.Windows.Media.Imaging.BitmapCacheOption.None)

Dim imageEncoder As New
System.Windows.Media.Imaging.WmpBitmapEncoder()
If quality < 0 Then quality = 0
If quality > 1 Then quality = 1
imageEncoder.ImageQualityLevel = quality
imageEncoder.Frames.Add(imageDecoder.Frames(0))
imageEncoder.Save(destinationStream)
destinationStream.Flush()
End Sub

hat einer ne Idee wie das anstellen kann das die Metadaten übernommen
werden?
 

Lesen sie die antworten

#1 johann.loewen
28/08/2009 - 18:31 | Warnen spam
Hat keiner ne Idee?

Ähnliche fragen