cad二次開發(fā)之圖形數(shù)據(jù)庫-在線瀏覽
2025-07-16 19:56本頁面
【正文】 Model)；模型空間標識 (8 . 0) ；所在圖層名 (100 . AcDbText) ； AutoCAD文本 (10 ) ；定位點坐標 (40 . )；文本字高 (1 . ABCDE)；文本內(nèi)容 (50 . )；文本的旋轉(zhuǎn)角度 (41 . )；文字的寬度因子 (51 . )；文字的傾斜角度 (7 . STANDARD)；字樣的名字 (71 . 0)；正常文本 （ 非左右或上下鏡像的文本 ） (72 . 0)；左下角點對齊方式 (11 )；輔助的定位點坐標 (210 )；厚度方向 (100 . AcDbText) ； AutoCAD文本 (73 . 0)；不垂直書寫 ) 對圖元表的補充說明： （ 1） 圖元表的每個元素還是表 ， 子表的第一個元素是具有一定含義的整數(shù) ， 其含義與圖元在 DXF（ 圖形交換文件 ） 中 實體代碼的含義相同 （ 詳見 AutoCAD有關(guān) DXF文件的介紹 ） 。 （ 3） 其他種類圖元的圖元表的非幾何信息部份基本相同 ， 幾何信息部份有些差異 。 利用 AutoLISP有關(guān)表處理的函數(shù)可以修改圖元表 。若此圖元為直線 ， 則返回 LINE， 若此圖元為單行文本 ， 則返回 TEXT。 （ 3） 了解圓 、 圓弧的半徑或單行文本的字高 (cdr (assoc 40 elist)) 該表達式的內(nèi)層表達式中 ， 用 40作為關(guān)鍵字 ， 返回 elist表中有關(guān)圓 、 圓弧的半徑或單行文本的字高的子表 (40 . 數(shù)值 )，由于此表為點對 ， 所以 cdr函數(shù)返回它的第 2個元素具體的數(shù)值 。 （ 5） 用圓 、 圓弧的半徑或單行文本的新值取代其老值 (setq elist (subst (cons 40 h)(assoc 40 elist)elist)) (cons 40 h)構(gòu)造一個新的點對子表，例如（ 40 . ）。 subst函數(shù)用新子表，例如（ 40 . ），替換 elist表內(nèi)的老子表（ 40 . ）。 （ 6） 更新圖形庫的圖元表 (entmod elist) entmod函數(shù)的功能是更新圖形庫的指定圖元表的圖元 ， 即更新了實際圖形對象 。 舉例 【 例 93】 定義將本作業(yè)所有的單行文本改變?yōu)橹付ǜ叨鹊拿?。單行文本的圖元種類是TEXT，用 MTEXT書寫的是段落文本，它的圖元種類是 MTEXT。 開始 輸入新的字 高 h 得到第一個圖元的名字 e1 e1的類型是 TEXT？ 用新的字高更新 e1的圖元表 e1的名字為 nil ？ 令 e1為 e1的 下一個圖元名 結(jié)束 否 否 是 是 以下是定義改變本作業(yè)所有單行文本為指定的高度命令的程序代碼： (defun c:cth( / h e el) (setq h(getdist \n輸入文本新的字高 : )) (setq e(entnext))；得到第一個圖元的名字 (while e ；當 e有定義時做以下運算 (setq el(entget e))；得到第一個圖元的圖元表 (if (= TEXT (cdr (assoc 0 el))) (progn ；如果圖元的類型為 TEXT時做以下運算 (setq el(subst (cons 40 h)(assoc 40 el)el))；新字高替換圖元表的原字高 (if (= 3 (cdr (assoc 72 el)))；如果文本為 Align方式對齊 (setq el(subst (cons 72 0) (assoc 72 el) el))；忽略第二個定位點 ) (entmod el)；更新圖形數(shù)據(jù)庫的 el圖元表 ) ) (setq e(entnext e))；令 e等于 e的下一個圖元名 ) (princ)；靜默退出 ) 選擇集 選擇集是有名字的一些圖元名的集合 ， 常用于編輯或修改圖形對象的命令 。 有以下一些選擇方法 。 ?CP（ Cpolygon） ：與點表所確定的多邊形相交的那些對象被選中 。 ?I（ Implied） ：處于夾取 （ Grips） 狀態(tài)的那些對象被選中 ?L（ Last） ：最新的 、 最后繪制的那個圖元被選中 。 ?P（ Previous） ：上一次創(chuàng)建的選擇集 。 ?WP（ Wpolygon） ：整體在點表所確定的多邊形之內(nèi)的那些對象被選中 。 ?:E：通過光標拾取框的那些對象被選中 。 只有通過 W、 C和點拾取選擇方法時 ， 才可以使用這一附加信息 。 ?點
環(huán)評公示相關(guān)推薦
鄂ICP備17016276號-1