本帖最后由 筑梦NARUTO 于 2015-4-19 09:57 编辑
不会rhinoscript,不过你应该可以用 Rhino.ObjectsByType等函数去做,不过不知道你为啥要放弃脚本与用户的交互。
比如可以像这样做就不需要选择线,脚本自动选择两条线:
[mw_shl_code=applescript,true]
Dim strObject, strCurve0, strCurve1,strCurve
strObject = Rhino.GetObjects("Select object to flow")
If Not IsNull(strObject) Then
strCurve = Rhino.ObjectsByType(4, True)
strCurve0 = strCurve(1)
strCurve1 = strCurve(0)
'strCurve0 = Rhino.GetObject("Base curve", 4)
'strCurve1 = Rhino.GetObject("Target curve", 4)
Rhino.FlowObject strObject, strCurve0, strCurve1
End If[/mw_shl_code] |