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

知足

急急急，thx

dongshui8558

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

sefule

(startPosX,startPosY,level,width,height,rowNO,colNO:integer)
is
1 c" T5 D$ ?& G/ p" e) t; T        objName:string;
& z* }' b; M  ^        obj:object;
        diffY:integer;

do       
        diffY := height//level - 1;
& E3 _6 @7 l% j9 p) m$ d+ V9 q        if diffY < 1 then
1 k' F7 {1 u* i* j6 ^                return;
, |: O# D  K) B% X0 t8 l" N        end;       
       
        for local i := 1 to level loop
                objName := to_str("p",rowNO,"_",colNO,"_",i);
$ M) q3 D+ |; R# @/ H( m- S                obj := .Models2.MaterialFlow.SingleProc.CreateObject(current,startPosX,startPosY,objName);
# O8 ^$ @$ T3 n4 q9 T9 t: d3 ^                --local down := obj.setAnipoint()
                local down := 1;
                local up := current.setanipoint(startPosX + width/2,startPosY+1);
2 U* b! L. i1 f+ C! l                current.linkAniPoint(up, obj, down); --Á´½Óµã
                startPosY := startPosY + diffY + 1;
        next;
end;
! M! O3 Y7 I) q! |& u需要注意的是要先清空在链接。

知足

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

因为我有多种情况要需要触发多个动画点

知足

sefule 发表于 2014-12-29 16:16
(startPosX,startPosY,level,width,height,rowNO,colNO:integer)
is
. y' \0 F) N( R: b5 |- ^& m) |  t        objName:string;

6 W6 ]6 n, n# `0 T1 gthx，程序还没试，我通过另一种方法解决了这个问题