Rhino(犀牛)中国技术支持与推广中心

标题: rvb代码，双轨扫掠圆环无效，请大虾看看 [打印本页]

作者: gyhk02 时间: 2013-6-11 12:35
标题: rvb代码，双轨扫掠圆环无效，请大虾看看
如下图，实现双轨扫掠的功能，但是左上角（1,2）与右下角（3, 4）的两个断面怎么都无效，请大虾看看是怎么回事？

      Dim crv1, crv2, arrLine()
      ReDim arrLine(1)

      crv1 = rhino.GetObject("select crv1")
      crv2 = rhino.GetObject("select crv2")

      arrLine(0) = rhino.GetObject("select line0")
      arrLine(1) = rhino.GetObject("select line1")

      Call Rhino.AddSweep2(array(crv1, crv2), arrLine)

作者: 陈大伟 时间: 2013-6-11 12:49
楼主上模型看看。。。应该你的线是抽取的。。

作者: gyhk02 时间: 2013-6-12 21:04
上面的东西就是我要说的
圆是我手工画的.

作者: Jessesn 时间: 2013-6-12 22:22
帮你稍调整了下，

Dim crv1, crv2
ReDim arrLine(0),arrLine(1)
crv1 = rhino.GetObject("select crv1")
crv2 = rhino.GetObject("select crv2")
arrLine(0) = rhino.GetObject("select line0")
arrLine(1) = rhino.GetObject("select line1")
Rhino.AddSweep2 array(crv1, crv2), arrLine

复制代码

作者: gyhk02 时间: 2013-6-13 09:02
Jessesn：
谢谢你的解答，但是你的代码跟我是一样的哦。

我自己慢慢折腾了一阵子，大概知道问题点了，但还是不知道怎么解决。
问题的关键：两个圆的接缝点不在一起

可是我不知道怎样能把它们放一起。
CurveSeam，只能对单条曲线操作。

作者: 张长林 时间: 2013-6-13 20:26
方向是反的

作者: 张长林 时间: 2013-6-13 20:32
有的时候把曲线穷建一下试试

作者: gyhk02 时间: 2013-6-14 08:12
兄弟，这两个圆是我画的啊！！！

重建了，继续无效！

欢迎光临 Rhino(犀牛)中国技术支持与推广中心 (http://bbs.rhino3d.asia/)