script小问题求助

xerrolol

想通过joinsurface这个命令把几个面接成polysrf，但是不能成功，也没有弹出错误

截取一段简化的代码如下

Dim objects, sArr1,sArr2,sArr3,sArr4,srf1,srf2,srf3,srf4,arrsrfs

sArr1=array(array(0,0,0),array(5,0,0),array(0.5*5,0,2))

sArr2=array(array(0,5,0),array(5,5,0),array(0.5*5,5,2))  

sArr3=array(array(0,0,0),array(0,5,0),array(0.5*5,5,2),array(0.5*5,0,2))   

sArr4=array(array(5,0,0),array(5,5,0),array(0.5*5,5,2),array(0.5*5,0,2))

srf1=rhino.AddSrfPt(sArr1)

srf2=rhino.AddSrfPt(sArr2)

srf3=rhino.AddSrfPt(sArr3)

srf4=rhino.AddSrfPt(sArr4)

arrsrfs=array(srf1,srf2,srf3,srf4)


objects=rhino.JoinSurfaces(arrsrfs,True)



求高手指点，代码有什么问题或者应该怎样做。
谢谢！

panhao1

好像要输入3维点 而不是数组吧

1235813

Dim objects, sArr1,sArr2,sArr3,sArr4,srf1,srf2,srf3,srf4,arrsrfs

        sArr1=array(array(0,0,0),array(5,0,0),array(0.5*5,0,2))

        sArr2=array(array(0,5,0),array(5,5,0),array(0.5*5,5,2))  

        sArr3=array(array(0,0,0),array(0,5,0),array(0.5*5,5,2),array(0.5*5,0,2))   

        sArr4=array(array(5,0,0),array(5,5,0),array(0.5*5,5,2),array(0.5*5,0,2))

        srf1=rhino.AddSrfPt(sArr1)

        srf2=rhino.AddSrfPt(sArr2)

        srf3=rhino.AddSrfPt(sArr3)

        srf4=rhino.AddSrfPt(sArr4)

        call rhino.SelectObjects(array(srf1,srf2,srf3,srf4))
        call rhino.Command("join")
        call rhino.UnselectAllObjects
        objects=rhino.LastCreatedObjects

1235813

应用join命令来实现

sysjs

还没有到这一步…………

xerrolol

2# panhao1



Rhino.JoinSurfaces (arrObjects [,blnDelete])

提示里是物件组啊。。

xerrolol

3# 1235813

非常感谢！，确实达到了目的

不过不明白joinsurface是有bug还是用法不对。。

常瑞

vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv

Tony

不过不明白joinsurface是有bug还是用法不对。。
xerrolol 发表于 2011-7-4 16:46

                               
登录/注册后可看大图

也有同上的问题。。。望解答

metall

按照rhinoscript函数的介绍joinSurface输入的面组必须是an ordered array of strings即是必须按照可搭接上的顺序排列输入的面，按照你的面的生成，修改为
srf(0)=Rhino.AddSrfPt(sArr1)
srf(2)=Rhino.AddSrfPt(sArr2)
srf(1)=Rhino.AddSrfPt(sArr3)
srf(3)=Rhino.AddSrfPt(sArr4)
就OK了