设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 4110|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
' f% l0 P0 E% x% l9 z/ ?9 \  x- r0 @语句是这样的
4 j! d5 _2 d2 i6 F! sis
& j8 T; U$ L" L" W: l  V7 M% t        i:integer;
% V! A: D1 [' I3 h; q6 O        Res:string;
) N! J1 n; p7 U% C/ y4 S        obj:object;
7 a7 Q, N1 b6 v0 J4 sdo
1 d% h: w2 c# u" n9 y; z. ?' C        if existsObject("Status") then
" y$ I4 F( @4 K2 ^; b6 I1 D                Status.deleteObject;. D) m9 Y4 I; d" V" {. F/ T
        end;
  U) b9 G  p  Z! K/ m. i4 F: m* Q        for i:=1 to 10 loop
* `, d4 B, Q8 ]8 E: M                Res:=sprint("Store_",i);; v) R/ Z% C/ b5 X
                if existsObject(Res) then
2 e( x, Z( H  P8 ?$ @, ^                        Obj:=str_to_obj(Res);# E, D3 @1 N" @. Y6 ?
                        Obj.deleteObject;
- U* y' f' e; o  t$ V                end;8 Y- v3 l( O' m. |2 z  I$ C) Y# z/ A
        next;
9 o1 t. z  B5 W+ m4 B        --shengcheng Status:zimoxingceng
6 @$ d& [, u  O- g# V3 z% V        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");& q2 x% q4 T, `% L" ]
        Obj.Label:="warehouse status";3 ]8 E: R1 i, @/ L1 C" h' {" p
       
  u; g$ e' Y( B  V* b        for i:=1 to WH_nums loop2 t. r7 O' G0 o0 ^5 C
                Res:=sprint("Store_",i);& y4 s) X7 i1 y2 ?1 x! K6 _
                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);. x9 B4 b6 b" d8 G  g' u- m7 i
                Obj.Label:=sprint("huojiaceng:",i);# ~9 Z5 j* X* N9 H3 l! N1 s
                Obj.xDim:=WH_x;4 G& ~9 ?6 Y0 ^
                Obj.yDim:=WH_y;( c1 W1 _" y2 T7 c/ T9 y
                Res:=sprint("StoreData_",i);4 f! O# t, ~9 f3 [, q6 O( \3 s% q
                ; [5 i$ G( d0 ?
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
+ ?* {# i' t  p1 M% O) F! p0 \                Obj.Label:=sprint("huojiaceng:",i);. I$ C" W( _" S5 O" E" x
                Obj.inheritFormat:=false;6 Z' {8 l& J) w
                Obj.maxxDim:=WH_x;, ~: s  X: {  }( E8 I4 n; Y
                Obj.maxyDim:=WH_y;
$ F2 b( P4 G5 r4 G                Obj.ColumnWidth:=3;$ k. U3 r  G* R1 t; e
        next;4 F3 |  b. V3 z
        # B2 z1 [; o6 ~4 U, s1 _
        .Delivery.MUs.Forklift.speed:=2;& I, S2 P& a8 H, R- {" O/ ^
        WH_var.delete({1,Part_Nums+1}..{*,*});
& D% s; s6 F! k        for i:=1 to Part_Nums loop. P$ w4 Z; e! R) Z$ b
                WH_var[1,i]:=chr(64+i);
* E' F% U- z5 k6 J7 j$ x7 _        next;5 k, Z& b. a2 `1 V" \
end;
: l# |. w9 i) r$ g- k7 x出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
5 v% ~7 x8 [$ O1 t9 X9 ]0 _+ w
4 D5 D& v+ V. @( L% ^( W

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-6-22 03:54 , Processed in 0.018330 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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