乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 ☆ ☆ ☆ 尊重版权，从我做起，拒绝盗版，拒绝倒卖 ☆ ☆ ☆ 签到、发布资源、邀请好友注册，可以获得银币 ☆ ☆ ☆ 请注意保管好自己的密码，避免账户资金被盗
查看： 73|回复： 12

[编程交流] 在d中填充所有闭合多段线

[复制链接]
ectech

19

主题

60

帖子

41

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
95
发表于 2022-7-6 07:32:33 | 显示全部楼层 |阅读模式
尊敬的各位：，
 
我想在不同的图层中填充所有闭合的多段线，并使其具有不同的颜色。有人知道怎么做吗？
 
谢谢
回复

使用道具 举报

MSasu

35

主题

2471

帖子

2447

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
174
发表于 2022-7-6 07:37:39 | 显示全部楼层
基本上，可以使用：
 
  1. (setq ClosedPlinesSSet (ssget "_X" (LIST '(0 . "LWPOLYLINE") '(70 . 1)))   ;select all closed polylines
  2.      CrIndex 0)
  4. (repeat (sslength ClosedPlinesSSet)                                        ;parse selection set items
  5. (setvar "CECOLOR" (itoa (1+ CrIndex)))                                    ;change current color
  6. (command "_HATCH" "_U" 45 1 "_N" (ssname ClosedPlinesSSet CrIndex) "")    ;apply hatch
  7. (setq CrIndex (1+ CrIndex))                                               ;go to next entity
  8. )

 
 
 
当做
回复

使用道具 举报

fixo

1

主题

1069

帖子

1050

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
69
发表于 2022-7-6 07:46:42 | 显示全部楼层
 
这是另一个
（定义C:hat（/color en ha hp hs lname ltable sset）（setq hp（getvar“hpname”））（setvar“hpname”“ANSI37”）；
回复

使用道具 举报

alanjt

54

主题

3755

帖子

3583

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
438
发表于 2022-7-6 07:50:07 | 显示全部楼层
这条线索可能很有趣。
 
http://www.cadtutor.net/forum/showthread.php?p=317755
回复

使用道具 举报

Lee Mac

114

主题

1万

帖子

1万

银币

中流砥柱

Rank: 25

铜币
543
发表于 2022-7-6 07:55:24 | 显示全部楼层
 
难道他不喜欢那条线索中的答案吗？
回复

使用道具 举报

alanjt

54

主题

3755

帖子

3583

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
438
发表于 2022-7-6 08:02:04 | 显示全部楼层
世界跆拳道联盟？！
我甚至没有注意到是同一个人。我想这篇文章毫无意义。他可能也永远不会回应这个问题。
回复

使用道具 举报

Lee Mac

114

主题

1万

帖子

1万

银币

中流砥柱

Rank: 25

铜币
543
发表于 2022-7-6 08:05:37 | 显示全部楼层
 
我的想法完全正确。
回复

使用道具 举报

alanjt

54

主题

3755

帖子

3583

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
438
发表于 2022-7-6 08:11:40 | 显示全部楼层
呃。。。。。。。。。。。。。
回复

使用道具 举报

Baber62

33

主题

117

帖子

85

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
170
发表于 2022-7-6 08:17:35 | 显示全部楼层
嗨，菲索，
最后一行应更改为（princ）not（prin1）。
 
我想知道是否可以修改例程，以便如果该区域已被填充，则不会再次被填充。
 
我已经尝试了这个程序，它运行得很好，除了我正在绘制的图纸中已经有一些图案填充，当我运行这个程序时，相同的区域再次被填充。
 
我期待着您的回复，满怀期待。
回复

使用道具 举报

Lee Mac

114

主题

1万

帖子

1万

银币

中流砥柱

Rank: 25

铜币
543
发表于 2022-7-6 08:20:35 | 显示全部楼层
 
为什么？
回复

使用道具 举报

12下一页
返回列表 发帖

发表回复

高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

精选推荐

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-3-10 04:06 , Processed in 0.469658 second(s), 72 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表