我可以通过TOleContainer或其他方式直接在Delphi应用程序中实例化ActiveX控件吗？

Question

当然,TOleContainer可以像Word文档一样插入OLE对象.但它似乎不适用于ActiveX.当然,我知道Delphi的IDE创建ActiveX包装器的能力.如果我想在不创建包装器的情况下创建控件并在运行时将其安装到IDE中,该怎么办？

控件已注册,因此与此问题不同,我不需要免注册com.我只需要一些关于如何启动动态ActiveX容器的想法或一些示例.

Answer 1

该 TOleContainerActiveX控件的作品,你只需要通过适当的ProgIDActiveX控件中的CreateObject方法,然后用后期绑定访问的ActiveX的属性.

检查此示例,该示例在运行时在TOleContainer内创建Windows Media Player ActiveX控件.

OleContainer1.CreateObject('Wmplayer.OCX.7', False);
OleContainer1.OleObject.URL:='F:\Music\Iron Maiden - The number of the beast.mp3';
OleContainer1.OleObject.Controls.Play;