【文章內(nèi)容簡(jiǎn)介】 相關(guān)聯(lián) 。 當(dāng) :vlrsaveComplete事件發(fā)生時(shí) ， AutoCAD傳遞給回調(diào)函數(shù)一個(gè)圖形文件名字的字符串 。 每個(gè)點(diǎn)對(duì)表都指定了反應(yīng)器要通報(bào)的事件 ， 以及該事件發(fā)生時(shí)要調(diào)用的回調(diào)函數(shù) 。 在本例中 ， 只指定了一個(gè)事件 :vlrsaveComplete。 只要用戶發(fā)出命令 ， 不管是從 AutoCAD命令行 、 菜單 、 工具欄或 AutoLISP程序 ， 都會(huì)通知編輯器反應(yīng)器 。 所以 ， 該 DWG反應(yīng)器的回調(diào)函數(shù)需要明確它應(yīng)對(duì)什么事件作出響應(yīng) 。 在本例中 ， 回調(diào)函數(shù) saveDrawingInfo只是檢查Save命令 。 下面是 實(shí)現(xiàn) DWG反應(yīng)器功能的實(shí)例： （ 1) 加載例 112所定義的回調(diào)函數(shù) saveDrawingInfo。 (2） 定義 DWG反應(yīng)器 (vlrdwgReactor nil 39。((:vlrsaveComplete . saveDrawingInfo))) （ 3） 在 AutoCAD圖形窗口點(diǎn)取存盤的圖標(biāo)或調(diào)用存圖的命令 。 當(dāng)完成存圖工作時(shí)將會(huì)彈出圖 111所示的 AutoCAD Message對(duì)話框 。 說明該實(shí)例成功 。 圖 111AutoCAD的 Message對(duì)話框 將數(shù)據(jù)附著到反應(yīng)器對(duì)象 利用創(chuàng)建反應(yīng)器函數(shù)的參數(shù) data可以為反應(yīng)器指定與其關(guān)聯(lián)的數(shù)據(jù) ， 如果該項(xiàng)為 nil， 表示不需要為反應(yīng)器指定與其關(guān)聯(lián)的數(shù)據(jù) 。 一個(gè)對(duì)象可能鏈接多個(gè)反應(yīng)器 ， 如果它們的參數(shù) data都為 nil， 應(yīng)用程序?qū)o(wú)法區(qū)分它們 。 在這種情況下就應(yīng)該為反應(yīng)器指定文本字符串或應(yīng)用程序能識(shí)別的其它數(shù)據(jù) 。 例如 ， 前 面 創(chuàng) 建 對(duì) 象 反 應(yīng) 器 circleReactor 的實(shí)例中 ， 字符串“ CircleReactor”就是與反應(yīng)器 circleReactor相關(guān)聯(lián)的數(shù)據(jù) 。 查詢 、 修改和控制反應(yīng)器的狀態(tài) 查詢反應(yīng)器 有多種不同的方法來獲取反應(yīng)器的信息 。 可以使用標(biāo)準(zhǔn)的 VLISP數(shù)據(jù)查看工具查看反應(yīng)器的信息 ， 也可以用有關(guān)反應(yīng)器的 AutoLISP函數(shù) 。 通過 vlrreactors函數(shù)可以了解當(dāng)前圖形中總共用到了哪些反應(yīng)器或有哪些指定類型的反應(yīng)器 。 vlrreactors函數(shù)的調(diào)用格式如下： (vlrreactors [reactortype...]) 參數(shù) reactortype為反應(yīng)器類型的標(biāo)識(shí)符 。 如果指定了reactortype參數(shù) ， 該函數(shù)返回由指定類型反應(yīng)器組成的表 。如果省略參數(shù) reactortype， 該函數(shù)返回所有當(dāng)前圖形所有的反應(yīng)器 。 以下表達(dá)式列出圖形中的所有反應(yīng)器： (vlrreactors) ； 返 回 ((:VLRObjectReactor VLRObjectReactor) (:VLREditorReactor VLREditorReactor))， 有一個(gè)對(duì)象反應(yīng)器和一個(gè)編輯器反應(yīng)器 。 以下表達(dá)式列出所有的對(duì)象反應(yīng)器： (vlrreactors :vlrobjectreactor) ； 返 回 ((:VLRObjectReactor VLRObjectReactor))， 有一個(gè)對(duì)象反應(yīng)器 以下表達(dá)式列出所有數(shù)據(jù)庫(kù)反應(yīng)器： (vlrreactors :vlracdbreactor) ；返回 nil， 沒有數(shù)據(jù)庫(kù)反應(yīng)器 以下表達(dá)式列出所有 DWG反應(yīng)器： (vlrreactors :vlrdwgreactor) ；返回 ((:VLRDWGReactor VLRDWGReactor VLRDWGReactor))， 有一個(gè) DWG反應(yīng)器 ， 有兩個(gè)指向該 DWG反應(yīng)器的指針 。 2. 用 VLISP的檢驗(yàn)工具檢查反應(yīng)器 可以使用 VLISP的檢驗(yàn)工具檢查反應(yīng)器。在 VLISP編輯器窗口選擇circleReactor，單擊按鈕 ，將彈出圖 112所示檢驗(yàn)窗口，該窗口顯示以下信息： 圖 112有關(guān)反應(yīng)器的檢驗(yàn)窗口 l 反應(yīng)器的類型標(biāo)識(shí)符 ， 如 VLRObjectReactor l 該反應(yīng)器的所有者 ， 如 VLROBJECT IAcadCircle 03708534 l 事件和與之相關(guān)聯(lián)的回調(diào)函數(shù) ， 如 : VLRmodified PRINTRADIUS l 該反應(yīng)器是否是活動(dòng)的：如果是活動(dòng)的 ， addedp 為 T， 否則它為 nil l 附著到反應(yīng)器上的用戶數(shù)據(jù) ， 如 “ Circle Reactor” l 反應(yīng)器的文檔范圍：如 activedocumentonly l 該反應(yīng)器所在文擋：如 VLAOBJECT IacadDocument 01165340 雙擊以 {Owners} 開頭的條目，可查看反應(yīng)器所有者的列表。 3. 用函數(shù)調(diào)用 、 查詢反應(yīng)器 VLISP還提供了可在應(yīng)用程序或控制臺(tái)提示處查看反應(yīng)器定義的函數(shù)： （ 1） vlrtype函數(shù)返回指定反應(yīng)器的類型 ， 例如： (vlrtype circleReactor) ；返回 :VLRObjectReactor（ 對(duì)象反應(yīng)器 ） （ 2） vlrcurrentreactionname 函數(shù)返回當(dāng)前反應(yīng)器觸發(fā)回調(diào)函數(shù)的事件名稱 。 例如： (vlrcurrentreactionname) ；返回 nil （ 3） vlrdata 返回附著到反應(yīng)器的特定應(yīng)用程序數(shù)據(jù) ， 可用該數(shù)據(jù)區(qū)分鏈接在同一個(gè)對(duì)象上的多個(gè)反應(yīng)器 。 例如： (vlrdata circleReactor) ；返回 Circle Reactor“ （ 4） vlrowners函數(shù)返回向某對(duì)象反應(yīng)器發(fā)出通報(bào)的 AutoCAD圖形中的對(duì)象（ 反應(yīng)器所有者 ） 列表 ， 下述函數(shù)調(diào)用將列出 circleReactor 的所有者： (vlrowners circleReactor) ；返回 (VLAOBJECT IAcadCircle 03ad077c) （ 5） vlrreactions函數(shù)返回指定反應(yīng)器的回調(diào)條件－回調(diào)函數(shù)列表 ， 下例將返回 circleReactor 的相關(guān)信息 。 例如： (vlrreactions circleReactor) ；返回 ((:VLRmodified . PRINTRADIUS)) 修改反應(yīng)器 1 添加或替換反應(yīng)器的回調(diào)函數(shù) 通過函數(shù) vlrreactionset可以添加或替換反應(yīng)器中的一個(gè)回調(diào)函數(shù) 。 該函數(shù)的調(diào)用格式如下： (vlrreactionset reactor event function) 參數(shù) reactor為反應(yīng)器 對(duì)象 。 event為符號(hào) ， 表示該反應(yīng)器類型可用的事件之一 。 Function為要添加或替換的 AutoLISP函數(shù)名 。 返回值未確定 。 例如 ， 下面的命令使反應(yīng)器 circleReactor在修改對(duì)象時(shí)調(diào)用 printarea函數(shù)： (vlrreactionset circleReactor :vlrmodified 39。printarea) ；返回 PRINTAREA 2. 修改與反應(yīng)器相關(guān)聯(lián)的數(shù)據(jù) 通過函數(shù) vlrdataset可以修改與反應(yīng)器相關(guān)聯(lián)的數(shù)據(jù) 。 該函數(shù)的調(diào)用格式如下： (vlrdataset obj data) 參數(shù) obj為反應(yīng)器對(duì)象 ， 表示要修改數(shù)據(jù)的反應(yīng)器對(duì)象 。 data為新數(shù)據(jù) 。返回值為參數(shù) data。 例如 ， 查看附著到反應(yīng)器 circleReactor的數(shù)據(jù)值： (vlrdata circleReactor) 返回 Circle Reactor 用字符串 Circle Area Reactor替換反應(yīng)器 circleReactor的原有數(shù)據(jù)Circle Reactor： (vlrdataset circleReactor Circle Area Reactor) 。返回 Circle Area Reactor 驗(yàn)證是否有了改變： (vlrdata circleReactor) 。返回 Circle Area Reactor 注意，應(yīng)小心使用 vlrdataset函數(shù)，以免構(gòu)成循環(huán)結(jié)構(gòu)。 3. 將一個(gè)數(shù)據(jù)庫(kù)對(duì)象添加到反應(yīng)器的所有者列表內(nèi) 通過函數(shù) vlrowneradd可以將一個(gè)數(shù)據(jù)庫(kù)對(duì)象添加到指定反應(yīng)器的所有者列表內(nèi) 。 該函數(shù)的調(diào)用格式如下： (vlrowneradd reactor owner) 參數(shù) reactor為反應(yīng)器對(duì)象 。 owner為要添加到反應(yīng)器所有者列表中的 VLA對(duì)象 。 返回值為已添加了反應(yīng)器的 VLA對(duì)象 。 例如 ， 在下例中 ， 名為 archie的圓弧對(duì)象被添加到反應(yīng)器circleReactor的所有者列表中： (vlrowneradd circleReactor archie) ；返回 vlaOBJECT IAcadArc 03ad0bcc 可 通 過 檢 驗(yàn) 該 反 應(yīng) 器 來 驗(yàn) 證 這 點(diǎn) ： 更 新 反 應(yīng) 器 circleReactor 的檢驗(yàn)窗口 ， 用鼠標(biāo)雙擊檢驗(yàn)窗口的 {Owners}開頭的條目 ， 將彈出圖 11－ 3所示的反應(yīng)器所有者檢驗(yàn)窗口 。 圖 11－ 3反應(yīng)器所有者的檢驗(yàn)窗口 4. 從反應(yīng)器所有者列表中刪除某所有者對(duì)象 通過函數(shù) vlrownerremove可以從反應(yīng)器所有者列表中刪除某所有者對(duì)象 。 該函數(shù)的調(diào)用格式如下： (vlrownerremove reactor owner) 參數(shù) reactor為反應(yīng)器 對(duì)象 。 owner為要從反應(yīng)器所有者列表中刪除的 VLA對(duì)象 。 返回值為被刪除的 VLA對(duì)象 。 例如： (vlrownerremove circleReactor archie)；返回 vlaOBJECT IAcadArc 03ad0bcc 控制反應(yīng)器的狀態(tài) 1. 判斷反應(yīng)器是否是活動(dòng)的 通過函數(shù) vlraddedp可以判斷反應(yīng)器是否是活動(dòng)的 。 vlraddedp函數(shù)的調(diào)用格式如下： (vlraddedp obj) 參數(shù) obj為反應(yīng)器對(duì)象 ， 表示要測(cè)試的反應(yīng)器 。 如果反應(yīng)器是活動(dòng)的 （ 已在 AutoCAD 中注冊(cè) ） ， 返回 T， 如果該反應(yīng)器失效 ， 則返回 nil。 例如： (vlraddedp circleReactor) ；