设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 4347|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
6 p6 P; _' M2 f  c1 L语句是这样的+ @: b7 [/ C9 C! Q
is
! `# a0 Q/ x5 w+ W        i:integer;
3 m1 g" a: h+ m. u6 k9 ~) c% X4 ^        Res:string;
6 X- Z3 z  D# ?1 n        obj:object;7 N) M- j7 n2 F; B
do" w' \( N& q0 P* |4 V- E
        if existsObject("Status") then
9 [6 u8 V/ i+ B! ]' m                Status.deleteObject;. z- u! ~, {% n+ L1 N' M& k: P
        end;
& y9 a% a+ J# u5 _: Z        for i:=1 to 10 loop6 `+ a/ [) d4 z
                Res:=sprint("Store_",i);
1 \6 C# t2 I: R8 T                if existsObject(Res) then
% K4 ^2 _8 {  e                        Obj:=str_to_obj(Res);
' j+ U+ m) z- v% I- J4 K                        Obj.deleteObject;) c* J7 g7 j* C! ^
                end;
% b7 O6 a0 P0 A& Q" J  w( B        next;% Z# E) b6 ?: g! b9 Z
        --shengcheng Status:zimoxingceng( N9 Z9 j3 j2 x3 `) A' i# x
        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");; I' w  {9 q4 B5 B( z+ U5 n
        Obj.Label:="warehouse status";/ ^% M: p/ \$ o8 n
       
9 z6 w! ]/ p/ m* [+ {: s        for i:=1 to WH_nums loop
* R! q! i' q" @6 p2 G; w* H3 m. P                Res:=sprint("Store_",i);
5 C9 c7 Q: x( |: }6 u! w3 R* C0 `0 u2 ]                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
) u1 j$ [  s' y! D! Z2 K; b2 R                Obj.Label:=sprint("huojiaceng:",i);/ {8 Y7 ?0 h3 N7 v8 E2 n- x3 o
                Obj.xDim:=WH_x;
6 a& ]2 x. ?+ f- {                Obj.yDim:=WH_y;. Y; M1 M. I; l6 ]2 @
                Res:=sprint("StoreData_",i);4 }5 @. e7 z  g' d& g' V% n
                9 i. U7 i7 F3 `& g4 H# q
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);$ R: x3 i8 c: E2 j; _9 |+ G& y
                Obj.Label:=sprint("huojiaceng:",i);0 {1 F. w7 `7 h
                Obj.inheritFormat:=false;
2 p5 V# @1 S: p) c/ e                Obj.maxxDim:=WH_x;
. E- w0 _1 w* H                Obj.maxyDim:=WH_y;; U. j8 K9 C1 n& E
                Obj.ColumnWidth:=3;
1 D* I" a9 Q' R2 N. @5 g2 a( U        next;
+ q5 H. b$ S# D  [  r! E9 O       
+ \; `8 i2 Y5 p2 o9 B3 }        .Delivery.MUs.Forklift.speed:=2;$ a. u' T2 t8 o* z
        WH_var.delete({1,Part_Nums+1}..{*,*});
' G8 r4 h: b5 E8 g; z: r5 E        for i:=1 to Part_Nums loop, r2 Z7 g, u( v$ q1 L
                WH_var[1,i]:=chr(64+i);  l) q) i  ?) g& m1 _3 h; T& S3 N
        next;
: V  \2 a/ @. w0 U$ Nend;
7 s* G" k' b/ v! B* a1 J0 b& k出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了( M! D5 K+ I5 b5 `) ?2 z

4 m0 t" k9 o# s8 I* e

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-7-29 04:30 , Processed in 0.023760 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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