ILoveMadoka 发表于 2022-7-6 11:59:18

LWeight后续问题。。

这是此线程的后续。。
 
http://www.cadtutor.net/forum/showthread.php?t=43123
 
是否有用于切换以显示线宽的SETVAR？
 
我有一个可以不时切换的东西
希望在Autocad启动时将其设置为关闭。
在我的创业公司更喜欢。
 
TIA！！

ReMark 发表于 2022-7-6 12:16:02

也许是这个？
 
默认值由LWDEFAULT系统变量设置，其初始值为0.01英寸或0.25毫米。所有新图层都使用默认设置。线宽值0以指定打印设备上可用的最薄线宽打印，并在模型空间中以一个像素宽显示

wizman 发表于 2022-7-6 12:19:02

我想是的。

ILoveMadoka 发表于 2022-7-6 12:26:30

LWDisplay！！
 
你是我的英雄！！
 
 
顺便提一下，我该如何编写一个例程来遍历图形中的所有层
并将每个层的线宽设置为默认值？
从Solidworks导入的图形有时会为不同的图层设置线宽。。。

Lee Mac 发表于 2022-7-6 12:39:49

试试这个：
 

(defun c:lwd nil
(vl-load-com)

(vlax-for lay (vla-get-Layers
               (vla-get-ActiveDocument
                   (vlax-get-acad-object)))
   
   (vla-put-lineweight lay acLnWtByLwDefault))

(princ))

 
或
 

(defun c:lwd (/ tdef)

(while (setq tdef (tblnext "LAYER" (not tdef)))
   (entmod (subst (cons 370 -3) (assoc 370 tdef) tdef)))

(princ))

wizman 发表于 2022-7-6 12:42:17

 
 
 
大家圣诞快乐！

ILoveMadoka 发表于 2022-7-6 12:52:55

李。。。
 
再一次
 
你就是那个男人！！
 
当我长大后，我想像你一样编程！！
 
谢谢你，圣诞快乐！！

Lee Mac 发表于 2022-7-6 13:06:43

很乐意帮忙，圣诞快乐
页: [1]
查看完整版本: LWeight后续问题。。