[求助]：请问如何过曲线上一点作其切线

flying372 · 发表于 2003-8-22 13:47:10

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

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

×

请问如何过曲线上一点作其切线？！

ahlzl · 发表于 2003-8-22 14:33:29

27182818284长老的好办法！看：

xzg_hello · 发表于 2003-8-22 14:39:30

如何确保是过特定的点呢

ahlzl · 发表于 2003-8-22 14:45:31

最初由 xzg_hello 发布
[B]如何确保是过特定的点呢 [/B]

这样如何：

alanbjiang · 发表于 2003-8-22 15:20:13

那怎样过直线上一点做这条直线的垂线呢？？

flying372 · 发表于 2003-8-22 15:23:10

谢谢各位大虾指点
小弟看了几遍，还有一点不懂
在定点画辅助垂线时，选垂足的菜单如何出来的，我用右键，任务却结束了？！

alanbjiang · 发表于 2003-8-22 15:34:55

在这里！！但是谁回答一下我的问题？？

ahlzl · 发表于 2003-8-22 15:41:08

最初由 flying372 发布
[B]谢谢各位大虾指点
小弟看了几遍，还有一点不懂
在定点画辅助垂线时，选垂足的菜单如何出来的，我用右键，任务却结束了？！ [/B]

用中键!如果没中键,可用SHIFT+右键(我就是这样的).

ahlzl · 发表于 2003-8-22 15:49:06

最初由 alanbjiang 发布
[B]那怎样过直线上一点做这条直线的垂线呢？？ [/B]

在对象捕捉选项中选中垂足.

stef · 发表于 2003-8-22 22:44:35

我也选了垂足啊
怎么还是不能画垂线
根本没反映啊，不知道怎么搞的！
*-*a

lsjjm · 发表于 2003-12-11 10:30:07

最初由 flying372 发布
[B]请问如何过曲线上一点作其切线？！ [/B]

使用程序很简单!:
(defun C:test ()
  (vl-load-com)
  (setq p (getpoint "\nPick a Point:"))
  (setq cur (ssname (ssget p) 0))
  (setq obj (vlax-ename->vla-object cur))
  (setq tan (vlax-Curve-GetFirstDeriv obj
      (vlax-Curve-GetParamatDist obj
(vlax-curve-getDistAtPoint obj p))))
  (setq pe (polar p (atan (/ (cadr tan)(car tan))) 1))
  (vl-cmdf "line" p pe  "")
)

coolboyman · 发表于 2003-12-11 11:20:27

我怎么看不到图片？？？

beibei_73 · 发表于 2003-12-11 15:42:38

好像只对圆弧线起作用啊

lsjjm · 发表于 2003-12-12 07:12:32

最初由 beibei_73 发布
[B]好像只对圆弧线起作用啊 [/B]

任意曲线! 你试试spline.

ahlzl · 发表于 2003-12-12 14:12:29

我把程序改了一下，可能看的清楚点。

(defun C:test ()
(vl-load-com)
(setq p (getpoint "\nPick a Point:"))
(setq cur (ssname (ssget p) 0))
(setq obj (vlax-ename->vla-object cur))
(setq tan (vlax-Curve-GetFirstDeriv obj
(vlax-Curve-GetParamatDist obj
(vlax-curve-getDistAtPoint obj p))))
(setq pe (polar p (atan (/ (cadr tan)(car tan))) 1))
(vl-cmdf "xline" p pe "")
)

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

[求助]：请问如何过曲线上一点作其切线

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

相关帖子

Re: [求助]：请问如何过曲线上一点作其切线

浏览过的版块