If TypeOf IFeature Is IComplexEdgeFeature Then End If
Dim layer As IFeatureLayer = New FeatureLayer Dim s As String = layer.GetType.FullName
If TypeOf IFeature Is IComplexEdgeFeature Then End If
IWorkspace pWorkspace = EsriDatabase.FileGdbWorkspaceFromPath("WhatEver.gdb");
Console.WriteLine(pWorkspace.GetType().FullName);
IntPtr iunkwn = Marshal.GetIUnknownForObject(pWorkspace);
// enum all the types defined in the interop assembly
System.Reflection.Assembly objAssembly =
System.Reflection.Assembly.GetAssembly(typeof(IWorkspace));
Type[] objTypes = objAssembly.GetTypes();
// find the first implemented interop type
foreach (Type currType in objTypes)
{
// get the iid of the current type
Guid iid = currType.GUID;
if (!currType.IsInterface || iid == Guid.Empty)
{
// com interop type must be an interface with valid iid
continue;
}
// query supportability of current interface on object
IntPtr ipointer = IntPtr.Zero;
Marshal.QueryInterface(iunkwn, ref iid, out ipointer);
if (ipointer != IntPtr.Zero)
{
string str =currType.FullName;
}
}