Visual LISP語(yǔ)言可以訪問(wèn)CAD的對(duì)象模型, 不僅使程序開(kāi)發(fā)變得更容易，更快捷，還提供了新的LISP語(yǔ)言應(yīng)用功能。例如，可以使用VLISP以LISP語(yǔ)言訪問(wèn)ActiveX對(duì)象。還可以通過(guò)VLISP與其他支持ActiveX方法的Windows應(yīng)用程序進(jìn)行交互。

1、直接訪問(wèn)ActiveX對(duì)象與標(biāo)準(zhǔn)LISP對(duì)比我們把標(biāo)準(zhǔn)Lisp和使用VLISP直接訪問(wèn)ActiveX對(duì)象做一個(gè)簡(jiǎn)單比較： 標(biāo)準(zhǔn)LISP語(yǔ)言：
(setq circle-entity (car (entsel)))
(setq radius (cdr (assoc 40 (entget circle-entity))))
使用VLISP直接訪問(wèn)ActiveX對(duì)象 
(vlax-ename->vla-object circle-entity)
(setq radius (vla-get-radius circle-object))
對(duì)比可以發(fā)現(xiàn)直接訪問(wèn)ActiveX對(duì)象更方便直觀。從效率方面來(lái)講，直接訪問(wèn)ActiveX對(duì)象避免了分配大量?jī)?nèi)存，生成冗余的列表，從而運(yùn)行更快。
2、加載VLISP工程的方法 浩辰CAD2010不僅提供了與AutoCAD兼容的VLISP接口，還可以直接加載AutoCAD編譯好的VLISP工程（VLX、FAS文件），省去了移植工作的煩惱；同時(shí)也可以直接利用互聯(lián)網(wǎng)上提供的大量免費(fèi)的VLISP工程，從而更大程度上節(jié)約設(shè)計(jì)時(shí)間。
1）、可以調(diào)用APPLOAD命令，像加載LISP文件一樣加載VLISP工程（VLX、FAS文件）。
2）、可以直接在命令行中書寫形如（load “c:\\Test.vlx”） （load “c:\\Test.fas”）的LISP語(yǔ)句完成加載。
3）、直接在其他程序中，像浩辰CAD發(fā)送LISP語(yǔ)句完成加載。

3、VLISP加載實(shí)例J人工具箱是網(wǎng)上流傳很廣的CAD免費(fèi)小工具，下面就以J人工具箱5.2版為例，演示一下浩辰CAD是如何加載VLISP程序的。在工具菜單選擇加載應(yīng)用程序選項(xiàng)，可以看到浩辰CAD2010可以支持所有的CAD二次開(kāi)發(fā)程序的加載，這里選擇VLISP的程序VLX來(lái)加載J人工具箱。

CADJ人工具箱 V5.80 免費(fèi)版：www.dbjr.com.cn/softs/137472.html

選擇J人工具箱的程序

加載后根據(jù)命令行的提示啟動(dòng)J人工具箱
輸入Y回車，彈出J人工具箱的界面：

J人工具箱就可以在浩辰CAD上使用了，正因?yàn)楹瞥紺AD2010優(yōu)秀的二次開(kāi)發(fā)接口，類似J人工具箱這樣本來(lái)是為AutoCAD開(kāi)發(fā)的插件都可以直接在浩辰CAD2010上進(jìn)行加載運(yùn)行，為用戶提供了真正的便利。
VLX和FAS的直接加載運(yùn)行是浩辰CAD 2010版的重大技術(shù)突破，其他同類的CAD都無(wú)法實(shí)現(xiàn)。當(dāng)然，由于VLISP函數(shù)以及命令參數(shù)還不能與AutoCAD100%兼容，還不能保證所有的VLX或FAS程序加載后所有功能都能正常運(yùn)行，我們的開(kāi)發(fā)人員正在對(duì)一些常用的工具進(jìn)行測(cè)試，并逐步完善VLISP與AutoCAD兼容性。

最新評(píng)論