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

知足

急急急，thx

dongshui8558

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

sefule

(startPosX,startPosY,level,width,height,rowNO,colNO:integer)
/ v$ A5 y; c/ e: k5 R+ ?5 }0 P9 iis
        objName:string;
        obj:object;
        diffY:integer;

do       
        diffY := height//level - 1;
) [2 U: B; G9 p. |" y3 ^* T        if diffY < 1 then
                return;
( _* w) a' ~8 W* q4 a- ]* c        end;       
       
8 w! z' u  E. ?. b/ D$ v: E: _        for local i := 1 to level loop
7 B7 s8 @# ?+ l                objName := to_str("p",rowNO,"_",colNO,"_",i);
+ B1 F9 H- Z7 ~9 W+ G. ~                obj := .Models2.MaterialFlow.SingleProc.CreateObject(current,startPosX,startPosY,objName);
                --local down := obj.setAnipoint()
8 C9 o! l/ l' Z5 _: v  ^  A% e1 t1 x                local down := 1;
                local up := current.setanipoint(startPosX + width/2,startPosY+1);
. V  D" A2 o' Y                current.linkAniPoint(up, obj, down); --Á´½Óµã
2 O  ?; j- k$ ?! R* j1 M) i                startPosY := startPosY + diffY + 1;
4 Z! Q4 Y3 s2 S  ^        next;
end;
9 G9 r; m/ }) K% n9 @需要注意的是要先清空在链接。

知足

dongshui8558 发表于 2014-12-28 09:45
( n* f  f" J& |7 j( _. [5 D  T" m$ `为什么要实现函数连接呢，手动连接不是也很方便啊。

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

知足

sefule 发表于 2014-12-29 16:16
(startPosX,startPosY,level,width,height,rowNO,colNO:integer)
is
% v" o. y% n) ]$ f        objName:string;

% ^1 T- r  F1 e' i* J9 ~thx，程序还没试，我通过另一种方法解决了这个问题