1.ActiveX元件可能為VB所寫。 2.參考Code6421兄的大作淺談Interfacehttp://www.dreams.idv.tw/~code6421/Doc/Interface.html用TInterfacedObject可將其改寫為元件，但元件的事件不知該如何實做。 3.依可產生元件的ActiveX元件，參考其Type Library改寫(用TOleControl)，在元件的Create會產生VCL50.bpl的錯誤。 請有經驗的網友提供一下做法，謝謝！

人生有夢，逐夢而行。 人若為善，福雖未至，禍已遠離。 人若為惡，禍雖未至，福已遠離。 http://www.coss.com.tw/jieshu/

發表人 - jieshu 於 2004/04/19 12:34:56

------
人生有夢，逐夢而行
人若為善，福雖未至，禍已遠離
人若為惡，禍雖未至，福已遠離
http://www.taconet.com.tw/jieshu/

經E-Mail向code6421兄求救，其回覆如下：

引言: hi jieshu, 問題在於VB所建立的.ocx並未標示為creatable, 附檔內是我重新處理過後的.tlb檔案,於DELPHI中開啟 這些檔案後點選Register this Type Library,再重新執行 Import ActiveX Library即可完成Import動作(記得由列表中選取, 非選取該.tlb). PS:此動作可能會引發必須重新在目的電腦中註冊Type Library, 這可以經由regsvr32或是LoadTypeLibrary來完成. PS2:時間關係,我無法做更詳細的測試,在我的電腦上其它三個元件 會出現OLE Error 800A0153,代表著找不到需要的.dll or .ocx,猜想 應是我只安裝這四個元件,而未執行完整安裝程式所致. 忠成.

由此可知，應該要先產生.tlb檔案，才能使用此類元件，產生方法如下，但未實際測試過，因為尚未找到此篇文章之檔案。 【發表】如何自行產生 TYPE LIBRARY (*.TLB) 檔 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=48322

人生有夢，逐夢而行。 人若為善，福雖未至，禍已遠離。 人若為惡，禍雖未至，福已遠離。 http://www.coss.com.tw/jieshu/

最後經code6421兄的提醒，是用Delphi開啟.ocx，然後選到CoClass，切換到Flags頁籤，將Can Create勾選，再另存新檔.tlb就可以了。如下圖：

人生有夢，逐夢而行。 人若為善，福雖未至，禍已遠離。 人若為惡，禍雖未至，福已遠離。 http://www.coss.com.tw/jieshu/

------
人生有夢，逐夢而行
人若為善，福雖未至，禍已遠離
人若為惡，禍雖未至，福已遠離
http://www.taconet.com.tw/jieshu/