1樓：朱正偉
(defun c:tes ( / n tr)(setq n 0)
(while (< (setq n (1+ n)) 21)(setq tr (rtos n 2 0))(if (null (tblsearch "layer" tr))(entmake (list '(0 . "layer") '(100 . "acdbsymboltablerecord") '(100 .
"acdblayertablerecord") (cons 62 8) '(70 . 0) (cons 2 tr)))
);圖層**;62顏色，負值為關閉圖層;;290不列印0;列印1;;;370線寬0;預設線寬-3;;;70圖層可見0;凍結1+鎖定4
)(princ)
);複製到記事本，以【.lsp】為字尾命名，載入到cad，命令為【tes】（可以自己修改）
2樓：匿名使用者
程式設計思路如下：
1、介面上放兩個按鈕，
2、其中一個按鈕用來定義哪些層需要變成紅色的，裡邊讓使用者輸入字串，比如：aaa，bbb，，也就是定義為 aaa層與bbb層 將變成紅色，其它所有層變為8號色
3、另一個按鈕用來執行任務
遍歷所有圖層，將圖層名稱 逐一 與定義的字串比較，如果相同 則設為紅色，否則設為8號色---------------------------圖中 層的總個數 layers.count
------------------------------某一層 layerx= layers.item i
------------------------某一層的層名 ：layerx.name
------------------改某一層 顏色用 layerx.truecolor tcolor
-------truecolor設定起來有點難度哦，你多想想
cad如何用lisp或者巨集批量實現圖層顏色隨層？
3樓：朱正偉
;一鍵，所有圖元顏色隨層顏色
(defun c:tes ( / block e obj ss)
(if (null vlax-dump-object) (vl-load-com) )
(if (setq ss (ssget "x"))
(progn
(vla-startundomark (vla-get-activedocument (vlax-get-acad-object)))
;; 塊定義內實體
(vlax-for block (vla-get-blocks (vla-get-activedocument (vlax-get-acad-object)))
(vlax-for obj block
(vla-put-color obj 256)))
(while (setq e (ssname ss 0))
(setq ss (ssdel e ss) obj (vlax-ename->vla-object e))
(vla-put-color obj 256)))
)(princ))
cad如何將一個圖層的所有物件改變顏色
4樓：
如果物件顏色都是隨層的（bylayer），就直接到圖層管理器裡改圖層顏色就好了。
如果物件顏色不是隨層，你直接將圖層隔離出來，全選，然後選一個顏色就好了。
5樓：匿名使用者
先設定layer中的顏色，在設計時要選這個layer-這個圖層，如果忘了，畫好後用格式刷刷一下就過來了。
6樓：無稽居士
不太明白你的意思
1.如果你要改變顏色的物件在當前圖層，全部選中-選擇顏色-回車就可以了；
2.如果你要改變某一特定圖層的顏色，在圖層管理器裡設定即可；
3.如果物件沒設定圖層，將你已設定好的圖層用格式刷刷一下你要改變的物件
4.若是塊或外部參照等則不能用第三種辦法，需用相應的塊和外部參照編輯等等
CAD的圖層怎麼管理，cad的圖層管理如何使用
大家在cad使用中經常要使用圖層管理，express tool的幾個圖層管理命令大大提高了圖層管理的便捷程度。其實這些命令都同樣在acad.pgp檔案中設定快捷鍵，直接鍵盤操作。個人設定如下 xc,layiso 只顯示選中的層 bx,layuniso 在執行xc後，恢復原來顯示的層 gc,layof...
如何用CAD畫螺旋上升圖，如何用autocad畫立體螺旋圖
根據公式在excell計算出座標值，然後cad互動畫出。本人曾用圖的方式給出步驟，讓那群只配吃屎的豬給刪了。你要旋轉什麼東西，配上圖啊。不然怎麼給你準確答案呢。請問 cad中 螺旋上升怎麼畫 5 先畫一條螺旋線,在旁邊再用 矩形 工具畫一個矩形 這樣矩形不用面域 然後,用繪圖 建模 掃掠 選要掃掠的...
如何用cad快速畫出平面圖如何擷取CAD平面圖的其中一部分，用來畫立面的求最好的方法
首先要搞清楚你的意圖是什麼，臨摹別人的圖紙，是要熟練cad，既然是熟練專cad，跟別人畫的不一屬樣又有什麼關係，關鍵在於方法。首先你有別人的圖紙，要分析一下別人的方案，瞭解一下設計的意圖，如果是新手，我建議你先用草圖紙，控制好比例，然後把別人的方案拷貝到草圖紙上，注意 拷貝不是列印，是要自己動手畫出...