我在一个MTS/COM+组件方法中用objectcontext.createinstance()来建立其它MTS/COM+组件时,通过测试发现没有创建成功,及此方法是不是还有什么特别注意的问题,请各位在虾帮帮忙,谢谢。

解决方案 »

  1.   

    var dd:IOtherMTSCom;
    begin
      OleCheck(ObjectContext.CreateInstance(CLASS_OtherMTSCom,IID_IOtherMTSCom,DD));
      //dd:= CoOtherMTSCom.CreateRemote('192.168.0.41');
      //两中方法都可以
       
      dd.otherMed;
      

  2.   

    var
       MyConnect: IMTSDMQuery;
       Option: TGetRecordOption;
       iRecOut: Integer;
       OwnerData: OleVariant;
       Params: OleVariant;
    begin
      try
         OleCheck(ObjectContext.CreateInstance(CLASS_MTSDMQuery,IID_IMTSDMQuery,MyConnect));
         Option:=grReset;
         vDatas:=MyConnect.AS_GetRecords('dspQuery',-1,iRecOut,Byte(Option),strSql,Params,OwnerData);
         SetComplete;
      except
         SetAbort;
      end;
    end;这是我做的COM+查询协调对象的代码,看看可能会有帮助。