设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 3589|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。3 o& l" @* o! `6 X- a1 R
语句是这样的
0 @$ x1 X; E- n# Y' nis  }  g$ U: h8 z3 M2 h
        i:integer;4 V1 f  F! A/ S1 g
        Res:string;; o* M9 {# a5 G, q) ]1 _& j
        obj:object;  Z- l1 V! J: V
do
3 H5 f/ E4 [9 q, `        if existsObject("Status") then
* U0 p! G* N2 k/ M                Status.deleteObject;
# x6 Y1 ?' I& K. w- S$ K6 _  ~# ?        end;5 g3 F3 h: d2 D
        for i:=1 to 10 loop2 K$ l! q7 \  W; f: ]+ u
                Res:=sprint("Store_",i);
6 \5 U* ^. d# Z5 w! X                if existsObject(Res) then# V" g& M, F8 k+ r8 p3 A
                        Obj:=str_to_obj(Res);
: M, _5 Y% s. x% e2 H" Q, |& t                        Obj.deleteObject;& _- D) Z* u3 [7 @. d4 h
                end;' U7 U) |' h4 k6 t; \# {
        next;) Y. T1 [. f; x% W, X- b) u
        --shengcheng Status:zimoxingceng
  c% X, u( A( X+ A        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");* w0 G: }2 o, o6 W5 ^
        Obj.Label:="warehouse status";8 \7 J" D& Z) m3 _, o% E
        1 }8 R: s$ o! ?. ?* R3 G9 V7 a
        for i:=1 to WH_nums loop
- M" d. v1 U( n                Res:=sprint("Store_",i);
+ n  i& z: n! x/ P) z" h                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);5 o- P3 ?7 s3 b3 U( W; Q# J
                Obj.Label:=sprint("huojiaceng:",i);1 O, l6 h# G( H9 i. V3 Z/ J% d
                Obj.xDim:=WH_x;
4 N* E3 l, o! m( O6 E4 N. `, M                Obj.yDim:=WH_y;
1 W3 q8 m- ?$ s3 w6 B2 G                Res:=sprint("StoreData_",i);$ h# m+ ?6 D4 {5 e  m: N; f
                % B. K% ]. Z8 b: k! z
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
. o: B9 e7 t2 j% {8 v, }                Obj.Label:=sprint("huojiaceng:",i);
  t. n6 v, [) ]1 F9 O+ J                Obj.inheritFormat:=false;5 w  k) o( D6 \+ m0 a, u
                Obj.maxxDim:=WH_x;8 v: [! \$ T. v* X
                Obj.maxyDim:=WH_y;$ I+ F) x6 R5 J: x7 r
                Obj.ColumnWidth:=3;
1 G, P$ y6 \+ d- N. b" j3 _        next;& K% y' Y: b% o8 w* ~! q
        ( t3 j: e8 q, O- W6 u; E
        .Delivery.MUs.Forklift.speed:=2;
* w4 s7 I0 w6 J        WH_var.delete({1,Part_Nums+1}..{*,*});/ K5 z" W2 X9 S" E' s
        for i:=1 to Part_Nums loop
" u6 E8 g  x# W4 J- w; }                WH_var[1,i]:=chr(64+i);5 L2 ^& ^+ q) [0 k" R
        next;+ n. u' C& G& i6 N6 E& n  h6 z
end;- Z5 P& [/ }- b  _3 F
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
7 E- t8 C  A, [3 c. [* L& S0 R0 U7 {, c/ h2 d; q5 r6 W

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-3-26 15:32 , Processed in 0.017120 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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