设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 4278|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。5 t7 `$ n6 b& n: k# X
语句是这样的4 K9 N: ^) H! e# R7 W# I- I
is
# p8 |7 F6 n9 m        i:integer;
9 }( F3 q! k' E, k        Res:string;' c4 Y" o: h4 l" Z# b& y. c
        obj:object;6 ?! p- W0 t4 ^# _4 i2 f0 g
do
* B* s  H! o( w        if existsObject("Status") then$ a9 G, s4 U- F( {* t
                Status.deleteObject;! M1 y, Q/ q6 @1 z& I
        end;
5 W$ N3 D9 n' n% p1 x        for i:=1 to 10 loop" i+ b: r3 v; s; u- m
                Res:=sprint("Store_",i);
, n+ n2 J% k: Z. j& Y! e. {                if existsObject(Res) then! K# f4 g  R, J# j$ Z: K. a
                        Obj:=str_to_obj(Res);
' P( k" l$ Z8 {0 Q                        Obj.deleteObject;
/ a" z4 y  H7 d4 S                end;7 m; o" R/ O. [- S3 z# Z; l) d
        next;
2 [0 d' G+ n3 h: N        --shengcheng Status:zimoxingceng6 S3 [; j9 w* k, p
        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
0 r  W: x; I' `9 L1 ?! @8 ]7 z        Obj.Label:="warehouse status";, ?1 K9 W! Z. Z  m8 p7 U( I
       
6 M0 z+ b& W1 i0 |7 Y        for i:=1 to WH_nums loop. i: m9 ^/ W& f4 v( j# ~+ a
                Res:=sprint("Store_",i);
6 {7 F' }8 D6 K# ~9 J  R                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);+ q4 `  v* k) u. n( M7 N
                Obj.Label:=sprint("huojiaceng:",i);" M  p7 J$ v0 |; m( U+ o# g
                Obj.xDim:=WH_x;. r( O3 |2 p5 H4 |4 _9 ^6 h- x
                Obj.yDim:=WH_y;
- B$ d9 y/ }1 d! ~2 l: ~                Res:=sprint("StoreData_",i);
7 ]7 l7 y  i# B; Q! G                  z  h  K3 c* m2 g" W0 ]' z
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);8 ~- y# |3 j' W( _: w- x; M8 x! u0 T
                Obj.Label:=sprint("huojiaceng:",i);
) e7 K* M* E! x. M1 {                Obj.inheritFormat:=false;! G. G! N. y# |+ K9 T# m3 d  w
                Obj.maxxDim:=WH_x;6 O8 m8 r. @0 p5 B
                Obj.maxyDim:=WH_y;- R' |% }% [+ L1 M' s, ]
                Obj.ColumnWidth:=3;
0 c2 ]; z# M9 q( @0 X  }        next;
4 R8 A" L2 y: e9 M  j6 k        % ~6 j9 g7 k- v
        .Delivery.MUs.Forklift.speed:=2;3 u- _! Z* ~) E4 O
        WH_var.delete({1,Part_Nums+1}..{*,*});
- m! j0 q2 N. T: e: p) g$ R# V+ [        for i:=1 to Part_Nums loop" Z6 L) K" T" m5 q/ O5 o
                WH_var[1,i]:=chr(64+i);
+ U, n6 ]* s4 w. a4 |: [        next;
9 N, R; S' k# T0 C- qend;7 f1 r' _) m, a  k+ e
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
  O! \8 C9 z! a4 }( C5 c* W6 Z% I6 d/ {' o! k* L3 V

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-7-18 15:19 , Processed in 0.017076 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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