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

知足

急急急，thx

dongshui8558

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

sefule

(startPosX,startPosY,level,width,height,rowNO,colNO:integer)
is
6 ^8 @( E: _3 x/ _! s! m) d        objName:string;
        obj:object;
        diffY:integer;
' T  o1 m1 G* _4 T
& ]( r- P$ q/ ~8 h0 H8 Sdo       
; ^! v( D) C2 u% d" u" l        diffY := height//level - 1;
' q4 I5 h/ _6 o3 `        if diffY < 1 then
/ d; S7 A" r/ H                return;
: _( q9 H( O/ p9 u0 s) Y" G        end;       
6 a) d; o5 K4 c$ b7 T6 x* o" A       
, ~4 y* M' N3 X8 C* o6 e( `8 O: K        for local i := 1 to level loop
5 [" u# I6 i% @" @$ |7 H9 c                objName := to_str("p",rowNO,"_",colNO,"_",i);
  @- _/ R) r" R                obj := .Models2.MaterialFlow.SingleProc.CreateObject(current,startPosX,startPosY,objName);
* E5 u. L# o. S. A                --local down := obj.setAnipoint()
- [+ o: Z$ A9 b2 g& z                local down := 1;
                local up := current.setanipoint(startPosX + width/2,startPosY+1);
                current.linkAniPoint(up, obj, down); --Á´½Óµã
                startPosY := startPosY + diffY + 1;
        next;
. m( b; q, z8 D' ?1 r$ Pend;
需要注意的是要先清空在链接。

知足

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

. X! i% _3 W  V& d因为我有多种情况要需要触发多个动画点

知足

sefule 发表于 2014-12-29 16:16
' @) p3 \6 A3 v5 g4 G(startPosX,startPosY,level,width,height,rowNO,colNO:integer)
is
        objName:string;

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