设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 3995|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
: F( s! H, `, x7 p9 `' E% U语句是这样的
/ u' B! x6 l5 |is; T, A1 @$ _# X5 P, h4 _1 U, u3 i
        i:integer;- n" G7 E5 C" B  V+ O9 r8 g
        Res:string;
/ d/ ~: `* k/ h& r: z        obj:object;) i" t& z& m1 `( M
do8 A1 v( ?2 Y) m; D, u+ v
        if existsObject("Status") then2 v+ [8 ]  X$ y, P
                Status.deleteObject;
" K; a# e% _9 A' ~3 P0 L9 h        end;
8 O% {) D2 s4 _1 \0 ~2 e' Y        for i:=1 to 10 loop
$ T1 H! o' Z; y2 M2 P" B& n. z                Res:=sprint("Store_",i);
( v0 q0 |; q0 I! K  ?8 \  X                if existsObject(Res) then
2 L' n5 j2 j0 h! i' U                        Obj:=str_to_obj(Res);
- r$ K  }( R' H% J! ~                        Obj.deleteObject;' P0 ~& ^/ P$ M+ e9 U6 d2 e
                end;
' R& F# P. V5 Y; f9 b        next;9 ?+ T6 r- r/ Q5 M: E: ^
        --shengcheng Status:zimoxingceng
8 K- R! ?# s) I* P  d        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");5 L) p9 |7 _) P
        Obj.Label:="warehouse status";# p* s, I8 T2 }* G! U, K
        0 e9 ?2 p: e* d" e$ r% g6 d5 ^
        for i:=1 to WH_nums loop9 w, l% |4 ^1 G, d+ P, k) P7 q2 U
                Res:=sprint("Store_",i);
$ d! x+ Z+ w7 C$ ^) v. H( O                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);# C9 f+ \+ Q3 e6 Q- R. `
                Obj.Label:=sprint("huojiaceng:",i);1 _7 M8 ^& D, A7 S2 B
                Obj.xDim:=WH_x;0 |- s' I9 s. E' \9 t
                Obj.yDim:=WH_y;
7 t: @/ r  r" w- e3 I8 g                Res:=sprint("StoreData_",i);
( F. Q1 T. [- e. d; p; B1 D                # K/ c  u5 N4 c' E$ v$ R  n! v
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);$ T8 I. t! v1 ^% J, F# V+ p
                Obj.Label:=sprint("huojiaceng:",i);
* s$ P4 {6 c0 ]! t; }( G. K                Obj.inheritFormat:=false;
5 v: N$ B8 ?  j$ S  t3 h                Obj.maxxDim:=WH_x;. I) Z2 ?2 X2 x! G5 E) a# \  L
                Obj.maxyDim:=WH_y;9 Q" q0 F! u: b2 _
                Obj.ColumnWidth:=3;
6 F- G# _. k( [9 z& `3 m8 |1 a        next;  b: T1 N; N$ e  x4 E7 ~4 S: C
       
, l9 t5 R6 D2 n4 n4 C2 s' r        .Delivery.MUs.Forklift.speed:=2;
  F: S- v$ ?+ w% C: _7 N6 F( E$ ~        WH_var.delete({1,Part_Nums+1}..{*,*});( a$ W! s8 u$ C4 e
        for i:=1 to Part_Nums loop
+ Y" u1 v0 i% \$ H# Q                WH_var[1,i]:=chr(64+i);
( V) T, J+ N  b3 K! W6 {+ d        next;4 f; [$ a$ l. U7 z4 g. R! i" ~3 q
end;
5 L! I. {2 \) n2 z1 o出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
/ L1 ?% E' X% e. Q6 c
4 v! m! r% H( F$ U. v, N! C" K" \; @

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-5-27 22:37 , Processed in 0.019362 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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