你应当用as运算符,而不应该直接:=赋值。
这是很典型的问题。

解决方案 »

  1.   

    这话说得太范了,你把原码贴上来看看先
      

  2.   

    For Example:
      var MyObject:TCoCo;
          m_CoCo:ICoCo;
    Begin
    MyObject:=TCoCo.Create(10);
    ...
    m_Coco:=MyObject;
    { When I add "as ICoCo" fellow "MyObject",there is  an error as fellowing when run the program:"Interface Not supported".
    But if I use CoCreateInstance(CLASS_CoCo,nil,CLSCTX_SERVER,IID_ICoCo,m_CoCo), all is right.}
    m_CoCo.Dosth();