satishrajdev 发表于 2022-7-6 06:35:02

ENTMAKE块

大家好，
 
回来时还有一个问题：-
 
我创建了以下代码来生成块，我有以下疑问：-
1.LWPOLYLINE有问题，有人能纠正吗？？？
2.需要DXF代码将块颜色更改为“ByBlock”
 
 
非常感谢：）
 

(entmake '((0 . "LWPOLYLINE")
(100 . "AcDbEntity")
(67 . 0)
(8 . "0")
(100 . "AcDbTrace")
(91 . 3)
(10 0 0 0)
(10 -1 0.3322 0)
(10 -1 -0.3322 0)
(210 0 0 0)
(39 . 0)
)
)

pBe 发表于 2022-7-6 06:48:15

(entmake '((0 . "LWPOLYLINE")
            (100 . "AcDbEntity")
            (100 . "AcDbPolyline")
            (67 . 0)
            (8 . "0")
            (91 . 3)
            (10 0 0 0)
            (10 -1 0.3322 0)
            (10 -1 -0.3322 0)
            (2100 0 0)
            (39 . 0)
             )
   )

satishrajdev 发表于 2022-7-6 06:56:49

非常感谢pBe，我急切地等待着，因为我发布了。。。。
 
但是如何将块颜色更改为Byblock，有什么方法吗

pBe 发表于 2022-7-6 07:04:38

(62 . 0);
 
我相信你会明白的satishrajdev

Stefan BMR 发表于 2022-7-6 07:08:02

(entmake '((0 . "LWPOLYLINE")
(100 . "AcDbEntity")
(67 . 0)
(8 . "0")
(100 . "AcDbPolyline")
(90 . 3)
(70 . 1)
(10 0 0 0)
(10 -1 0.3322 0)
(10 -1 -0.3322 0)
(210 0 0 1)
(39 . 0)
)
)

satishrajdev 发表于 2022-7-6 07:16:10

非常感谢pBe。。。。。
 
我使用了以下代码。这有点忙：_
      (command "bedit" "SS")
   (command "chprop" "all" "" "c" "byblock" "")
   (command "bclose" "s")

satishrajdev 发表于 2022-7-6 07:22:53

非常感谢Stefan的更正。。。。。。我的代码终于完成了。。。。。。

pBe 发表于 2022-7-6 07:29:01

在任何情况下，如果该块确实存在并且不是byblock，那么您可能必须执行您发布的代码段。。。或者更好的是，运行（entmake….）行，不管它是否存在。不，如果是的话，有点重新定义块。你的选择。

satishrajdev 发表于 2022-7-6 07:41:57

是的，pBe，我已经按照你的建议（62.0）修改了我的代码，它对我来说非常适合。线条实际上是无关紧要的，但保留下来以供选择更改填充图案。
 
谢谢你们抽出时间。。。。。。
页: [1]
查看完整版本: ENTMAKE块