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

知足

急急急，thx

dongshui8558

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

sefule

(startPosX,startPosY,level,width,height,rowNO,colNO:integer)
is
        objName:string;
        obj:object;
        diffY:integer;

- l2 i  U' U5 Z% `$ g# i+ W, ]" l+ }do       
1 ]3 K7 m. c0 G# a. {9 y  y" y        diffY := height//level - 1;
0 N( X% q7 \+ h) Y( T# h9 e        if diffY < 1 then
                return;
        end;       
       
        for local i := 1 to level loop
                objName := to_str("p",rowNO,"_",colNO,"_",i);
1 O$ Q8 d" w! K4 @& f                obj := .Models2.MaterialFlow.SingleProc.CreateObject(current,startPosX,startPosY,objName);
7 k$ s+ S0 m6 |( H                --local down := obj.setAnipoint()
                local down := 1;
1 o! w- u" E* S8 w" D/ i                local up := current.setanipoint(startPosX + width/2,startPosY+1);
                current.linkAniPoint(up, obj, down); --Á´½Óµã
7 e% _7 c4 ^9 H8 |; h3 A  T                startPosY := startPosY + diffY + 1;
3 M6 F5 H  Y9 I/ i- ?6 S! U        next;
end;
需要注意的是要先清空在链接。

知足

dongshui8558 发表于 2014-12-28 09:45
# `! t) H/ |9 O$ ?# |2 f' U为什么要实现函数连接呢，手动连接不是也很方便啊。

1 L- ?0 \$ e4 d; P1 s8 u. u% ^9 k因为我有多种情况要需要触发多个动画点

知足

sefule 发表于 2014-12-29 16:16
(startPosX,startPosY,level,width,height,rowNO,colNO:integer)
+ J5 [0 ^% V) o/ r1 Kis
3 Q1 k5 v5 [/ O. q1 d; l0 r        objName:string;

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