刪除圖面內重複疊加的物體

lee50310 · 发表于 2020-3-4 09:46

本帖最后由 lee50310 于 2020-3-4 13:21 编辑

這個程序可刪除圖面內同一位置重複疊加的物體
保留原來的單一物體

cq_qg · 发表于 2020-3-4 12:06

跟overkill相比如何？

mikewolf2k · 发表于 2020-3-4 13:42

这个要看如何定义“重叠”，颜色线宽等不一样算不算？线段和多义线部分或者全部重合算不算？

baoxiaozhong · 发表于 2020-3-4 14:35

没有看到源码。

香远益清 · 发表于 2020-3-4 14:43

overkill最好了

664571221 · 发表于 2020-6-12 14:11

你好能上传下文件吗？？？

andyzha · 发表于 2020-6-12 16:16

我也有类似的需求，贡献一下源码大家一起探讨一下。

lee50310 · 发表于 2020-6-13 08:26

本帖最后由 lee50310 于 2020-6-13 08:29 编辑

我也有类似的需求，贡献一下源码大家一起探讨一下。

复制代码

做比較,還是 overkill 最強,所以把之前的程式碼下架
另找用 overkill 寫的簡單程式碼讓你做參考

andyzha · 发表于 2020-6-13 08:38

lee50310 发表于 2020-6-13 08:26
做比較,還是 overkill 最強,所以把之前的程式碼下架
另找用 overkill 寫的簡單程式碼讓你做參考

这个是把overkill的命令增强了吗？

lee50310 · 发表于 2020-6-13 10:22

这个是把overkill的命令增强了吗？

复制代码

沒有增強,功能還是一樣
程式說明  (command "-overkill" ss ""+參數設定...... ) ;;這一行就已經將選集中的重複物件的實體刪除了
            如果刪除後的選集 ss  程式還要拿來做他用
            重複的實體已被刪除 ,但選集ss中會存在沒有實體的無效圖元
            因此以下這幾行 (foreach item (vl-remove-if .............(setq ss (ssdel item ss)) )
         是去除選集中ss  無效的圖元, 方便應用而已

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

[源码] 刪除圖面內重複疊加的物體

本帖子中包含更多资源

本帖子中包含更多资源

浏览过的版块