我可以通過TOleContainer或其他方式直接在Delphi應用程序中實例化ActiveX控件嗎？

Question

當然，TOleContainer可以像Word文檔一樣插入OLE對象。但它似乎不適用於ActiveX。當然，我知道Delphi的IDE能夠創建一個ActiveX包裝器。如果我想創建一個控件而不創建一個包裝並在運行時將其安裝到IDE中？

控件已註冊，所以unlike this question, I don't need registration-free com。我只需要一些想法，或者一些示例，瞭解ActiveX Containers是如何啓動的。

Answer 1

TOleContainer適用於ActiveX控件，您只需將Activex控件的正確ProgID傳遞給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;