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

知足

急急急，thx

dongshui8558

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

sefule

(startPosX,startPosY,level,width,height,rowNO,colNO:integer)
) T7 L$ S* |3 [  Wis
        objName:string;
        obj:object;
        diffY:integer;

: p8 ~, A$ j# y- Vdo       
        diffY := height//level - 1;
4 l3 M% d& w' ^        if diffY < 1 then
  R  o4 ^3 {0 I                return;
! L0 H) l7 H$ h% }, Q) v; b3 f7 q        end;       
3 E9 Z, J, o, [; ~! K, Z; @6 k       
        for local i := 1 to level loop
$ H0 x" W/ t$ O                objName := to_str("p",rowNO,"_",colNO,"_",i);
                obj := .Models2.MaterialFlow.SingleProc.CreateObject(current,startPosX,startPosY,objName);
                --local down := obj.setAnipoint()
                local down := 1;
1 Y) j* c1 Z5 X7 R                local up := current.setanipoint(startPosX + width/2,startPosY+1);
                current.linkAniPoint(up, obj, down); --Á´½Óµã
                startPosY := startPosY + diffY + 1;
2 B5 B% n5 ~% n8 L        next;
end;
3 P9 ~2 l1 J2 ]) U* p; A8 h$ [需要注意的是要先清空在链接。

知足

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

. n0 [: z1 a7 j& w: T" C因为我有多种情况要需要触发多个动画点

知足

sefule 发表于 2014-12-29 16:16
(startPosX,startPosY,level,width,height,rowNO,colNO:integer)
is
        objName:string;

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