设TAuto实现了接口IAuto
Obj:TAuto;
OVObj:OLEVariant;
Obj:=TAuto.Create;
OVObj:=Obj;Obj:=TAuto(IAuto(OVObj));//出错:得到的对象不正确请问应该如何从OVObj得到一个TAuto类型的对象。谢谢……
Obj:TAuto;
OVObj:OLEVariant;
Obj:=TAuto.Create;
OVObj:=Obj;Obj:=TAuto(IAuto(OVObj));//出错:得到的对象不正确请问应该如何从OVObj得到一个TAuto类型的对象。谢谢……
Obj:=IAuto(TAuto.Create);
也就是说iAuto1 : IAuto;iAuto1 := TAuto.Create();
看看D5开发指南有些,还有Delphi COM深入编程
我意思是说如何将OLEVariant转为TAuto,我先去看看 Delphi COM深入编程
aIntf:IAuto;
OVObj:OLEVariant;....
OVObj:=TAuto.Create();
aIntf:=IUnknown(OVObj) as IAuto;