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

知足

急急急，thx

dongshui8558

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

sefule

(startPosX,startPosY,level,width,height,rowNO,colNO:integer)
' M6 @) a( b0 n/ b: d+ d& c  qis
) v; Q9 c4 y3 ^$ n. A4 Y        objName:string;
        obj:object;
7 W9 N6 N/ y) A7 H& g( w/ g        diffY:integer;

' n; L+ e/ u" L" o: wdo       
        diffY := height//level - 1;
        if diffY < 1 then
" H2 W+ D- _) d, b2 a, U$ E; n                return;
        end;       
. d! c& j; e4 ?6 D       
        for local i := 1 to level loop
                objName := to_str("p",rowNO,"_",colNO,"_",i);
- V; b1 i  d. y, ^! l. s                obj := .Models2.MaterialFlow.SingleProc.CreateObject(current,startPosX,startPosY,objName);
! Y, k3 N; D4 A# E1 Q5 @                --local down := obj.setAnipoint()
                local down := 1;
1 s$ d# z2 F; l) C. \                local up := current.setanipoint(startPosX + width/2,startPosY+1);
0 x/ [3 l* T0 b5 a                current.linkAniPoint(up, obj, down); --Á´½Óµã
# Z* _$ x& Z$ f. P# K1 Q, g# H7 P                startPosY := startPosY + diffY + 1;
        next;
end;
) R- {8 B- n3 V. X需要注意的是要先清空在链接。

知足

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

% Q! M7 v' d8 d! n6 ~因为我有多种情况要需要触发多个动画点

知足

sefule 发表于 2014-12-29 16:16
(startPosX,startPosY,level,width,height,rowNO,colNO:integer)
is
. O0 s/ O2 ]" U2 y        objName:string;

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