學而所用

  問題： 在LISP內，用 command 使用 join (接合)指令 卻 沒有接合 ！！！ 類似有選取物件，卻判別非可接合物件 解決方式： 情況1： 在前面一行加入(initcommandversion) 例如：  (initcommandversion) (command "_.join" "_All" "") 情況2： 可能程式判別非共通直線上或重合 檢查線段點座標是否共通直線上或重合，或是檢查Z值不為0導致

 如何使用內建指令把多重引線文字對齊並排列 使用指令 mleaderalign 可以設定對齊方式：分散對齊(D)/使引線線段平行(P)/指定間距(S)/使用目前的間距(U) (文字對齊textalign使用方式相同) 1. 分散對齊 可以讓在選定距離內分散對齊 2. 使引線線段平行 會使第一引線線段平行，但文字不會對齊 3. 指定間距 可以指定對齊之間的間距距離 4. 使用目前的間距 使用原本間距來對齊

問題： 圖塊無法使用現地編輯 顯示錯誤 指令: _refedit 在其他物件的參考中找到錯誤: ** 缺少應用程式參考: ACAD，到 AcDbLinetypeTableRecord。 原因： 該圖塊內含有其他應用程式或外掛產生的物件， 產生附加有延伸資料(XData)，無法解析導致。 解決方式： 移除延伸資料(XData) 使用下面LISP，在 圖塊編輯內使用指令daa ，但 請注意他會刪除所有延伸資料(XData) (defun DelXdata (ent app / entlst tmplst)     (setq entlst (entget ent app))     (foreach memb (cdr (assoc -3 entlst)) (setq tmplst (cons -3 (list (cons (car memb) nil)))       entlst (subst tmplst (assoc -3 entlst) entlst)       entlst (entmod entlst)       ) )     ) (defun C:daa (/ curass countr)     (setq curass (ssget "X" '((-3 ("*"))))   countr 0   )     (if curass (repeat (sslength curass)     (DelXdata (ssname curass countr) '("*"))     (setq countr (1+ countr))     ) )     (princ)     ) 相關連結 AutoCAD 如何載入LISP

 問題： 發現有線寬的聚合線未被填滿 解決方式： 方法1. 設定 FILLMODE=1 方法2. 在某些 視埠 才出現，是因為視圖不是 上視圖 ，而是 自訂視圖