一个简单代码，高手帮我瞧瞧

lucas3 · 发表于 2014-2-11 15:50:31

您需要登录才可以下载或查看，没有账号？立即注册

×

(if (not (tblsearch "LAYER" "dim"))
(entmake '((0 . "LAYER") (100 . "AcDbSymbolTableRecord") (100 . "AcDbLayerTableRecord") (2 . "dim") (70 . 0) (62 . 3) (6 . "Continuous")))
(prompt "\nLayer : \"dim\" already exist - setting it to current and proceeding with routine...")
)
(setvar 'clayer "dim")

这个代码是判断有没有DIM层，没有就建立一个DIM层，颜色为绿色，线型为Continuous,但没有定义线宽（lineweight），请高手帮我加一句，谢谢！

炫翔 · 发表于 2014-2-11 16:08:50

线宽组码 370

lucas3 · 发表于 2014-2-11 16:10:03

本帖最后由 lucas3 于 2014-2-11 16:31 编辑

组码370是线宽，(cons 370 30) 搞定了！

ysq101 · 发表于 2014-2-11 17:49:06

时间允许就自己研究学得快些

账号		自动登录	找回密码
密码			立即注册

[求助] 一个简单代码，高手帮我瞧瞧