Delphi寫的ActiveX控制項如何返回數組到Vbscript/javascript Delphi / Windows SDK/API
http://www.delphi2007.net/DelphiAPI/html/delphi_20061120161640191.html
各位,用VBScript調用ActiveX很容易送入一個Variant參數,內容是一個數組,但是反過來,就一直沒有成功,哪位知道如何?delphi ActiveX控制項送出數組內容給Vbscript嗎?多謝!
Javascript也可以……
也就是,如何?在指令碼和ActiveX之間的複雜資料互動
多謝
Delphi的函數傳回值好像不支援數組。
我也為這個問題困惑了很久,實際上,javascript中的數組並非safeArray,不是delphi數群組轉換成varArray的相容類型,它是一個支援雙介面的Com對象,我找了很久,沒找到這個對象的類型庫,我覺得可以寫一個支援雙介面的類,包含javascript數組的公用方法就可以了。但是,又有問題,我不知道在javascript中如何轉換索引器(比如fg[2])的,這個找了很久也找不到說明。
鬱悶的不行,最後,只好在調用函數中多包含一個參數,這個參數類型就是IDispatch介面,然後在javascript中傳入new Array()。再用IDispatch的invoke調用這個數組對象的方法來添加值。
我都快瘋了。
我實在要瘋了,真不知道javascript對象的類型庫在哪裡。找遍MSDN找不到。
再後來,我也不需要使用者傳遞數組。
我可以從ActiveX擷取Browsor,進而擷取Document,然後讓Document執行一個指令碼,他有一個方法InvokeScript,我就調用這個方法,用eval執行了new Array()。得到返回的JS數組對象。
後來,只要是JS需要的對象,除了基本的實值型別以外,我都用這個辦法來創造相容的JS對象。
我還給我的ActiveX對象添加了attachEvent和detachEvent方法,這樣,javascript可以用習慣辦法來響應ActiveX事件,而不是用event類型的script程式碼片段來做。我在內部用了一個列表,支援多播。
後來我的ActiveX對象搞得和標準的內建的JS對象差不多了,呵呵,當然都沒用標準的辦法,實際上是得益於IDispatch的靈活。他的後期綁定和按照名稱綁定的策略的確不錯。
實際上IDispatch並沒拒絕重載,只是delphi這種編譯型的語言,運行期類型資訊很不完整,不會包含函數參數列表的,所以,在後期綁定的時候無法實現重載。