バージョン

SerializeProperty メソッド

指定されたプロパティ値をSerializationInfoオブジェクトにシリアル化します。
シンタックス
'宣言
 
Public Shared Sub SerializeProperty( _
   ByVal info As SerializationInfo, _
   ByVal name As String, _
   ByVal value As Object _
) 
public static void SerializeProperty( 
   SerializationInfo info,
   string name,
   object value
)

パラメータ

info
どのSerialization infoインスタンスに値をシリアル化するかを示します。
name
オブジェクト値をシリアル化するために使用される名前
value
シリアル化する値。
使用例
Imports System.Runtime.Serialization
Imports System.Drawing
Imports Infragistics.Shared
Imports Infragistics.Shared.Serialization
Imports Infragistics.Win

<Serializable()> Public Class MySerializableClass
    Inherits KeyedSubObjectBase
    Implements ISerializable

    Private enabled As Boolean = True
    Private height As Integer = 0
    Private location As Point
    Private borderStyle As UIElementBorderStyle = UIElementBorderStyle.Solid

    Public Sub New(ByVal keyValue As String)

        MyBase.New(keyValue)

    End Sub

    ' Special de-serialization constructor.
    Private Sub New(ByVal info As System.Runtime.Serialization.SerializationInfo, ByVal context As System.Runtime.Serialization.StreamingContext)

        ' Iterate over the entries. This is considerably faster
        ' than calling the various 'Get...' methods exposed by
        ' the SerializationInfo object for the following reasons:
        ' 1. Usually not every property is persisted. For example,
        '    an object might have 50 properties but only 5 that had
        '    non-default values when it was serialized out.
        ' 2. When you call a 'Get...' method, if the value was
        '    not persisted an exception is thrown which is 
        '    relatively expensive.
        ' 3. Switch statements with strings are very efficient
        '    because they take advantage of string internment
        '    and are doing object reference comparisons instead
        '    of string comparisons.

        Dim entry As SerializationEntry

        For Each entry In info

            ' Use the DeserializeProperty static method to de-serialize
            ' properties.
            ' This works for both binary and SOAP formatters.
            ' Note: the last paramter into this method takes the 
            ' defualt value that will be returned if there is a
            ' problem converting the value to the requested type.

            Select Case entry.Name
                Case "BorderStyle"
                    Me.borderStyle = Utils.DeserializeProperty(entry, GetType(UIElementBorderStyle), Me.borderStyle)

                Case "Enabled"
                    Me.enabled = Utils.DeserializeProperty(entry, GetType(Boolean), Me.enabled)

                Case "Height"
                    Me.height = Utils.DeserializeProperty(entry, GetType(Integer), Me.height)

                Case "Key"
                    Me.Key = Utils.DeserializeProperty(entry, GetType(String), Me.Key)

                Case "Location"
                    Me.location = Utils.DeserializeProperty(entry, GetType(Point), Me.location)

                    ' Use the protected const (defined in SubObjectBase)
                    ' 'TagSerializationName' which was used by the
                    ' 'SerializeTag' method. It has a value of "Tag".

                Case MySerializableClass.TagSerializationName
                    ' Use SubObjectBase's DeserializeTag method to de-serialize the tag property.
                    MyBase.DeserializeTag(entry)

                Case Else
                    Debug.Assert(False, "Invalid entry in MySerializableClass de-serialization ctor")
            End Select
        Next

    End Sub

    ' Called to serialize the object
    Public Sub GetObjectData(ByVal info As System.Runtime.Serialization.SerializationInfo, ByVal context As System.Runtime.Serialization.StreamingContext) Implements System.Runtime.Serialization.ISerializable.GetObjectData

        ' Use the SerializeProperty static method to serialize properties.
        ' This works for both binary and SOAP formatters

        If Not Me.borderStyle = UIElementBorderStyle.Solid Then
            Utils.SerializeProperty(info, "BorderStyle", Me.borderStyle)
        End If

        If Not Me.enabled Then
            Utils.SerializeProperty(info, "Enabled", Me.enabled)
        End If

        If Me.height <> 0 Then
            Utils.SerializeProperty(info, "Height", Me.height)
        End If

        If Not Me.location.IsEmpty Then
            Utils.SerializeProperty(info, "Location", Me.location)
        End If

        If Me.Key.Length > 0 Then
            Utils.SerializeProperty(info, "Key", Me.Key)
        End If

        ' Call the SubObjectBase's SerializeTag method which will only
        ' serialize the tag if it makes sense.

        MyBase.SerializeTag(info)

    End Sub

End Class
using System;
using System.Drawing;
using System.Diagnostics;
using System.Runtime.Serialization;
using Infragistics.Shared;
using Infragistics.Shared.Serialization;
using Infragistics.Win;

namespace SharedSnippets
{
	[Serializable()]
	public class MySerializableClass 
		: KeyedSubObjectBase, ISerializable
	{
		private UIElementBorderStyle
						borderStyle = UIElementBorderStyle.Solid;
		private bool	enabled = true;
		private int		height = 0;
		private Point	location;

		public MySerializableClass( string key ) : base( key )
		{
		}

		// Special de-serialization constructor.
		private MySerializableClass(SerializationInfo info, StreamingContext context)
		{

			// Iterate over the entries. This is considerably faster
			// than calling the various 'Get...' methods exposed by
			// the SerializationInfo object for the following reasons:
			// 1. Usually not every property is persisted. For example,
			//    an object might have 50 properties but only 5 that had
			//    non-default values when it was serialized out.
			// 2. When you call a 'Get...' method, if the value was
			//    not persisted an exception is thrown which is 
			//    relatively expensive.
			// 3. Switch statements with strings are very efficient
			//    because they take advantage of string internment
			//    and are doing object reference comparisons instead
			//    of string comparisons.

			foreach( SerializationEntry entry in info )
			{
				switch (entry.Name)
				{
					// Use the DeserializeProperty static method to de-serialize
					// properties.
					// This works for both binary and SOAP formatters.
					// Note: the last paramter into this method takes the 
					// defualt value that will be returned if there is a
					// problem converting the value to the requested type.

					case "BorderStyle":
						this.borderStyle = (UIElementBorderStyle)Utils.DeserializeProperty( entry, typeof(UIElementBorderStyle), this.borderStyle );
						break;
				
					case "Enabled":
						this.enabled = (bool)Utils.DeserializeProperty( entry, typeof(bool), this.enabled );
						break;

					case "Height":
						this.height = (int)Utils.DeserializeProperty( entry, typeof(int), this.height );
						break;

					case "Key":
						this.Key = (string)Utils.DeserializeProperty( entry, typeof(string), this.Key );
						break;

					case "Location":
						this.location = (Point)Utils.DeserializeProperty( entry, typeof(Point), this.location );
						break;

					// Use the protected const (defined in SubObjectBase)
					// 'TagSerializationName' which was used by the
					// 'SerializeTag' method. It has a value of "Tag".

					case MySerializableClass.TagSerializationName: 
						// Use SubObjectBase's DeserializeTag method to de-serialize the tag property.
						base.DeserializeTag(entry);
						break;

					default:
					{
						Debug.Assert( false, "Invalid entry in MySerializableClass de-serialization ctor" );
						break;
					}				
				}
			}		

		}

		// Called to serialize the object
		void ISerializable.GetObjectData(SerializationInfo info, StreamingContext context)
		{

			// Use the SerializeProperty static method to serialize properties.
			// This works for both binary and SOAP formatters.
			
			if (this.borderStyle != UIElementBorderStyle.Solid)
				Utils.SerializeProperty( info, "BorderStyle", this.borderStyle );

			if (this.enabled != true)
				Utils.SerializeProperty( info, "Enabled", this.enabled );

			if (this.height != 0)
				Utils.SerializeProperty( info, "Height", this.height );

			if (!this.location.IsEmpty)
				Utils.SerializeProperty( info, "Location", this.location );

			if (this.Key.Length > 0)
				Utils.SerializeProperty( info, "Key", this.Key );
			
			// Call the SubObjectBase's SerializeTag method which will only
			// serialize the tag if it makes sense.
			
			base.SerializeTag(info);

		}
	}
}
参照