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

知足

急急急，thx

dongshui8558

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

sefule

(startPosX,startPosY,level,width,height,rowNO,colNO:integer)
is
" a/ H8 q: M! q6 A        objName:string;
        obj:object;
        diffY:integer;
4 ~8 \2 K4 U; `( _
do       
        diffY := height//level - 1;
6 v6 y3 g) @2 L4 r4 B% S        if diffY < 1 then
                return;
: ?- R  |) m+ t# l5 W" g  K# M        end;       
       
" R" _0 G2 v$ f6 Z: X* u        for local i := 1 to level loop
2 X. w, M  Z- J4 }$ B                objName := to_str("p",rowNO,"_",colNO,"_",i);
                obj := .Models2.MaterialFlow.SingleProc.CreateObject(current,startPosX,startPosY,objName);
2 z; ^  p: B! I                --local down := obj.setAnipoint()
' L1 w6 i/ w$ S0 [  I# m2 }9 q6 f                local down := 1;
                local up := current.setanipoint(startPosX + width/2,startPosY+1);
                current.linkAniPoint(up, obj, down); --Á´½Óµã
" m$ o; I6 f* S7 G+ V; J, E+ {( P                startPosY := startPosY + diffY + 1;
3 d+ y, W% G- D/ B9 G: g        next;
( a# k, x& w$ D+ b/ Xend;
! M* F% E4 c8 k8 U需要注意的是要先清空在链接。

知足

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

+ L9 {: h$ Q9 ^因为我有多种情况要需要触发多个动画点

知足

sefule 发表于 2014-12-29 16:16
2 _' E& e0 A% a, G, t(startPosX,startPosY,level,width,height,rowNO,colNO:integer)
: e6 P6 W5 _# Q9 O  [8 v& pis
- ^+ m5 Q# ?/ k/ z        objName:string;

6 G  `% J0 }( j# X' jthx，程序还没试，我通过另一种方法解决了这个问题