Re: How to expose IDispatch on an internal class

From:

Marvin Landman <marvin@newsgroup.nospam>

Newsgroups:

microsoft.public.dotnet.framework

Date:

Wed, 02 Sep 2009 18:56:19 +0200

Message-ID:

<O8W9L5#KKHA.4004@TK2MSFTNGP05.phx.gbl>

Hi,

The client component is Windows Script Host, but I was able to reproduce
the same problem by using GetIDispatchForObject that I believe is
calling the same internal marshaling function as the automatic marshaler.

My problem is that I get InvalidCastException for
"Marshal.GetIDispatchForObject (mc)"

When I change "internal class MyClass : IMyInterface" to "public class
MyClass : IMyInterface" the exception is gone and everything works as
expected.

My problem is that I would like to expose the IDispatch object to COM
componenets (Windows Script Host) but I don't want to expose those
objects to managed applications.

using System;
using System.Runtime.InteropServices;

namespace InternalIDispatch
{
    [ClassInterface (ClassInterfaceType.None)]
    [ComVisible (true)]
    internal class MyClass : IMyInterface
    {
        public void MyMethod ()
        {
            Console.WriteLine ("MyMethod");
        }
    }

    [InterfaceType (ComInterfaceType.InterfaceIsDual)]
    internal interface IMyInterface
    {
        void MyMethod ();
    }

    internal class Program
    {
        private static void Main (string [] args)
        {
            MyClass mc = new MyClass ();

            Console.WriteLine (Marshal.GetIDispatchForObject (mc));
            Console.ReadLine ();
        }
    }
}

Thanks.

Marvin

Jie Wang [MSFT] wrote:

Hi Marvin,

What is the client of the component? VB6? Native VC++? Or something else?

Please let me know more about the detailed configuration so I can try repro
the scenario and find out more.

Thanks,
Jie Wang

Microsoft Online Community Support

Delighting our customers is our #1 priority. We welcome your comments and
suggestions about how we can improve the support we provide to you. Please
feel free to let my manager know what you think of the level of service
provided. You can send feedback directly to my manager at:
msdnmg@microsoft.com.

==================================================
Get notification to my posts through email? Please refer to
http://msdn.microsoft.com/en-us/subscriptions/aa948868.aspx#notifications.

Note: MSDN Managed Newsgroup support offering is for non-urgent issues
where an initial response from the community or a Microsoft Support
Engineer within 2 business days is acceptable. Please note that each follow
up response may take approximately 2 business days as the support
professional working with you may need further investigation to reach the
most efficient resolution. The offering is not appropriate for situations
that require urgent, real-time or phone-based interactions. Issues of this
nature are best handled working with a dedicated Microsoft Support Engineer
by contacting Microsoft Customer Support Services (CSS) at
http://msdn.microsoft.com/en-us/subscriptions/aa948874.aspx
==================================================
This posting is provided "AS IS" with no warranties, and confers no rights.