设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 2968|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。# C4 C* \5 _! ~2 F% F3 }0 u% P
语句是这样的- ~+ O0 h# I$ @" i2 t, X
is
$ b# }8 B. ?/ ~- {6 h# R1 L; B! d        i:integer;0 B- H; \4 `' J; {  g- `
        Res:string;8 N; I7 j) p6 Q
        obj:object;6 p" O- ^( n# V: V3 Z2 I: t1 b
do. K, U6 H$ s- E- t/ l5 Q9 o' J# B
        if existsObject("Status") then
3 t3 \7 ?& L6 j+ e. W1 V                Status.deleteObject;
5 J, b. O4 _% u) C        end;1 g" y, f; X* e8 {
        for i:=1 to 10 loop3 o. c! V  q2 ^, }" I
                Res:=sprint("Store_",i);
  l- y% q0 X% A0 @: k4 s- K& w# K                if existsObject(Res) then4 j1 J$ q! C0 `8 Z  ~( G% R9 [2 @' k
                        Obj:=str_to_obj(Res);
- n9 d7 }( f& m4 I7 @8 r0 k                        Obj.deleteObject;+ f' ]) Q1 {* \: s  y% w% F  ?
                end;
6 B% R; Z# y8 f+ {4 X        next;' x! l4 b  e  f8 Q  x3 j( [, J4 m5 j
        --shengcheng Status:zimoxingceng
7 r' E5 N3 c. J+ D, T% x        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
) }- y9 N( ]8 X8 b7 Q& ^        Obj.Label:="warehouse status";! Z% r* b1 ~9 Z% \! n: \( e- b
        ! }: l( @2 l" j4 Q8 ~
        for i:=1 to WH_nums loop* a" Q5 S4 a, m; C0 G4 v5 N( }
                Res:=sprint("Store_",i);
0 u2 E- t: S0 e) r4 J                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
. [3 i$ D- |1 I* t4 m0 ], f/ ^3 ^2 w  f( S                Obj.Label:=sprint("huojiaceng:",i);
! [% l. F0 M3 ?( S                Obj.xDim:=WH_x;1 e/ a5 y4 s6 U6 G
                Obj.yDim:=WH_y;
  h1 S+ M+ V8 M  ]                Res:=sprint("StoreData_",i);
3 E7 O1 _( l7 ?# F               
2 D/ S  ]% x$ @6 y1 y7 j* e                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);) ?9 F" k/ q5 D+ Y
                Obj.Label:=sprint("huojiaceng:",i);9 N% V3 f0 f' R7 N6 e
                Obj.inheritFormat:=false;+ v% _- X7 V; g$ a. S( r* P
                Obj.maxxDim:=WH_x;
8 \$ ]0 B& s$ K; k! d' B" r                Obj.maxyDim:=WH_y;8 R6 M/ d3 n+ a8 E) d
                Obj.ColumnWidth:=3;
7 U5 d4 V5 L: d* ^        next;
! X; b- h7 S9 U, e% Y9 V        1 K' Q# k3 r/ X
        .Delivery.MUs.Forklift.speed:=2;
7 D5 _3 U+ N. B: Q9 Z) `+ W) m: G        WH_var.delete({1,Part_Nums+1}..{*,*});" z! f5 S* }# Y' R  h
        for i:=1 to Part_Nums loop
! y' k$ b5 P; F( @                WH_var[1,i]:=chr(64+i);
" k2 [8 b* I, {: X        next;
2 G7 C5 m: x  f+ T! z! ~$ Nend;
6 [, |+ u7 h) p+ n6 M出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了) F0 ~7 s5 a0 D# ?1 c. o
. ?% e% R" E5 m; g" v

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2025-11-22 08:11 , Processed in 0.021247 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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