设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 3662|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。7 V9 I' ~# X4 m9 H  W# k
语句是这样的6 ?% r$ t, I  d
is
1 U5 Y! a! m' a4 h7 i4 o/ [& Q        i:integer;
: r7 I3 W4 Z4 I6 k4 O2 _4 P/ W" Z4 d        Res:string;
' \: Z! h9 |( n; N$ d* [5 z0 G* X! Q        obj:object;& W, M& |+ ?+ j" f( U+ ]( ?
do4 h  B) \5 m- s( F0 l
        if existsObject("Status") then
0 H/ J& K* B1 Y7 ~                Status.deleteObject;+ [5 o7 k9 B$ J& p" r% j
        end;
$ y: z6 _3 g2 o7 b  C        for i:=1 to 10 loop9 i# ]3 a) E* a7 l) x
                Res:=sprint("Store_",i);4 x3 r, _3 o. ~6 ^
                if existsObject(Res) then
. p, I: S9 g( o+ n/ D8 K                        Obj:=str_to_obj(Res);+ [6 J8 T) `5 a3 O" u  u# K
                        Obj.deleteObject;
# \' q' i8 W$ D' u4 f                end;
* n  d9 s5 J/ x% L! @0 }, }        next;
  F( C& B; _& m. o1 v; d( n        --shengcheng Status:zimoxingceng
: i& _1 P0 A7 y1 I, v        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");8 X  j& K' I- _& u* p
        Obj.Label:="warehouse status";
" x' d7 O( m6 y5 c: d       
: o6 M  B0 I* K5 P- S: W5 S- E, S        for i:=1 to WH_nums loop! q% f7 ]6 r2 Z
                Res:=sprint("Store_",i);( \, z# X4 T$ I5 Y+ m
                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);$ p- o! ]5 |, A6 h6 Z& r! ^
                Obj.Label:=sprint("huojiaceng:",i);
$ @8 j4 u/ A6 H* m' }# L                Obj.xDim:=WH_x;
8 ^. I( j/ F" L' ?                Obj.yDim:=WH_y;
0 `0 P& m0 H( N                Res:=sprint("StoreData_",i);
% q+ B1 C, u2 T$ m7 M                9 X! w5 g' n9 D. O4 M
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
; V2 c# p0 U6 }' u  w                Obj.Label:=sprint("huojiaceng:",i);2 o7 W* p: C5 ]
                Obj.inheritFormat:=false;! l# U9 {& [6 E# V2 ], h+ b2 K; }8 f
                Obj.maxxDim:=WH_x;5 d7 H$ G0 d% z8 F9 j6 Q0 K1 ^
                Obj.maxyDim:=WH_y;
# t0 v" O) q  E, F                Obj.ColumnWidth:=3;
9 K$ g! A  [% g0 e        next;
$ B( X4 l* P! C, l$ T5 s2 v        ) o+ j$ C$ e2 N7 `# Q0 Y7 |
        .Delivery.MUs.Forklift.speed:=2;( x& ?! T, A3 c6 k+ Q) ~
        WH_var.delete({1,Part_Nums+1}..{*,*});
% \! A% a# I" E. a        for i:=1 to Part_Nums loop
, Z. K7 t# i+ n: f& I. H                WH_var[1,i]:=chr(64+i);7 {! _* Z5 m3 z: O# B1 s3 Z& n1 ]( @
        next;. }: ]% R7 d: E7 V( J
end;
6 j) M! ~9 q- }. T出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
+ H9 K7 {0 {( F) u0 m: k( d7 t
7 z2 r1 y5 G# ^

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-4-10 20:56 , Processed in 0.017605 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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