设为首页收藏本站

最大的系统仿真与系统优化公益交流社区

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 2993|回复: 0

[求助] 仿真出错,求大神帮我看看哪里错了

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。5 P- w) u# _5 e' B0 w
语句是这样的
( W0 `' b% x! B9 \& Y! Lis
, v$ B$ T, S( W- ?        i:integer;
1 }- g* w. b8 a1 G) X        Res:string;7 Q- F; m& y, }$ e7 \
        obj:object;* ]/ U5 |6 P; S2 v
do
3 A  T$ Q% f3 G/ v        if existsObject("Status") then
6 W* k8 P( [/ T  f                Status.deleteObject;6 e# e  X+ V' I0 L- d5 c1 |
        end;+ |3 Y, X2 @6 i  l
        for i:=1 to 10 loop
. e  G; F0 r4 x4 N1 Z1 X9 G                Res:=sprint("Store_",i);
* j2 e+ b6 M& E( {! v1 n                if existsObject(Res) then% ^) S0 v  i/ O' l
                        Obj:=str_to_obj(Res);
6 |0 Q* j3 Y4 N0 T5 k# b& C& S                        Obj.deleteObject;
8 X8 p3 h5 }2 z; Q                end;' ?4 G( r9 ^* N: }- C5 ?
        next;
$ K: K1 Z. v( h1 X% E0 I" d        --shengcheng Status:zimoxingceng. `+ q' v  V! _* Y* F, n5 m0 w
        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
% C8 E5 ^6 y; A/ p" _* V        Obj.Label:="warehouse status";1 h; w* G9 S) |% M* p
       
/ g- O. Q* \  c( O        for i:=1 to WH_nums loop
! ]- f* g8 E9 a) s6 D/ v* P                Res:=sprint("Store_",i);
# |% d, A* W* U0 z$ C; M: ?: H                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
4 p+ \4 P0 r  \  ~+ X3 A: F                Obj.Label:=sprint("huojiaceng:",i);
9 }6 N' S; E' n6 y* Z+ b1 }3 I; }                Obj.xDim:=WH_x;
' q, p9 M+ w% d& P/ ?0 n                Obj.yDim:=WH_y;/ M* U6 ^" A  P, o% D
                Res:=sprint("StoreData_",i);
) G3 h# g  E, l. S% I  \( E" D8 |                0 ^- U4 D- C: C! Y' F
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);2 x# c" o9 ^  |; i+ r
                Obj.Label:=sprint("huojiaceng:",i);+ ?# P% {; A  Z8 b& i, [$ a
                Obj.inheritFormat:=false;
, z2 [; C- I4 i7 X0 X                Obj.maxxDim:=WH_x;0 v' T- O$ [8 o
                Obj.maxyDim:=WH_y;
* b- B: q# U! z6 f+ H( E' f  ]                Obj.ColumnWidth:=3;) }1 [" j: ^% |5 }. L* r$ ^4 L
        next;
) N: k( f/ [% K7 k' {; O3 R, X5 l" l       
4 Z7 k8 E  f4 C* l+ _1 U5 r' c2 `/ v        .Delivery.MUs.Forklift.speed:=2;. v, V5 G% p" g
        WH_var.delete({1,Part_Nums+1}..{*,*});
) C8 D  D1 z" u+ [) e1 {7 g' ]        for i:=1 to Part_Nums loop
" o0 N; ^: N& W                WH_var[1,i]:=chr(64+i);7 w1 w5 n( a2 U' p2 q  d( [
        next;
# d$ i8 G8 `: X$ I9 ~7 pend;4 b1 D8 q! r6 W" w! F$ {  m4 B) T
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了, @  f" z  Z* j
+ i0 R7 V4 {9 E% m* V3 l

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|Archiver|手机版|SimulWay 道于仿真   

GMT+8, 2025-11-26 23:38 , Processed in 0.017981 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表