D dyfh Unregistered / Unconfirmed GUEST, unregistred user! 2005-11-21 #1 我定义了一个叫comtest的com接囗，里面有一个msgShow的方法 现在我想在一个按钮事件里调用comtest接囗中的msgshow方法，编程的话怎么写？
D dyfh Unregistered / Unconfirmed GUEST, unregistred user! 2005-11-21 #2 我定义了一个叫comtest的com接囗，里面有一个msgShow的方法 现在我想在一个按钮事件里调用comtest接囗中的msgshow方法，编程的话怎么写？
B bbscom Unregistered / Unconfirmed GUEST, unregistred user! 2005-11-21 #3 在客戶端：ClientDataSet1.AppServer.msgshow就可以了。
N netfool Unregistered / Unconfirmed GUEST, unregistred user! 2005-11-21 #4 var obj: IComTest; begin obj := TComTest.Create; obj.msgShow; end;
D dyfh Unregistered / Unconfirmed GUEST, unregistred user! 2005-11-21 #5 to netfool obj: IComTest; 这需要引用接囗定义的单元吧，假设我不能引用这个单元，这个comtest已经被我用REGSVR32.EXE注册为组件，我怎么调用 to bbscom ClientDataSet不是一个控件名吗？ ClientDataSet1.AppServer.msgshow这种用法看不懂，说详细点好吗？
to netfool obj: IComTest; 这需要引用接囗定义的单元吧，假设我不能引用这个单元，这个comtest已经被我用REGSVR32.EXE注册为组件，我怎么调用 to bbscom ClientDataSet不是一个控件名吗？ ClientDataSet1.AppServer.msgshow这种用法看不懂，说详细点好吗？
N netfool Unregistered / Unconfirmed GUEST, unregistred user! 2005-11-21 #6 有个函数可以通过GUID创建接口实例的啊,你在ComObj.pas里找找 function CreateComObject(const ClassID: TGUID): IUnknown;
D dyfh Unregistered / Unconfirmed GUEST, unregistred user! 2005-11-21 #7 to netfool 我用这种方法如何 var myTest: Variant; begin myTest:=CreateOleObject('myTest.myTest'); myTest.msgShow('Test'); end
to netfool 我用这种方法如何 var myTest: Variant; begin myTest:=CreateOleObject('myTest.myTest'); myTest.msgShow('Test'); end
N netfool Unregistered / Unconfirmed GUEST, unregistred user! 2005-11-21 #8 我的方法是前期绑定,你的是后期绑定,除此之外他们达到的目的是一样的! 前期绑定有个好处是COM objects在design time可以当成design time package使用
