emplant中如何用函数来实现动画点链接对象

知足

急急急，thx

dongshui8558

为什么要实现函数连接呢，手动连接不是也很方便啊。

sefule

(startPosX,startPosY,level,width,height,rowNO,colNO:integer)
7 R0 @6 y1 y5 i3 F: c% d( Y) ]/ F) f8 ^is
        objName:string;
1 I: P3 Y* P1 d9 ~( I        obj:object;
# c) c7 g# ?% t- Y( p5 J6 p        diffY:integer;

" j4 O& j$ n5 ?5 D" S) Cdo       
        diffY := height//level - 1;
        if diffY < 1 then
4 O* F) ^2 p' [9 e8 C' `1 y$ X                return;
0 G' a: u" Y! _6 _; ~( N        end;       
       
        for local i := 1 to level loop
                objName := to_str("p",rowNO,"_",colNO,"_",i);
                obj := .Models2.MaterialFlow.SingleProc.CreateObject(current,startPosX,startPosY,objName);
                --local down := obj.setAnipoint()
' M& a; q# H/ n4 |                local down := 1;
2 H9 N8 T2 u1 `6 W4 c" T                local up := current.setanipoint(startPosX + width/2,startPosY+1);
                current.linkAniPoint(up, obj, down); --Á´½Óµã
7 u5 p! m+ e) o/ ^                startPosY := startPosY + diffY + 1;
1 I7 @6 x6 p- g        next;
end;
* r2 w* C  D* I" a需要注意的是要先清空在链接。

知足

dongshui8558 发表于 2014-12-28 09:45
( K! q/ p2 T) E& }为什么要实现函数连接呢，手动连接不是也很方便啊。

7 X; M) X. H5 D$ T8 q7 G因为我有多种情况要需要触发多个动画点

知足

sefule 发表于 2014-12-29 16:16
(startPosX,startPosY,level,width,height,rowNO,colNO:integer)
0 `! E/ F& m. Y6 k! O" Jis
        objName:string;

, t8 F% b, Q# w1 R# V( kthx，程序还没试，我通过另一种方法解决了这个问题