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

知足

急急急，thx

dongshui8558

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

sefule

(startPosX,startPosY,level,width,height,rowNO,colNO:integer)
is
        objName:string;
        obj:object;
        diffY:integer;
- J$ ^4 N+ q4 o, L1 [' n3 R
do       
9 ]3 R; F4 {# R& K) M  y/ I, i) d        diffY := height//level - 1;
        if diffY < 1 then
, N. S; q  B" S1 K0 m6 Q                return;
        end;       
       
. a7 ~: w% q9 j; e3 Y  F        for local i := 1 to level loop
7 ^1 \% Z. K3 s/ W7 ?: k) z5 P                objName := to_str("p",rowNO,"_",colNO,"_",i);
) w: a2 L" P) k+ v% n- o: [+ }" Z                obj := .Models2.MaterialFlow.SingleProc.CreateObject(current,startPosX,startPosY,objName);
                --local down := obj.setAnipoint()
                local down := 1;
; M: d* h" W1 G) s                local up := current.setanipoint(startPosX + width/2,startPosY+1);
) i% P+ ]& n' h                current.linkAniPoint(up, obj, down); --Á´½Óµã
- o8 V" t1 V; k- C" R( l                startPosY := startPosY + diffY + 1;
+ D" p- B0 K9 F% T6 ~$ l8 |        next;
4 o" S( g2 g4 H  \5 ?! }& Xend;
/ @3 M& ?' O" X0 I0 M5 P" h% {需要注意的是要先清空在链接。

知足

dongshui8558 发表于 2014-12-28 09:45
# q7 ]# \. `2 S6 [为什么要实现函数连接呢，手动连接不是也很方便啊。

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

知足

sefule 发表于 2014-12-29 16:16
- v: B, x4 V& u5 l$ P& ^(startPosX,startPosY,level,width,height,rowNO,colNO:integer)
' y4 F; ^" `/ a' [: {  e3 zis
        objName:string;

thx，程序还没试，我通过另一种方法解决了这个问题