想在ActiveX Library中添加了2个ActiveX Automation Object对象A、B
实现A.b=B (A、B均为对象,b为A的1个属性,类型为对象B)
类似于ADODB.Recordset.ActiveConnection=ADODB.Connection在Type Libile 中A.b参数只能选择B*(不知道什么类型),而不能定义为TB(类)?
自动生成代码 b(Param1:B),提示是b(Param1:IB),接口类型,但B*不是指针类型吗?

解决方案 »

  1.   

    用VARIANT类型传对象的IDispatch接口
      

  2.   

    参考(来自以前的帖子)var 
      rs:  _RecordSet; 
      VarResult: OleVariant; 
    begin 
      VarResult := PassRsObj1.getdata; 
      rs := IUnknown(VarResult) as _Recordset; 
      while not rs.EOF do 
      begin 
      showmessage(rs.Fields[1].value); 
      rs.MoveNext; 
      end;
      

  3.   

    _RecordSet是接口类型吗?
    rs可以带事件吗?