TypeLibVarAttribute TypeLibVarAttribute TypeLibVarAttribute TypeLibVarAttribute Class

Definizione

public ref class TypeLibVarAttribute sealed : Attribute

[System.AttributeUsage(System.AttributeTargets.Field, Inherited=false)]
[System.Runtime.InteropServices.ComVisible(true)]
public sealed class TypeLibVarAttribute : Attribute

type TypeLibVarAttribute = class
    inherit Attribute

Public NotInheritable Class TypeLibVarAttribute
Inherits Attribute

Ereditarietà

ObjectObjectObjectObject

AttributeAttributeAttributeAttribute

TypeLibVarAttributeTypeLibVarAttributeTypeLibVarAttributeTypeLibVarAttribute

Attributi

AttributeUsageAttribute ComVisibleAttribute

Esempi

Nell'esempio seguente viene illustrato come ottenere il TypeLibVarAttribute valore di un campo.The following example demonstrates how to get the TypeLibVarAttribute value of a field.

using namespace System;
using namespace System::Reflection;
using namespace System::Runtime::InteropServices;

ref class ClassD
{
public:
   static bool IsHiddenField( FieldInfo^ fi )
   {
      array<Object^>^FieldAttributes = fi->GetCustomAttributes( TypeLibVarAttribute::typeid, true );
      if ( FieldAttributes->Length > 0 )
      {
         TypeLibVarAttribute^ tlv = dynamic_cast<TypeLibVarAttribute^>(FieldAttributes[ 0 ]);
         TypeLibVarFlags flags = tlv->Value;
         return (flags & TypeLibVarFlags::FHidden) != (TypeLibVarFlags)0;
      }

      return false;
   }
};

using System;
using System.Reflection;
using System.Runtime.InteropServices;

namespace D
{
	class ClassD
	{
		public static bool IsHiddenField( FieldInfo fi )
		{
			object[] FieldAttributes = fi.GetCustomAttributes( typeof( TypeLibVarAttribute ), true);
		
			if( FieldAttributes.Length > 0 )
			{
				TypeLibVarAttribute tlv = ( TypeLibVarAttribute )FieldAttributes[0];
				TypeLibVarFlags  flags = tlv.Value;
				return ( flags & TypeLibVarFlags.FHidden ) != 0; 
			}
			return false;
		}
	}
}

Imports System
Imports System.Reflection
Imports System.Runtime.InteropServices

Module D
	Public Function IsHiddenField(ByVal fi As FieldInfo) As Boolean
		Dim FieldAttributes As Object() = fi.GetCustomAttributes(GetType(TypeLibVarAttribute), True)

		If FieldAttributes.Length > 0 Then
			Dim tlv As TypeLibVarAttribute = FieldAttributes(0)
			Dim flags As TypeLibVarFlags = tlv.Value
			Return (flags & TypeLibVarFlags.FHidden) > 0
		End If
		Return False
	End Function
End Module

Commenti

Il Tlbimp.exe (tipo di libreria utilità di importazione) si applica questo attributo ai campi.The Tlbimp.exe (Type Library Importer) applies this attribute to fields.

Questo attributo viene applicato quando una libreria dei tipi viene importata e non deve mai essere modificata.This attribute is applied when a type library is imported and should never be changed. È applicata solo quando il metodo VARFLAGS restituiscono diverso da zero.It is only applied when the method's VARFLAGS evaluate to non-zero. L'attributo è progettato per essere utilizzato dagli strumenti che è necessario sapere come originale VARFLAGS sono state impostate.The attribute is designed to be used by tools that need to know how the original VARFLAGS were set. Common language runtime non viene utilizzato questo attributo.The common language runtime does not use this attribute.

Costruttori

Proprietà

Metodi

Implementazioni dell'interfaccia esplicita

Si applica a

Vedi anche

• Tlbimp.exe (utilità di importazione della libreria dei tipi)Tlbimp.exe (Type Library Importer)