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

知足

急急急，thx

dongshui8558

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

sefule

(startPosX,startPosY,level,width,height,rowNO,colNO:integer)
is
        objName:string;
) U7 ~; f3 H+ N; C5 M7 _        obj:object;
        diffY:integer;

do       
        diffY := height//level - 1;
        if diffY < 1 then
0 i8 m2 w- J" V                return;
        end;       
       
        for local i := 1 to level loop
                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);
; ^: x7 B' i) k- N' B0 X* _8 j6 K                current.linkAniPoint(up, obj, down); --Á´½Óµã
8 ~6 @$ s$ p. ^9 P) o                startPosY := startPosY + diffY + 1;
0 |" i# x. X: z( O! R1 s* p        next;
end;
5 t  P. p& B6 w! x  ]需要注意的是要先清空在链接。

知足

dongshui8558 发表于 2014-12-28 09:45
7 ^6 q% ?. p$ {3 F为什么要实现函数连接呢，手动连接不是也很方便啊。

; ]& ?1 V1 b6 G" s1 [8 V因为我有多种情况要需要触发多个动画点

知足

sefule 发表于 2014-12-29 16:16
(startPosX,startPosY,level,width,height,rowNO,colNO:integer)
8 ^0 c6 y# d* f3 k; ~* j% g) Eis
        objName:string;

1 d/ V  q! u' vthx，程序还没试，我通过另一种方法解决了这个问题