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

知足

急急急，thx

dongshui8558

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

sefule

(startPosX,startPosY,level,width,height,rowNO,colNO:integer)
is
        objName:string;
        obj:object;
5 }" B3 I+ r4 w/ {, s0 X$ B+ H        diffY:integer;

do       
& |* {0 x8 l, b9 N7 n& d        diffY := height//level - 1;
$ o1 e1 [; X! ]        if diffY < 1 then
4 S4 t( ^) M/ \8 T, a                return;
        end;       
       
1 @. F4 s5 d6 R4 C        for local i := 1 to level loop
( C% k7 K4 x$ e, d                objName := to_str("p",rowNO,"_",colNO,"_",i);
5 C/ [' Q! Z! h& r                obj := .Models2.MaterialFlow.SingleProc.CreateObject(current,startPosX,startPosY,objName);
# X1 {' `# A/ x6 Z& F+ j5 l                --local down := obj.setAnipoint()
% J- u1 W) {4 R" Y. d* ?0 ?& J3 ]                local down := 1;
6 C  ]0 L$ p2 c3 h# u& [                local up := current.setanipoint(startPosX + width/2,startPosY+1);
4 J$ S  g6 S9 \) @; J4 y$ Y$ K                current.linkAniPoint(up, obj, down); --Á´½Óµã
                startPosY := startPosY + diffY + 1;
# q; m9 [: k0 J4 r, x$ i        next;
end;
需要注意的是要先清空在链接。

知足

dongshui8558 发表于 2014-12-28 09:45
/ ]$ l1 r9 o2 d; g为什么要实现函数连接呢，手动连接不是也很方便啊。

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

知足

sefule 发表于 2014-12-29 16:16
% d" k$ e; ^" F/ {5 Y(startPosX,startPosY,level,width,height,rowNO,colNO:integer)
7 D- G0 ]9 f) m  r8 Pis
        objName:string;

8 h- B" Q" }# athx，程序还没试，我通过另一种方法解决了这个问题