BitmapMetadata.Author Proprietà

Definizione

Ottiene o imposta un valore che rappresenta l'autore di un'immagine.

public:
 property System::Collections::ObjectModel::ReadOnlyCollection<System::String ^> ^ Author { System::Collections::ObjectModel::ReadOnlyCollection<System::String ^> ^ get(); void set(System::Collections::ObjectModel::ReadOnlyCollection<System::String ^> ^ value); };
public System.Collections.ObjectModel.ReadOnlyCollection<string> Author { get; set; }
member this.Author : System.Collections.ObjectModel.ReadOnlyCollection<string> with get, set
Public Property Author As ReadOnlyCollection(Of String)

Valore della proprietà

Autore dell'immagine.

Esempio

Nell'esempio di codice seguente viene illustrato come scrivere metadati in un'immagine bitmap usando proprietà descrittive della BitmapMetadata classe .

FileStream stream3 = new FileStream( "image2.tif", FileMode.Create );
BitmapMetadata myBitmapMetadata = new BitmapMetadata( "tiff" );
TiffBitmapEncoder encoder3 = new TiffBitmapEncoder();
myBitmapMetadata.ApplicationName = "Microsoft Digital Image Suite 10";
myBitmapMetadata.Author = new ReadOnlyCollection<string>( 
    new List<string>() { "Lori Kane" } );
myBitmapMetadata.CameraManufacturer = "Tailspin Toys";
myBitmapMetadata.CameraModel = "TT23";
myBitmapMetadata.Comment = "Nice Picture";
myBitmapMetadata.Copyright = "2010";
myBitmapMetadata.DateTaken = "5/23/2010";
myBitmapMetadata.Keywords = new ReadOnlyCollection<string>( 
    new List<string>() { "Lori", "Kane" } );
myBitmapMetadata.Rating = 5;
myBitmapMetadata.Subject = "Lori";
myBitmapMetadata.Title = "Lori's photo";

// Create a new frame that is identical to the one 
// from the original image, except for the new metadata. 
encoder3.Frames.Add( 
    BitmapFrame.Create( 
    decoder2.Frames[0], 
    decoder2.Frames[0].Thumbnail, 
    myBitmapMetadata, 
    decoder2.Frames[0].ColorContexts ) );

encoder3.Save( stream3 );
stream3.Close();
Dim stream3 As New FileStream("image2.tif", FileMode.Create)
Dim myBitmapMetadata As New BitmapMetadata("tiff")
Dim encoder3 As New TiffBitmapEncoder()
myBitmapMetadata.ApplicationName = "Microsoft Digital Image Suite 10"
myBitmapMetadata.Author = New ReadOnlyCollection(Of String) _
    (New List(Of String)(New String() {"Lori Kane"}))
myBitmapMetadata.CameraManufacturer = "Tailspin Toys"
myBitmapMetadata.CameraModel = "TT23"
myBitmapMetadata.Comment = "Nice Picture"
myBitmapMetadata.Copyright = "2010"
myBitmapMetadata.DateTaken = "5/23/2010"
myBitmapMetadata.Keywords = New ReadOnlyCollection(Of String) _
    (New List(Of String)(New String() {"Lori", "Kane"}))
myBitmapMetadata.Rating = 5
myBitmapMetadata.Subject = "Lori"
myBitmapMetadata.Title = "Lori's photo"

' Create a new frame that is identical to the one 
' from the original image, except for the new metadata. 
encoder3.Frames.Add( _
    BitmapFrame.Create(decoder2.Frames(0), _
    decoder2.Frames(0).Thumbnail, _
    myBitmapMetadata, _
    decoder2.Frames(0).ColorContexts))

encoder3.Save(stream3)
stream3.Close()

Si applica a