[求助]：怎样在lisp里打断spline闭合的曲线?

真龙天子 · 发表于 2006-7-4 21:17:00

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

一条spline闭合的曲线ssn,需要在p1(p1在线上)处将它打断,目的是使之不闭合,又想让它开的口子尽可能性地小,用下面的命令无法实现,提示说:无法仅在一点打断闭合的周期性曲线
(command "_break" ssn p1)
请问要用什么命令才能达到目的?

eachy · 发表于 2006-7-4 21:50:12

看看12楼的帖子，好东西为什么总是没人看呢？

http://p4.xdcad.net/forum/showthread.php?s=&threadid=558504

真龙天子 · 发表于 2006-7-4 22:08:09

回斑主,我去看了,是"第六个：选择物体或绘制直线，将与其相交的所有物体打断"吧,太复杂了,

eachy · 发表于 2006-7-4 22:42:13

唉，你还是没有仔细看

((and (= "AcDbSpline" (vla-get-objectname obj2Break))
; only closed splines
(vlax-curve-isClosed obj2Break)
)
(setq p1param (vlax-curve-getparamatpoint obj2Break pt)
p2param (+ p1param 0.000001)
p2 (vlax-curve-getPointAtParam obj2Break p2param)
)
(command "._break"
(vlax-vla-object->ename obj2Break)
"non"
(trans pt 0 1)
"non"
(trans p2 0 1)
)
)

真龙天子 · 发表于 2006-7-4 23:33:48

谢谢斑主!问题已解决:在P1点画一小园,以园为剪切边界,将园内的曲线剪掉后,再删除园就可达到目的,这样好像简单点.
我还有另外一个问题,就是怎样取得当前屏幕的左下角和右上角坐标?
我是新手,斑主在楼上的函数我看不懂,能否加上注释让我学习学习?

xyp1964 · 发表于 2006-7-4 23:34:36

最初由真龙天子发布
[B]一条spline闭合的曲线ssn,需要在p1(p1在线上)处将它打断,目的是使之不闭合,又想让它开的口子尽可能性地小,用下面的命令无法实现,提示说:无法仅在一点打断闭合的周期性曲线
(command "_break" ssn p1)
请问要用什么... [/B]

[php](command "break"
   ssn
   p1
   (xyp-get-CurvePointAtDist
   ssn
   (+ (xyp-get-LengthAtPoint ssn p1) 0.00001)
   )
)[/php]

eachy · 发表于 2006-7-4 23:46:04

最初由真龙天子发布
[B]谢谢斑主!问题已解决:在P1点画一小园,以园为剪切边界,将园内的曲线剪掉后,再删除园就可达到目的,这样好像简单点.
我还有另外一个问题,就是怎样取得当前屏幕的左下角和右上角坐标?
我是新手,斑主在楼上的函数我看不... [/B]

查 screensize viewctr viewsize 系统变量，学会用联机帮助

真龙天子 · 发表于 2006-7-5 00:00:56

谢谢XYP斑主,你的函数太好了!经试用,比我自己编的还好用,但就是看不懂.
谢谢eachy 斑主的提示,我已查了,在此贴出,以便其他人学习
screensize 以像素点表示的当前视区尺寸(X和Y)
viewctr 存储用ucs表示的当前视窗中当前视图的中心点
viewsize 存储当前视窗的视图高度,以图形单位表示

WHGF · 发表于 2006-7-5 09:06:41

这样做会改变Spline线的形态，

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

[求助] [求助]：怎样在lisp里打断spline闭合的曲线?

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子

Re: [求助]：怎样在lisp里打断spline闭合的曲线?