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

知足

急急急，thx

dongshui8558

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

sefule

(startPosX,startPosY,level,width,height,rowNO,colNO:integer)
is
        objName:string;
        obj:object;
7 V" L5 U! R( v: @) \        diffY:integer;

do       
/ d( V) ?7 e% b: ]6 J        diffY := height//level - 1;
' d$ Y- T. |0 }- l        if diffY < 1 then
                return;
        end;       
       
        for local i := 1 to level loop
, U+ S, y0 _# w, C0 H6 I! A                objName := to_str("p",rowNO,"_",colNO,"_",i);
) Q: d! E5 T# n5 o/ P, e! x                obj := .Models2.MaterialFlow.SingleProc.CreateObject(current,startPosX,startPosY,objName);
9 {; U  K+ P+ Q. z: v                --local down := obj.setAnipoint()
- _. B' b. M4 E6 Q$ z/ B  e                local down := 1;
' ~: B5 F; y9 P, E# D8 r                local up := current.setanipoint(startPosX + width/2,startPosY+1);
, i+ A7 [# o- o9 Y                current.linkAniPoint(up, obj, down); --Á´½Óµã
                startPosY := startPosY + diffY + 1;
        next;
end;
: i" X# Z1 f- B$ ^& K需要注意的是要先清空在链接。

知足

dongshui8558 发表于 2014-12-28 09:45
) d1 \2 W' N/ S" d$ g- X+ K* {2 r为什么要实现函数连接呢，手动连接不是也很方便啊。

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

知足

sefule 发表于 2014-12-29 16:16
(startPosX,startPosY,level,width,height,rowNO,colNO:integer)
" ]0 z7 M$ d$ f& h# Gis
        objName:string;

* G0 P; @% R' @2 F- Kthx，程序还没试，我通过另一种方法解决了这个问题