批量封闭图形

baitang36

file:///C:/Users/Administrator/Desktop/%E6%89%B9%E9%87%8F%E5%B0%81%E9%97%AD.webp
这是什么？
楼主喜欢装神弄鬼的，是算命大师出身？

wp6667

baitang36 发表于 2025-2-15 07:37
(DEFUN C:PPE (/ SS)

本人从来没有，自诩大师，你这是何故？ 我前面的法律声明，可不是儿戏！这算是事实清楚，证据确凿吧！？你自己看着办吧！

wp6667

wp6667 发表于 2025-2-15 08:46
本人从来没有，自诩大师，你这是何故？ 我前面的法律声明，可不是儿戏！这算是事实清楚，证据确凿吧！？ ...

你侵权了，第一请你马上删贴，第二请你发贴道歉！这样我既往不咎！

xyp1964

;; 先给个容差值可能更合理

1. (defun c:tt()
   
2.   (or dd(setq dd 5000.))
   
3.   (setq dd(Udist 7 "" "最大连接距离<输入或鼠标直接量取>" dd nil))
   
4.   (while(setq ss(ssget))(command"pedit""m"ss"""j"dd""))
   
5.   (princ)
   
6. )

(defun c:tt()<br />   (or dd(setq dd 5000.))<br />   (setq dd(Udist 7 "" "最大连接距离<输入或鼠标直接量取>" dd nil))<br />   (while(setq ss(ssget))(command"pedit""m"ss"""j"dd""))<br />   (princ)<br /> )

水仙的错

楼主的没有源码文件吗？

蓝天cayuer

wp6667 发表于 2024-11-26 20:22
我这个应该算，另辟蹊径，讨巧的方法，系偶然灵感所写！

怎么使用这个？ 随便画了三个 无法实现闭合 求教程，谢谢

shirker

试了一下,还不错,谢谢分享

season_88

谢谢大师分享

superstoney

谢谢分享~~

YNED

应用场景，我再找找