Binder クラスとは? わかりやすく解説

Binder クラス

メンバ候補リストからメンバ選択し実引数の型から仮引数の型への型変換実行します

名前空間: System.Reflection
アセンブリ: mscorlib (mscorlib.dll 内)
構文構文

<SerializableAttribute> _
<ClassInterfaceAttribute(ClassInterfaceType.AutoDual)> _
<ComVisibleAttribute(True)> _
Public MustInherit Class
 Binder
[SerializableAttribute] 
[ClassInterfaceAttribute(ClassInterfaceType.AutoDual)] 
[ComVisibleAttribute(true)] 
public abstract class Binder
[SerializableAttribute] 
[ClassInterfaceAttribute(ClassInterfaceType::AutoDual)] 
[ComVisibleAttribute(true)] 
public ref class Binder abstract
/** @attribute SerializableAttribute() */ 
/** @attribute ClassInterfaceAttribute(ClassInterfaceType.AutoDual) */ 
/** @attribute ComVisibleAttribute(true) */ 
public abstract class Binder
SerializableAttribute 
ClassInterfaceAttribute(ClassInterfaceType.AutoDual) 
ComVisibleAttribute(true) 
public abstract class Binder
解説解説

継承時の注意 Binder から継承する場合、BindToMethod、BindToField、SelectMethod、SelectProperty、ChangeType の各メンバオーバーライドする必要があります

使用例使用例

Binder クラスすべてのメンバ実装して使用する例を次に示しますプライベート メソッド CanConvertFrom使用して指定した型と互換性がある型を検索します

Imports System
Imports System.Reflection
Imports System.Globalization
Imports Microsoft.VisualBasic

Public Class MyBinder
    Inherits Binder
    Public Sub New()
        MyBase.new()
    End Sub 'New
    Private Class BinderState
        Public args() As Object
    End Class 'BinderState

    Public Overrides Function
 BindToField(ByVal bindingAttr As BindingFlags,
 ByVal match() As FieldInfo, ByVal value As Object, ByVal
 culture As CultureInfo) As FieldInfo
        If match Is Nothing
 Then
            Throw New ArgumentNullException("match")
        End If
        ' Get a field for which the value parameter can be converted
 to the specified field type.
        Dim i As Integer
        For i = 0 To match.Length - 1
            If Not (ChangeType(value, match(i).FieldType,
 culture) Is Nothing) Then
                Return match(i)
            End If
        Next i
        Return Nothing
    End Function 'BindToField

    Public Overrides Function
 BindToMethod(ByVal bindingAttr As BindingFlags,
 ByVal match() As MethodBase, ByRef args() As Object, ByVal
 modifiers() As ParameterModifier, ByVal culture As CultureInfo, ByVal names() As String, ByRef state As Object) As MethodBase
        ' Store the arguments to the method in a state object.
        Dim myBinderState As New
 BinderState()
        Dim arguments() As Object
 = New [Object](args.Length) {}
        args.CopyTo(arguments, 0)
        myBinderState.args = arguments
        state = myBinderState

        If match Is Nothing
 Then
            Throw New ArgumentNullException()
        End If
        ' Find a method that has the same parameters as those of args.
        Dim i As Integer
        For i = 0 To match.Length - 1
            ' Count the number of parameters that match.
            Dim count As Integer
 = 0
            Dim parameters As ParameterInfo()
 = match(i).GetParameters()
            ' Go on to the next method if the number of parameters do
 not match.
            If args.Length <> parameters.Length Then
                GoTo ContinueFori
            End If
            ' Match each of the parameters that the user expects the
 method to have.
            Dim j As Integer
            For j = 0 To args.Length - 1
                ' If names is not null, then reorder args.
                If Not (names Is
 Nothing) Then
                    If names.Length <> args.Length Then
                        Throw New ArgumentException("names
 and args must have the same number of elements.")
                    End If
                    Dim k As Integer
                    For k = 0 To names.Length
 - 1
                        If String.Compare(parameters(j).Name,
 names(k).ToString()) = 0 Then
                            args(j) = myBinderState.args(k)
                        End If
                    Next k
                End If ' Determine
 whether the types specified by the user can be converted to parameter type.
                If Not (ChangeType(args(j),
 parameters(j).ParameterType, culture) Is Nothing)
 Then
                    count += 1
                Else
                    Exit For
                End If
            Next j
            ' Determine whether the method has been found.
            If count = args.Length Then
                Return match(i)
            End If
ContinueFori:
        Next i
        Return Nothing
    End Function 'BindToMethod

    Public Overrides Function
 ChangeType(ByVal value As Object,
 ByVal myChangeType As Type, ByVal culture As CultureInfo) As Object
        ' Determine whether the value parameter can be converted to
 a value of type myType.
        If CanConvertFrom(value.GetType(), myChangeType) Then
            ' Return the converted object.
            Return Convert.ChangeType(value, myChangeType)
            ' Return null.
        Else
            Return Nothing
        End If
    End Function 'ChangeType

    Public Overrides Sub
 ReorderArgumentArray(ByRef args() As Object,
 ByVal state As Object)
        'Redimension the array to hold the state values.
        ReDim args(CType(state, BinderState).args.Length)
        ' Return the args that had been reordered by BindToMethod.
        CType(state, BinderState).args.CopyTo(args, 0)
    End Sub 'ReorderArgumentArray

    Public Overrides Function
 SelectMethod(ByVal bindingAttr As BindingFlags,
 ByVal match() As MethodBase, ByVal types() As Type, ByVal modifiers()
 As ParameterModifier) As MethodBase
        If match Is Nothing
 Then
            Throw New ArgumentNullException("match")
        End If
        Dim i As Integer
        For i = 0 To match.Length - 1
            ' Count the number of parameters that match.
            Dim count As Integer
 = 0
            Dim parameters As ParameterInfo()
 = match(i).GetParameters()
            ' Go on to the next method if the number of parameters do
 not match.
            If types.Length <> parameters.Length Then
                GoTo ContinueFori
            End If
            ' Match each of the parameters that the user expects the
 method to have.
            Dim j As Integer
            For j = 0 To types.Length - 1
                ' Determine whether the types specified by the user
 can be converted to parameter type.
                If CanConvertFrom(types(j), parameters(j).ParameterType)
 Then
                    count += 1
                Else
                    Exit For
                End If
            Next j ' Determine whether the method
 has been found.
            If count = types.Length Then
                Return match(i)
            End If
ContinueFori:
        Next i
        Return Nothing
    End Function 'SelectMethod
    Public Overrides Function
 SelectProperty(ByVal bindingAttr As BindingFlags,
 ByVal match() As PropertyInfo, ByVal returnType As Type, ByVal indexes()
 As Type, ByVal modifiers() As ParameterModifier) As PropertyInfo
        If match Is Nothing
 Then
            Throw New ArgumentNullException("match")
        End If
        Dim i As Integer
        For i = 0 To match.Length - 1
            ' Count the number of indexes that match.
            Dim count As Integer
 = 0
            Dim parameters As ParameterInfo()
 = match(i).GetIndexParameters()

            ' Go on to the next property if the number of indexes do
 not match.
            If indexes.Length <> parameters.Length Then
                GoTo ContinueFori
            End If
            ' Match each of the indexes that the user expects the property
 to have.
            Dim j As Integer
            For j = 0 To indexes.Length - 1
                ' Determine whether the types specified by the user
 can be converted to index type.
                If CanConvertFrom(indexes(j), parameters(j).ParameterType)
 Then
                    count += 1
                Else
                    Exit For
                End If
            Next j ' Determine whether the property
 has been found.
            If count = indexes.Length Then
                ' Determine whether the return type can be converted
 to the properties type.
                If CanConvertFrom(returnType, match(i).GetType())
 Then
                    Return match(i)
                Else
                    GoTo ContinueFori
                End If
            End If
ContinueFori:
        Next i
        Return Nothing
    End Function 'SelectProperty

    ' Determine whether type1 can be converted to type2. Check only
 for primitive types.
    Private Function CanConvertFrom(ByVal
 type1 As Type, ByVal type2 As
 Type) As Boolean
        If type1.IsPrimitive And type2.IsPrimitive
 Then
            Dim typeCode1 As TypeCode = Type.GetTypeCode(type1)
            Dim typeCode2 As TypeCode = Type.GetTypeCode(type2)
            ' If both type1 and type2 have same type, return true.
            If typeCode1 = typeCode2 Then
                Return True
            End If ' Possible
 conversions from Char follow.
            If typeCode1 = TypeCode.Char Then
                Select Case typeCode2
                    Case TypeCode.UInt16
                        Return True
                    Case TypeCode.UInt32
                        Return True
                    Case TypeCode.Int32
                        Return True
                    Case TypeCode.UInt64
                        Return True
                    Case TypeCode.Int64
                        Return True
                    Case TypeCode.Single
                        Return True
                    Case TypeCode.Double
                        Return True
                    Case Else
                        Return False
                End Select
            End If ' Possible
 conversions from Byte follow.
            If typeCode1 = TypeCode.Byte Then
                Select Case typeCode2
                    Case TypeCode.Char
                        Return True
                    Case TypeCode.UInt16
                        Return True
                    Case TypeCode.Int16
                        Return True
                    Case TypeCode.UInt32
                        Return True
                    Case TypeCode.Int32
                        Return True
                    Case TypeCode.UInt64
                        Return True
                    Case TypeCode.Int64
                        Return True
                    Case TypeCode.Single
                        Return True
                    Case TypeCode.Double
                        Return True
                    Case Else
                        Return False
                End Select
            End If ' Possible
 conversions from SByte follow.
            If typeCode1 = TypeCode.SByte Then
                Select Case typeCode2
                    Case TypeCode.Int16
                        Return True
                    Case TypeCode.Int32
                        Return True
                    Case TypeCode.Int64
                        Return True
                    Case TypeCode.Single
                        Return True
                    Case TypeCode.Double
                        Return True
                    Case Else
                        Return False
                End Select
            End If ' Possible
 conversions from UInt16 follow.
            If typeCode1 = TypeCode.UInt16 Then
                Select Case typeCode2
                    Case TypeCode.UInt32
                        Return True
                    Case TypeCode.Int32
                        Return True
                    Case TypeCode.UInt64
                        Return True
                    Case TypeCode.Int64
                        Return True
                    Case TypeCode.Single
                        Return True
                    Case TypeCode.Double
                        Return True
                    Case Else
                        Return False
                End Select
            End If ' Possible
 conversions from Int16 follow.
            If typeCode1 = TypeCode.Int16 Then
                Select Case typeCode2
                    Case TypeCode.Int32
                        Return True
                    Case TypeCode.Int64
                        Return True
                    Case TypeCode.Single
                        Return True
                    Case TypeCode.Double
                        Return True
                    Case Else
                        Return False
                End Select
            End If ' Possible
 conversions from UInt32 follow.
            If typeCode1 = TypeCode.UInt32 Then
                Select Case typeCode2
                    Case TypeCode.UInt64
                        Return True
                    Case TypeCode.Int64
                        Return True
                    Case TypeCode.Single
                        Return True
                    Case TypeCode.Double
                        Return True
                    Case Else
                        Return False
                End Select
            End If ' Possible
 conversions from Int32 follow.
            If typeCode1 = TypeCode.Int32 Then
                Select Case typeCode2
                    Case TypeCode.Int64
                        Return True
                    Case TypeCode.Single
                        Return True
                    Case TypeCode.Double
                        Return True
                    Case Else
                        Return False
                End Select
            End If ' Possible
 conversions from UInt64 follow.
            If typeCode1 = TypeCode.UInt64 Then
                Select Case typeCode2
                    Case TypeCode.Single
                        Return True
                    Case TypeCode.Double
                        Return True
                    Case Else
                        Return False
                End Select
            End If ' Possible
 conversions from Int64 follow.
            If typeCode1 = TypeCode.Int64 Then
                Select Case typeCode2
                    Case TypeCode.Single
                        Return True
                    Case TypeCode.Double
                        Return True
                    Case Else
                        Return False
                End Select
            End If ' Possible
 conversions from Single follow.
            If typeCode1 = TypeCode.Single Then
                Select Case typeCode2
                    Case TypeCode.Double
                        Return True
                    Case Else
                        Return False
                End Select
            End If
        End If
        Return False
    End Function 'CanConvertFrom
End Class 'MyBinder


Public Class MyClass1
    Public myFieldB As Short
    Public myFieldA As Integer

    Public Overloads Sub
 MyMethod(ByVal i As Long,
 ByVal k As Char)
        Console.WriteLine(ControlChars.NewLine & "This is
 MyMethod(long i, char k).")
    End Sub 'MyMethod

    Public Overloads Sub
 MyMethod(ByVal i As Long,
 ByVal j As Long)
        Console.WriteLine(ControlChars.NewLine & "This is
 MyMethod(long i, long j).")
    End Sub 'MyMethod
End Class 'MyClass1


Public Class Binder_Example
    Public Shared Sub Main()
        ' Get the type of MyClass1.
        Dim myType As Type = GetType(MyClass1)
        ' Get the instance of MyClass1.
        Dim myInstance As New
 MyClass1()
        Console.WriteLine(ControlChars.Cr & "Displaying the
 results of using the MyBinder binder.")
        Console.WriteLine()
        ' Get the method information for MyMethod.
        Dim myMethod As MethodInfo = myType.GetMethod("MyMethod",
 BindingFlags.Public Or BindingFlags.Instance, New
 MyBinder(), New Type() {GetType(Short), GetType(Short)}, Nothing)
        Console.WriteLine(MyMethod)
        ' Invoke MyMethod.
        myMethod.Invoke(myInstance, BindingFlags.InvokeMethod, New
 MyBinder(), New [Object]() {CInt(32), CInt(32)}, CultureInfo.CurrentCulture)
    End Sub 'Main
End Class 'Binder_Example
using System;
using System.Reflection;
using System.Globalization;

public class MyBinder : Binder 
{
    public MyBinder() : base()
    {
    }
    private class BinderState
    {
        public object[] args;
    }
    public override FieldInfo BindToField(
        BindingFlags bindingAttr,
        FieldInfo[] match,
        object value,
        CultureInfo culture
        )
    {
        if(match == null)
            throw new ArgumentNullException("match");
        // Get a field for which the value parameter can be converted
 to the specified field type.
        for(int i = 0; i < match.Length;
 i++)
            if(ChangeType(value, match[i].FieldType, culture)
 != null)
                return match[i];
        return null;
    }
    public override MethodBase BindToMethod(
        BindingFlags bindingAttr,
        MethodBase[] match,
        ref object[] args,
        ParameterModifier[] modifiers,
        CultureInfo culture,
        string[] names,
        out object state
        )
    {
        // Store the arguments to the method in a state object.
        BinderState myBinderState = new BinderState();
        object[] arguments = new Object[args.Length];
        args.CopyTo(arguments, 0);
        myBinderState.args = arguments;
        state = myBinderState;
        if(match == null)
            throw new ArgumentNullException();
        // Find a method that has the same parameters as those of the
 args parameter.
        for(int i = 0; i < match.Length;
 i++)
        {
            // Count the number of parameters that match.
            int count = 0;
            ParameterInfo[] parameters = match[i].GetParameters();
            // Go on to the next method if the number of parameters
 do not match.
            if(args.Length != parameters.Length)
                continue;
            // Match each of the parameters that the user expects the
 method to have.
            for(int j = 0; j < args.Length;
 j++)
            {
                // If the names parameter is not null, then reorder
 args.
                if(names != null)
                {
                    if(names.Length != args.Length)
                        throw new ArgumentException("names
 and args must have the same number of elements.");
                    for(int k = 0; k < names.Length;
 k++)
                        if(String.Compare(parameters[j].Name,
 names[k].ToString()) == 0)
                            args[j] = myBinderState.args[k];
                }
                // Determine whether the types specified by the user
 can be converted to the parameter type.
                if(ChangeType(args[j], parameters[j].ParameterType,
 culture) != null)
                    count += 1;
                else
                    break;
            }
            // Determine whether the method has been found.
            if(count == args.Length)
                return match[i];
        }
        return null;
    }
    public override object ChangeType(
        object value,
        Type myChangeType,
        CultureInfo culture
        )
    {
        // Determine whether the value parameter can be converted to
 a value of type myType.
        if(CanConvertFrom(value.GetType(), myChangeType))
            // Return the converted object.
            return Convert.ChangeType(value, myChangeType);
        else
            // Return null.
            return null;
    }
    public override void ReorderArgumentArray(
        ref object[] args,
        object state
        )
    {
        // Return the args that had been reordered by BindToMethod.
        ((BinderState)state).args.CopyTo(args, 0);
    }
    public override MethodBase SelectMethod(
        BindingFlags bindingAttr,
        MethodBase[] match,
        Type[] types,
        ParameterModifier[] modifiers
        )
    {
        if(match == null)
            throw new ArgumentNullException("match");
        for(int i = 0; i < match.Length;
 i++)
        {
            // Count the number of parameters that match.
            int count = 0; 
            ParameterInfo[] parameters = match[i].GetParameters();
            // Go on to the next method if the number of parameters
 do not match.
            if(types.Length != parameters.Length)
                continue;
            // Match each of the parameters that the user expects the
 method to have.
            for(int j = 0; j < types.Length;
 j++)
                // Determine whether the types specified by the user
 can be converted to parameter type.
                if(CanConvertFrom(types[j], parameters[j].ParameterType))
                    count += 1;
                else
                    break;
            // Determine whether the method has been found.
            if(count == types.Length)
                return match[i];
        }
        return null;
    }
    public override PropertyInfo SelectProperty(
        BindingFlags bindingAttr,
        PropertyInfo[] match,
        Type returnType,
        Type[] indexes,
        ParameterModifier[] modifiers
        )
    {
        if(match == null)
            throw new ArgumentNullException("match");
        for(int i = 0; i < match.Length;
 i++)
        {
            // Count the number of indexes that match.
            int count = 0;
            ParameterInfo[] parameters = match[i].GetIndexParameters();
            // Go on to the next property if the number of indexes do
 not match.
            if(indexes.Length != parameters.Length)
                continue;
            // Match each of the indexes that the user expects the property
 to have.
            for(int j = 0; j < indexes.Length;
 j++)
                // Determine whether the types specified by the user
 can be converted to index type.
                if(CanConvertFrom(indexes[j], parameters[j].ParameterType))
                    count += 1;
                else
                    break;
            // Determine whether the property has been found.
            if(count == indexes.Length)
                // Determine whether the return type can be converted
 to the properties type.
                if(CanConvertFrom(returnType, match[i].GetType()))
                    return match[i];
                else
                    continue;
        }
        return null;
    }
    // Determines whether type1 can be converted to type2. Check only
 for primitive types.
    private bool CanConvertFrom(Type type1,
 Type type2)
    {
        if(type1.IsPrimitive && type2.IsPrimitive)
        {
            TypeCode typeCode1 = Type.GetTypeCode(type1);
            TypeCode typeCode2 = Type.GetTypeCode(type2);
            // If both type1 and type2 have the same type, return true.
            if(typeCode1 == typeCode2)
                return true;
            // Possible conversions from Char follow.
            if(typeCode1 == TypeCode.Char)
                switch(typeCode2)
                {
                    case TypeCode.UInt16 : return
 true;
                    case TypeCode.UInt32 : return
 true;
                    case TypeCode.Int32  : return
 true;
                    case TypeCode.UInt64 : return
 true;
                    case TypeCode.Int64  : return
 true;
                    case TypeCode.Single : return
 true;
                    case TypeCode.Double : return
 true;
                    default              : return
 false;
                }
            // Possible conversions from Byte follow.
            if(typeCode1 == TypeCode.Byte)
                switch(typeCode2)
                {
                    case TypeCode.Char   : return
 true;
                    case TypeCode.UInt16 : return
 true;
                    case TypeCode.Int16  : return
 true;
                    case TypeCode.UInt32 : return
 true;
                    case TypeCode.Int32  : return
 true;
                    case TypeCode.UInt64 : return
 true;
                    case TypeCode.Int64  : return
 true;
                    case TypeCode.Single : return
 true;
                    case TypeCode.Double : return
 true;
                    default              : return
 false;
                }
            // Possible conversions from SByte follow.
            if(typeCode1 == TypeCode.SByte)
                switch(typeCode2)
                {
                    case TypeCode.Int16  : return
 true;
                    case TypeCode.Int32  : return
 true;
                    case TypeCode.Int64  : return
 true;
                    case TypeCode.Single : return
 true;
                    case TypeCode.Double : return
 true;
                    default              : return
 false;
                }
            // Possible conversions from UInt16 follow.
            if(typeCode1 == TypeCode.UInt16)
                switch(typeCode2)
                {
                    case TypeCode.UInt32 : return
 true;
                    case TypeCode.Int32  : return
 true;
                    case TypeCode.UInt64 : return
 true;
                    case TypeCode.Int64  : return
 true;
                    case TypeCode.Single : return
 true;
                    case TypeCode.Double : return
 true;
                    default              : return
 false;
                }
            // Possible conversions from Int16 follow.
            if(typeCode1 == TypeCode.Int16)
                switch(typeCode2)
                {
                    case TypeCode.Int32  : return
 true;
                    case TypeCode.Int64  : return
 true;
                    case TypeCode.Single : return
 true;
                    case TypeCode.Double : return
 true;
                    default              : return
 false;
                }
            // Possible conversions from UInt32 follow.
            if(typeCode1 == TypeCode.UInt32)
                switch(typeCode2)
                {
                    case TypeCode.UInt64 : return
 true;
                    case TypeCode.Int64  : return
 true;
                    case TypeCode.Single : return
 true;
                    case TypeCode.Double : return
 true;
                    default              : return
 false;
                }
            // Possible conversions from Int32 follow.
            if(typeCode1 == TypeCode.Int32)
                switch(typeCode2)
                {
                    case TypeCode.Int64  : return
 true;
                    case TypeCode.Single : return
 true;
                    case TypeCode.Double : return
 true;
                    default              : return
 false;
                }
            // Possible conversions from UInt64 follow.
            if(typeCode1 == TypeCode.UInt64)
                switch(typeCode2)
                {
                    case TypeCode.Single : return
 true;
                    case TypeCode.Double : return
 true;
                    default              : return
 false;
                }
            // Possible conversions from Int64 follow.
            if(typeCode1 == TypeCode.Int64)
                switch(typeCode2)
                {
                    case TypeCode.Single : return
 true;
                    case TypeCode.Double : return
 true;
                    default              : return
 false;
                }
            // Possible conversions from Single follow.
            if(typeCode1 == TypeCode.Single)
                switch(typeCode2)
                {
                    case TypeCode.Double : return
 true;
                    default              : return
 false;
                }
        }
        return false;
    }
}
public class MyClass1
{
    public short myFieldB;
    public int myFieldA; 
    public void MyMethod(long i, char
 k)
    {
        Console.WriteLine("\nThis is MyMethod(long i, char
 k)");
    }
    public void MyMethod(long i, long j)
    {
        Console.WriteLine("\nThis is MyMethod(long i, long j)");
    }
}
public class Binder_Example
{
    public static void Main()
    {
        // Get the type of MyClass1.
        Type myType = typeof(MyClass1);
        // Get the instance of MyClass1.
        MyClass1 myInstance = new MyClass1();
        Console.WriteLine("\nDisplaying the results of using
 the MyBinder binder.\n");
        // Get the method information for MyMethod.
        MethodInfo myMethod = myType.GetMethod("MyMethod", BindingFlags.Public
 | BindingFlags.Instance,
            new MyBinder(), new Type[] {typeof(short),
 typeof(short)}, null);
        Console.WriteLine(myMethod);
        // Invoke MyMethod.
        myMethod.Invoke(myInstance, BindingFlags.InvokeMethod, new
 MyBinder(), new Object[] {(int)32, (int)32},
 CultureInfo.CurrentCulture);
    }
}
using namespace System;
using namespace System::Reflection;
using namespace System::Globalization;
using namespace System::Runtime::InteropServices;
public ref class MyBinder: public
 Binder
{
public:
   MyBinder()
      : Binder()
   {}

private:
   ref class BinderState
   {
   public:
      array<Object^>^args;
   };

public:
   virtual FieldInfo^ BindToField( BindingFlags bindingAttr, array<FieldInfo^>^match,
 Object^ value, CultureInfo^ culture ) override
   {
      if ( match == nullptr )
            throw gcnew ArgumentNullException( "match" );

      // Get a field for which the value parameter can be converted
 to the specified field type.
      for ( int i = 0; i < match->Length;
 i++ )
         if ( ChangeType( value, match[ i ]->FieldType, culture
 ) != nullptr )
                  return match[ i ];

      return nullptr;
   }

   virtual MethodBase^ BindToMethod( BindingFlags bindingAttr, array<MethodBase^>^match,
 array<Object^>^%args, array<ParameterModifier>^ modifiers, CultureInfo^
 culture, array<String^>^names, [Out]Object^% state ) override
   {
      // Store the arguments to the method in a state Object*.
      BinderState^ myBinderState = gcnew BinderState;
      array<Object^>^arguments = gcnew array<Object^>(args->Length);
      args->CopyTo( arguments, 0 );
      myBinderState->args = arguments;
      state = myBinderState;
      if ( match == nullptr )
            throw gcnew ArgumentNullException;

      // Find a method that has the same parameters as those of the
 args parameter.
      for ( int i = 0; i < match->Length;
 i++ )
      {
         // Count the number of parameters that match.
         int count = 0;
         array<ParameterInfo^>^parameters = match[ i ]->GetParameters();

         // Go on to the next method if the number of parameters do
 not match.
         if ( args->Length != parameters->Length )
                  continue;

         // Match each of the parameters that the user expects the method
 to have.
         for ( int j = 0; j < args->Length;
 j++ )
         {
            // If the names parameter is not 0, then reorder args.
            if ( names != nullptr )
            {
               if ( names->Length != args->Length )
                              throw gcnew ArgumentException( "names and args
 must have the same number of elements." );

               for ( int k = 0; k < names->Length;
 k++ )
                  if ( String::Compare( parameters[ j ]->Name,
 names[ k ] ) == 0 )
                                    args[ j ] = myBinderState->args[ k ];
            }

            // Determine whether the types specified by the user can
 be converted to the parameter type.
            if ( ChangeType( args[ j ], parameters[ j ]->ParameterType,
 culture ) != nullptr )
                        count += 1;
            else
                        break;
         }
         if ( count == args->Length )
                  return match[ i ];
      }
      return nullptr;
   }

   virtual Object^ ChangeType( Object^ value, Type^ myChangeType, CultureInfo^ culture
 ) override
   {
      // Determine whether the value parameter can be converted to a
 value of type myType.
      if ( CanConvertFrom( value->GetType(), myChangeType )
 )

      // Return the converted Object*.
      return Convert::ChangeType( value, myChangeType ); //
 Return 0.
      else
            0;
   }

   virtual void ReorderArgumentArray( array<Object^>^%args,
 Object^ state ) override
   {
      // Return the args that had been reordered by BindToMethod.
      (safe_cast<BinderState^>(state))->args->CopyTo( args, 0 );
   }

   virtual MethodBase^ SelectMethod( BindingFlags bindingAttr, array<MethodBase^>^match,
 array<Type^>^types, array<ParameterModifier>^ modifiers ) override
   {
      if ( match == nullptr )
            throw gcnew ArgumentNullException( "match" );

      for ( int i = 0; i < match->Length;
 i++ )
      {
         // Count the number of parameters that match.
         int count = 0;
         array<ParameterInfo^>^parameters = match[ i ]->GetParameters();

         // Go on to the next method if the number of parameters do
 not match.
         if ( types->Length != parameters->Length )
                  continue;

         // Match each of the parameters that the user expects the method
 to have.
         for ( int j = 0; j < types->Length;
 j++ )

            // Determine whether the types specified by the user can
 be converted to parameter type.
            if ( CanConvertFrom( types[ j ], parameters[ j ]->ParameterType
 ) )
                        count += 1;
            else
                        break;

         // Determine whether the method has been found.
         if ( count == types->Length )
                  return match[ i ];
      }
      return nullptr;
   }

   virtual PropertyInfo^ SelectProperty( BindingFlags bindingAttr, array<PropertyInfo^>^match,
 Type^ returnType, array<Type^>^indexes, array<ParameterModifier>^ modifiers
 ) override
   {
      if ( match == nullptr )
            throw gcnew ArgumentNullException( "match" );

      for ( int i = 0; i < match->Length;
 i++ )
      {
         // Count the number of indexes that match.
         int count = 0;
         array<ParameterInfo^>^parameters = match[ i ]->GetIndexParameters();

         // Go on to the next property if the number of indexes do not
 match.
         if ( indexes->Length != parameters->Length )
                  continue;

         // Match each of the indexes that the user expects the property
 to have.
         for ( int j = 0; j < indexes->Length;
 j++ )
            // Determine whether the types specified by the user can
 be converted to index type.
            if ( CanConvertFrom( indexes[ j ], parameters[ j ]->ParameterType
 ) )
                        count += 1;
            else
                        break;

         // Determine whether the property has been found.
         if ( count == indexes->Length )

         // Determine whether the return type can be converted to the
 properties type.
         if ( CanConvertFrom( returnType, match[ i ]->GetType()
 ) )
                  return match[ i ];
         else
                  continue;
      }
      return nullptr;
   }

private:

   // Determines whether type1 can be converted to type2. Check only
 for primitive types.
   bool CanConvertFrom( Type^ type1, Type^ type2 )
   {
      if ( type1->IsPrimitive && type2->IsPrimitive
 )
      {
         TypeCode typeCode1 = Type::GetTypeCode( type1 );
         TypeCode typeCode2 = Type::GetTypeCode( type2 );

         // If both type1 and type2 have the same type, return true.
         if ( typeCode1 == typeCode2 )
                  return true;

         // Possible conversions from Char follow.
         if ( typeCode1 == TypeCode::Char )
         {
            switch ( typeCode2 )
            {
               case TypeCode::UInt16:
                  return true;

               case TypeCode::UInt32:
                  return true;

               case TypeCode::Int32:
                  return true;

               case TypeCode::UInt64:
                  return true;

               case TypeCode::Int64:
                  return true;

               case TypeCode::Single:
                  return true;

               case TypeCode::Double:
                  return true;

               default:
                  return false;
            }
         }

         // Possible conversions from Byte follow.
         if ( typeCode1 == TypeCode::Byte )
         {
            switch ( typeCode2 )
            {
               case TypeCode::Char:
                  return true;

               case TypeCode::UInt16:
                  return true;

               case TypeCode::Int16:
                  return true;

               case TypeCode::UInt32:
                  return true;

               case TypeCode::Int32:
                  return true;

               case TypeCode::UInt64:
                  return true;

               case TypeCode::Int64:
                  return true;

               case TypeCode::Single:
                  return true;

               case TypeCode::Double:
                  return true;

               default:
                  return false;
            }
         }

         // Possible conversions from SByte follow.
         if ( typeCode1 == TypeCode::SByte )
         {
            switch ( typeCode2 )
            {
               case TypeCode::Int16:
                  return true;

               case TypeCode::Int32:
                  return true;

               case TypeCode::Int64:
                  return true;

               case TypeCode::Single:
                  return true;

               case TypeCode::Double:
                  return true;

               default:
                  return false;
            }
         }

         // Possible conversions from UInt16 follow.
         if ( typeCode1 == TypeCode::UInt16 )
         {
            switch ( typeCode2 )
            {
               case TypeCode::UInt32:
                  return true;

               case TypeCode::Int32:
                  return true;

               case TypeCode::UInt64:
                  return true;

               case TypeCode::Int64:
                  return true;

               case TypeCode::Single:
                  return true;

               case TypeCode::Double:
                  return true;

               default:
                  return false;
            }
         }

         // Possible conversions from Int16 follow.
         if ( typeCode1 == TypeCode::Int16 )
         {
            switch ( typeCode2 )
            {
               case TypeCode::Int32:
                  return true;

               case TypeCode::Int64:
                  return true;

               case TypeCode::Single:
                  return true;

               case TypeCode::Double:
                  return true;

               default:
                  return false;
            }
         }

         // Possible conversions from UInt32 follow.
         if ( typeCode1 == TypeCode::UInt32 )
         {
            switch ( typeCode2 )
            {
               case TypeCode::UInt64:
                  return true;

               case TypeCode::Int64:
                  return true;

               case TypeCode::Single:
                  return true;

               case TypeCode::Double:
                  return true;

               default:
                  return false;
            }
         }

         // Possible conversions from Int32 follow.
         if ( typeCode1 == TypeCode::Int32 )
         {
            switch ( typeCode2 )
            {
               case TypeCode::Int64:
                  return true;

               case TypeCode::Single:
                  return true;

               case TypeCode::Double:
                  return true;

               default:
                  return false;
            }
         }

         // Possible conversions from UInt64 follow.
         if ( typeCode1 == TypeCode::UInt64 )
         {
            switch ( typeCode2 )
            {
               case TypeCode::Single:
                  return true;

               case TypeCode::Double:
                  return true;

               default:
                  return false;
            }
         }

         // Possible conversions from Int64 follow.
         if ( typeCode1 == TypeCode::Int64 )
         {
            switch ( typeCode2 )
            {
               case TypeCode::Single:
                  return true;

               case TypeCode::Double:
                  return true;

               default:
                  return false;
            }
         }

         // Possible conversions from Single follow.
         if ( typeCode1 == TypeCode::Single )
         {
            switch ( typeCode2 )
            {
               case TypeCode::Double:
                  return true;

               default:
                  return false;
            }
         }
      }

      return false;
   }

};

public ref class MyClass1
{
public:
   short myFieldB;
   int myFieldA;
   void MyMethod( long i, char k )
   {
      Console::WriteLine( "\nThis is MyMethod(long i, char
 k)" );
   }

   void MyMethod( long i, long j )
   {
      Console::WriteLine( "\nThis is MyMethod(long i, long j)" );
   }
};

int main()
{
   // Get the type of MyClass1.
   Type^ myType = MyClass1::typeid;

   // Get the instance of MyClass1.
   MyClass1^ myInstance = gcnew MyClass1;
   Console::WriteLine( "\nDisplaying the results of using
 the MyBinder binder.\n" );

   // Get the method information for MyMethod.
   array<Type^>^types = {short::typeid,short::typeid};
   MethodInfo^ myMethod = myType->GetMethod( "MyMethod", static_cast<BindingFlags>(BindingFlags::Public
 | BindingFlags::Instance), gcnew MyBinder, types, nullptr );
   Console::WriteLine( myMethod );

   // Invoke MyMethod.
   array<Object^>^obj = {32,32};
   myMethod->Invoke( myInstance, BindingFlags::InvokeMethod, gcnew MyBinder, obj,
 CultureInfo::CurrentCulture );
}
import System.*;
import System.Reflection.*;
import System.Globalization.*;

public class MyBinder extends Binder
{
    public MyBinder()
    {
    } //MyBinder

    private class BinderState
    {
        public Object args[];
    } //BinderState

    public FieldInfo BindToField(BindingFlags bindingAttr, FieldInfo
 match[], 
        Object value, CultureInfo culture)
    {
        if (match == null) {
            throw new ArgumentNullException("match");
        }

        // Get a field for which the value parameter can be converted
 
        // to the specified field type.
        for (int i = 0; i < match.length;
 i++) {
            if (ChangeType(value, 
                ((FieldInfo)match.get_Item(i)).get_FieldType(), culture) 
                != null) {
                return (FieldInfo)match.get_Item(i);
            }
        }

        return null;
    } //BindToField

    public MethodBase BindToMethod(BindingFlags bindingAttr, MethodBase
 match[],
        /**@ref
         */
        Object args[], ParameterModifier modifiers[], CultureInfo culture, 
        String names[],
        /**@ref
         */ Object state)
    {
        // Store the arguments to the method in a state object.
        BinderState myBinderState = new BinderState();
        Object arguments[] = new Object[args.length];

        args.CopyTo(arguments, 0);
        myBinderState.args = arguments;
        state = myBinderState;
        if (match == null) {
            throw new ArgumentNullException();
        }

        // Find a method that has the same parameters as those of the
 
        // args parameter.
        for (int i = 0; i < match.length;
 i++) {
            // Count the number of parameters that match.
            int count = 0;
            ParameterInfo parameters[] = ((MethodBase)match.get_Item(i)).
                GetParameters();

            // Go on to the next method if the number of 
            // parameters do not match.
            if (args.length != parameters.length) {
                continue;
            }

            // Match each of the parameters that the user expects 
            // the method to have.
            for (int j = 0; j < args.length;
 j++) {
                // If the names parameter is not null, then reorder
 args.
                if (names != null) {
                    if (names.length != args.length) {
                        throw new ArgumentException("names
 and args must have "
                            + "the same number of elements.");
                    }

                    for (int k = 0; k <
 names.length; k++) {
                        if (String.Compare(((ParameterInfo)parameters.
                            get_Item(j)).get_Name(), 
                            names.get_Item(k).ToString()) == 0) {

                            args[j] = myBinderState.args.get_Item(k);
                        }
                    }
                }

                // Determine whether the types specified by the user
 can be 
                // converted to the parameter type.
                if (ChangeType(args[j], ((ParameterInfo)parameters.get_Item(j)).
                    get_ParameterType(), culture) != null) {
                    count += 1;
                }
                else {
                    break;
                }
            }  
            // Determine whether the method has been found.
            if (count == args.length) {
                return (MethodBase)match.get_Item(i);
            }
        }
        return null;
    } //BindToMethod

    public Object ChangeType(Object value, Type myChangeType,
 
        CultureInfo culture)
    {
        // Determine whether the value parameter can be converted to
 a 
        // value of type myType.
        if (CanConvertFrom(value.GetType(), myChangeType)) {
            // Return the converted object.
            return Convert.ChangeType(value, myChangeType);
        }
        else {
            // Return null.
            return null;
        }
    } //ChangeType

    public void ReorderArgumentArray(
        /**@ref
         */Object args[], Object state)
    {
        // Return the args that had been reordered by BindToMethod.
        ((BinderState)state).args.CopyTo(args, 0);
    } //ReorderArgumentArray


    public MethodBase SelectMethod(BindingFlags bindingAttr, MethodBase
 match[], 
        Type types[], ParameterModifier modifiers[])
    {
        if (match == null) {
            throw new ArgumentNullException("match");
        }

        for (int i = 0; i < match.length;
 i++) {
            // Count the number of parameters that match.
            int count = 0;
            ParameterInfo parameters[] = ((MethodBase)match.get_Item(i)).
                GetParameters();

            // Go on to the next method if the number of parameters
 
            // do not match.
            if (types.length != parameters.length) {
                continue;
            }

            // Match each of the parameters that the user expects 
            // the method  to have.
            for (int j = 0; j < types.length;
 j++) {
                // Determine whether the types specified by the user
 can be 
                // converted to parameter type.
                if (CanConvertFrom((Type)types.get_Item(j), 
                    ((ParameterInfo)parameters.get_Item(j)).
                    get_ParameterType())) {

                    count += 1;
                }
                else {
                    break;
                } 
            }
            // Determine whether the method has been found.
            if (count == types.length) {
                return (MethodBase)match.get_Item(i);
            }
        }

        return null;
    } //SelectMethod

    public PropertyInfo SelectProperty(BindingFlags bindingAttr,
 
        PropertyInfo match[], Type returnType, Type indexes[], 
        ParameterModifier modifiers[])
    {
        if (match == null) {
            throw new ArgumentNullException("match");
        }

        for (int i = 0; i < match.length;
 i++) {
            // Count the number of indexes that match.
            int count = 0;
            ParameterInfo parameters[] = ((PropertyInfo)match.get_Item(i)).
                GetIndexParameters();

            // Go on to the next property if the number of indexes do
 not match.
            if (indexes.length != parameters.length) {
                continue;
            }

            // Match each of the indexes that the user expects 
            // the property to have.
            for (int j = 0; j < indexes.length;
 j++) {
                // Determine whether the types specified by the user
 
                // can be converted to index type.
                if (CanConvertFrom((Type)indexes.get_Item(j),
 
                    ((ParameterInfo)parameters.get_Item(j)).
                    get_ParameterType())) {

                    count += 1;
                }
                else {
                    break;
                } 
            }
            // Determine whether the property has been found.
            if (count == indexes.length) {
                // Determine whether the return type can be converted
 
                // to the properties type.
                if (CanConvertFrom(returnType, match.get_Item(i).GetType()))
 {
                    return (PropertyInfo)match.get_Item(i);
                }
                else {
                    continue;
                }
            }
        }
        return null;
    } //SelectProperty

    // Determines whether type1 can be converted to type2. 
    // Check only for primitive types.
    private boolean CanConvertFrom(Type type1, Type type2)
    {
        if (type1.get_IsPrimitive() && type2.get_IsPrimitive())
 {
            TypeCode typeCode1 = Type.GetTypeCode(type1);
            TypeCode typeCode2 = Type.GetTypeCode(type2);

            // If both type1 and type2 have the same type, return true.
            if (typeCode1.Equals(typeCode2)) {
                return true;
            }

            // Possible conversions from Char follow.
            if (typeCode1.Equals(TypeCode.Char)) {
                switch (typeCode2) {
                    case TypeCode.UInt16 :
                        return true;
                    case TypeCode.UInt32 : 
                        return true;
                    case TypeCode.Int32  : 
                        return true;
                    case TypeCode.UInt64 : 
                        return true;
                    case TypeCode.Int64  : 
                        return true;
                    case TypeCode.Single : 
                        return true;
                    case TypeCode.Double : 
                        return true;
                    default : 
                        return false;
                }
            }

            // Possible conversions from Byte follow.
            if (typeCode1.Equals(TypeCode.Byte)) {
                switch (typeCode2) {
                    case TypeCode.Char   : 
                        return true;
                    case TypeCode.UInt16 : 
                        return true;
                    case TypeCode.Int16  : 
                        return true;
                    case TypeCode.UInt32 : 
                        return true;
                    case TypeCode.Int32  : 
                        return true;
                    case TypeCode.UInt64 :
                        return true;
                    case TypeCode.Int64  :
                        return true;
                    case TypeCode.Single : 
                        return true;
                    case TypeCode.Double : 
                        return true;
                    default : 
                        return false;
                }
            }

            // Possible conversions from SByte follow.
            if (typeCode1.Equals(TypeCode.SByte)) {
                switch (typeCode2) {
                    case TypeCode.Int16  : 
                        return true;
                    case TypeCode.Int32  : 
                        return true;
                    case TypeCode.Int64  : 
                        return true;
                    case TypeCode.Single : 
                        return true;
                    case TypeCode.Double : 
                        return true;
                    default : 
                        return false;
                }
            }

            // Possible conversions from UInt16 follow.
            if (typeCode1.Equals(TypeCode.UInt16)) {
                switch (typeCode2) {
                    case TypeCode.UInt32 : 
                        return true;
                    case TypeCode.Int32  : 
                        return true;
                    case TypeCode.UInt64 : 
                        return true;
                    case TypeCode.Int64  : 
                        return true;
                    case TypeCode.Single : 
                        return true;
                    case TypeCode.Double : 
                        return true;
                    default : 
                        return false;
                }
            }

            // Possible conversions from Int16 follow.
            if (typeCode1.Equals(TypeCode.Int16)) {
                switch (typeCode2) {
                    case TypeCode.Int32  : 
                        return true;
                    case TypeCode.Int64  : 
                        return true;
                    case TypeCode.Single : 
                        return true;
                    case TypeCode.Double : 
                        return true;
                    default : 
                        return false;
                }
            }

            // Possible conversions from UInt32 follow.
            if (typeCode1.Equals(TypeCode.UInt32)) {
                switch (typeCode2) {
                    case TypeCode.UInt64 : 
                        return true;
                    case TypeCode.Int64  : 
                        return true;
                    case TypeCode.Single : 
                        return true;
                    case TypeCode.Double : 
                        return true;
                    default : 
                        return false;
                }
            }

            // Possible conversions from Int32 follow.
            if (typeCode1.Equals(TypeCode.Int32)) {
                switch (typeCode2) {
                    case TypeCode.Int64  : 
                        return true;
                    case TypeCode.Single : 
                        return true;
                    case TypeCode.Double : 
                        return true;
                    default : 
                        return false;
                }
            }

            // Possible conversions from UInt64 follow.
            if (typeCode1.Equals(TypeCode.UInt64)) {
                switch (typeCode2) {
                    case TypeCode.Single : 
                        return true;
                    case TypeCode.Double : 
                        return true;
                    default : 
                        return false;
                }
            }

            // Possible conversions from Int64 follow.
            if (typeCode1.Equals(TypeCode.Int64)) {
                switch (typeCode2) {
                    case TypeCode.Single : 
                        return true;
                    case TypeCode.Double : 
                        return true;
                    default : 
                        return false;
                }
            }

            // Possible conversions from Single follow.
            if (typeCode1.Equals(TypeCode.Single)) {
                switch (typeCode2) {
                    case TypeCode.Double : 
                        return true;
                    default : 
                        return false;
                }
            }
        }
        return false;
    } //CanConvertFrom
} //MyBinder

public class MyClass1
{
    public short myFieldB;
    public int myFieldA;

    public void MyMethod(long i, char
 k)
    {
        Console.WriteLine("\nThis is MyMethod(long i, char
 k)");
    } //MyMethod

    public void MyMethod(long i, long j)
    {
        Console.WriteLine("\nThis is MyMethod(long i, long j)");
    } //MyMethod
} //MyClass1

public class BinderExample
{
    public static void main(String[]
 args)
    {
        // Get the type of MyClass1.
        Type myType = MyClass1.class.ToType();

        // Get the instance of MyClass1.
        MyClass1 myInstance = new MyClass1();

        Console.WriteLine("\nDisplaying the results of using
 the "
            + "MyBinder binder.\n");

        // Get the method information for MyMethod.
        MethodInfo myMethod = myType.GetMethod("MyMethod", 
            BindingFlags.Public | BindingFlags.Instance, new MyBinder(),
 
            new Type[] { short.class.ToType(),
 short.class.ToType() }, null);
        Console.WriteLine(myMethod);

        // Invoke MyMethod.
        myMethod.Invoke(myInstance, BindingFlags.InvokeMethod, new
 MyBinder(),
            new Object[] { (Int32)32, (Int32)32 }, 
            CultureInfo.get_CurrentCulture());
    } //main
} //BinderExample
継承階層継承階層
System.Object
  System.Reflection.Binder
スレッド セーフスレッド セーフ
この型の public static (Visual Basic では Shared) メンバはすべて、スレッド セーフです。インスタンス メンバ場合は、スレッド セーフであるとは限りません。
プラットフォームプラットフォーム
バージョン情報バージョン情報
参照参照


このページでは「.NET Framework クラス ライブラリ リファレンス」からBinder クラスを検索した結果を表示しています。
Weblioに収録されているすべての辞書からBinder クラスを検索する場合は、下記のリンクをクリックしてください。
 全ての辞書からBinder クラス を検索

英和和英テキスト翻訳>> Weblio翻訳
英語⇒日本語日本語⇒英語
  

辞書ショートカット

すべての辞書の索引

「Binder クラス」の関連用語

Binder クラスのお隣キーワード
検索ランキング

   

英語⇒日本語
日本語⇒英語
   



Binder クラスのページの著作権
Weblio 辞書 情報提供元は 参加元一覧 にて確認できます。

   
日本マイクロソフト株式会社日本マイクロソフト株式会社
© 2024 Microsoft.All rights reserved.

©2024 GRAS Group, Inc.RSS