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

知足

急急急，thx

dongshui8558

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

sefule

(startPosX,startPosY,level,width,height,rowNO,colNO:integer)
is
        objName:string;
: y+ d1 d5 a) R- u: ^        obj:object;
3 }1 V0 _- s' k; D$ y: n        diffY:integer;

5 f+ m- C6 E! I& P- F# e/ h' |' cdo       
3 R+ s0 W! _  a7 v5 t* t; b        diffY := height//level - 1;
        if diffY < 1 then
9 {: U1 c2 M8 Z( J' X+ H# C                return;
        end;       
       
        for local i := 1 to level loop
, l9 k1 N/ a' c1 m+ O$ u0 M. l2 f                objName := to_str("p",rowNO,"_",colNO,"_",i);
                obj := .Models2.MaterialFlow.SingleProc.CreateObject(current,startPosX,startPosY,objName);
                --local down := obj.setAnipoint()
                local down := 1;
                local up := current.setanipoint(startPosX + width/2,startPosY+1);
                current.linkAniPoint(up, obj, down); --Á´½Óµã
) ~1 d$ |0 m9 m6 M2 U                startPosY := startPosY + diffY + 1;
9 {7 }0 k( A4 |, l$ O        next;
end;
# o! n* m/ R, k需要注意的是要先清空在链接。

知足

dongshui8558 发表于 2014-12-28 09:45
为什么要实现函数连接呢，手动连接不是也很方便啊。

因为我有多种情况要需要触发多个动画点

知足

sefule 发表于 2014-12-29 16:16
(startPosX,startPosY,level,width,height,rowNO,colNO:integer)
is
8 t, r6 T' z3 U, Y        objName:string;

9 u8 ]8 k% k( B% D2 X) Y2 Fthx，程序还没试，我通过另一种方法解决了这个问题