本帖最后由 筑梦NARUTO 于 2015-4-19 12:08 编辑
Dim strObject, strCurve0, strCurve1 strObject = Rhino.GetObject("Select object to flow") If Not IsNull(strObject) Then strCurve0 = Rhino.GetObject("Base curve", 4) strCurve1 = Rhino.GetObject("Target curve", 4) Rhino.FlowObject strObject, strCurve0, strCurve1 End If
这个帮助文件自带的例子,其中strobject 可以同过script自动选取,但是strcurve0和strcurve1我始终无法做出软件自动拾取的效果。
我想要的效果是,我只要选取曲面,则软件自动完成流动,不需要再有鼠标选取基准曲线跟目标曲线,其他的过程我都已经通过rhinoscrip实现,就只剩下选取曲线的两个步奏始终都无法绕开鼠标选取,求各位大神指点。
|