设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 3424|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
5 z7 t( x! o/ o, b0 N0 V语句是这样的/ K' y  Q5 N8 i: V
is
4 t& g! H. v) }; Z3 M, o        i:integer;$ q8 V. [* n3 {7 W0 \
        Res:string;
' O0 v+ u, \0 {7 z        obj:object;
- i/ {1 v% j+ Qdo
( f& P7 h; R: f- ~  P5 t        if existsObject("Status") then
5 g7 _) r- g( V1 F* j7 G/ I- E                Status.deleteObject;
2 g6 v+ t  ?9 _! m3 e0 l) \9 a        end;! H  S) f$ G: N! B* _: W, \
        for i:=1 to 10 loop
" X; P# }' b+ }! v; c                Res:=sprint("Store_",i);* R& h8 B* `; [  ]
                if existsObject(Res) then1 _2 M* ^& X  z" C( m; ?- n
                        Obj:=str_to_obj(Res);# ~1 q0 R9 T1 ^" f
                        Obj.deleteObject;& x/ V+ ]7 `+ A% d  [
                end;
$ D  |" g) S+ c, b$ R* {$ r        next;3 {3 r' P0 K6 w
        --shengcheng Status:zimoxingceng( K* ]' J) c  L
        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");, l+ i; _+ z+ ?0 Z
        Obj.Label:="warehouse status";
# a" B7 {/ \% O2 {       
6 P0 y' ^$ F2 E  ^) `        for i:=1 to WH_nums loop, A; H: i6 a6 N% t' d$ a) e
                Res:=sprint("Store_",i);
. w% Y5 ~9 \6 U8 \7 J& c                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);+ ^+ a( Z; W7 R2 s& x
                Obj.Label:=sprint("huojiaceng:",i);
# L" c& h& H# r% C8 F) E                Obj.xDim:=WH_x;5 M- L, H5 T% }3 S1 f1 u
                Obj.yDim:=WH_y;" [8 X( c8 R0 O, }3 S  x5 Y4 Z
                Res:=sprint("StoreData_",i);: q9 H" U/ w. [! O: e% N4 R3 r
                ; `. l* y5 }" U# l' X) @
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
9 \3 A4 ?5 a! t  V                Obj.Label:=sprint("huojiaceng:",i);
$ P. k5 M# q+ M, ?                Obj.inheritFormat:=false;
9 X4 |' c. x0 q- {. ?# d/ i! X$ i                Obj.maxxDim:=WH_x;0 e. y* V. |: R" ?/ r6 Y# f' h
                Obj.maxyDim:=WH_y;
) U' e4 B# j( U9 }                Obj.ColumnWidth:=3;
- U) y! X4 F6 K/ o% ~; b8 g7 w        next;
) s" {- C. R5 H& x* |5 d        / C4 Q# }3 ?- H6 z2 f2 r; l. p
        .Delivery.MUs.Forklift.speed:=2;: ^9 ~+ J" F, q: W! K' V
        WH_var.delete({1,Part_Nums+1}..{*,*});  f8 c% g  g% s/ s5 h( D. A
        for i:=1 to Part_Nums loop
( }9 c9 O, ~3 `8 h) t% g( E                WH_var[1,i]:=chr(64+i);
% R9 ^. L  r' u. N: C' {  {0 X$ ^        next;
+ u$ L7 E( q$ O) o# gend;/ t: q+ }; C( Y* Z
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
6 s( B" L# Z1 n+ }; e( ]
- Y/ t$ \3 P% n/ t; k9 g

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-2-24 01:48 , Processed in 0.017697 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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