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

知足

急急急，thx

dongshui8558

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

sefule

(startPosX,startPosY,level,width,height,rowNO,colNO:integer)
& }7 E0 m* l( s4 Kis
        objName:string;
        obj:object;
        diffY:integer;

do       
9 i: Y2 y/ C8 B; C# R        diffY := height//level - 1;
        if diffY < 1 then
# X) a  i4 n7 c  F4 s) j                return;
        end;       
3 n5 ^$ i$ W* \% ?3 j       
        for local i := 1 to level loop
" y3 e2 ?& N) o                objName := to_str("p",rowNO,"_",colNO,"_",i);
                obj := .Models2.MaterialFlow.SingleProc.CreateObject(current,startPosX,startPosY,objName);
                --local down := obj.setAnipoint()
                local down := 1;
                local up := current.setanipoint(startPosX + width/2,startPosY+1);
                current.linkAniPoint(up, obj, down); --Á´½Óµã
3 G: ^' A8 F$ b0 }3 g) ]                startPosY := startPosY + diffY + 1;
        next;
end;
9 _1 P/ o" s" H; _5 j) Y- q/ w需要注意的是要先清空在链接。

知足

dongshui8558 发表于 2014-12-28 09:45
; F) E# O' R0 I$ {8 f2 h为什么要实现函数连接呢，手动连接不是也很方便啊。

$ c$ x6 ?/ C% e! |/ B. L因为我有多种情况要需要触发多个动画点

知足

sefule 发表于 2014-12-29 16:16
(startPosX,startPosY,level,width,height,rowNO,colNO:integer)
is
, g) Y3 ^7 t! S7 I1 E- a* B        objName:string;

0 d& A" @( k- c1 @" ]$ Z8 L# `" ~thx，程序还没试，我通过另一种方法解决了这个问题