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

知足

急急急，thx

dongshui8558

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

sefule

(startPosX,startPosY,level,width,height,rowNO,colNO:integer)
is
        objName:string;
' S! w& \9 T! e- @, H$ ]4 W        obj:object;
        diffY:integer;

do       
6 d! a) ~# w( m6 [1 ~& I9 v        diffY := height//level - 1;
3 j$ ^% `- E# S* h; I1 ^        if diffY < 1 then
8 W9 V" v6 e- w) u! M: F* {: u5 ?                return;
        end;       
* J9 H% o1 Y' e3 d       
7 e7 B2 L% @+ r+ o5 ?6 S4 n! u; w% F) B        for local i := 1 to level loop
                objName := to_str("p",rowNO,"_",colNO,"_",i);
: x6 Q" Q. ]" {, U. j                obj := .Models2.MaterialFlow.SingleProc.CreateObject(current,startPosX,startPosY,objName);
* w  \; \5 a& _8 Y; Z6 m/ G& g                --local down := obj.setAnipoint()
3 G0 s( N5 b& p, `                local down := 1;
* g1 h; T' C8 B! H4 K                local up := current.setanipoint(startPosX + width/2,startPosY+1);
                current.linkAniPoint(up, obj, down); --Á´½Óµã
                startPosY := startPosY + diffY + 1;
* V) ?# C0 m7 W/ Q; Z0 X) N0 Y        next;
end;
  m& p% f$ G8 m1 H3 }) Z" ?- J, J需要注意的是要先清空在链接。

知足

dongshui8558 发表于 2014-12-28 09:45
# i4 _- T' D2 ^8 F4 C7 C为什么要实现函数连接呢，手动连接不是也很方便啊。

' x2 d% x# [2 J: M因为我有多种情况要需要触发多个动画点

知足

sefule 发表于 2014-12-29 16:16
4 k, B( |" B% L% u6 O& _! d(startPosX,startPosY,level,width,height,rowNO,colNO:integer)
is
4 W7 O6 J! N. A) m9 f& |        objName:string;

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