设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 3117|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
* Z! w' z  G2 e. C" T* |6 k语句是这样的
& m6 |5 L& b$ n/ [6 yis
/ k6 |9 r% ]4 s: d) y        i:integer;6 O4 b, M* Y, W3 P# C5 R" T# e% A* I
        Res:string;1 X5 {1 x8 X: `2 d# x
        obj:object;. i, V1 w7 _, U) |9 A& Q) o
do
2 }7 q& ~, L, J/ ^! a! v        if existsObject("Status") then
' w; Y: s" C/ k+ q  n( B4 Z                Status.deleteObject;
( b3 E7 p' S2 ^! }1 p- v        end;, x, z3 E  V: M& X5 C
        for i:=1 to 10 loop# D( |) g0 ?, h) i  u$ u7 C8 g
                Res:=sprint("Store_",i);
1 n. v7 o' p* I4 p7 D                if existsObject(Res) then
2 p( j1 c2 Y" Z1 A/ [7 j                        Obj:=str_to_obj(Res);$ Y% R9 W/ M: v& @" ~( b
                        Obj.deleteObject;4 n( I4 P; T" s6 X) B+ m
                end;9 J' O& L* j: S4 K* Q2 w
        next;
0 v5 D% V4 K) d, Y7 e3 K        --shengcheng Status:zimoxingceng6 I, h7 E7 e  j2 n: }0 u/ z' R# ^3 |
        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");* m( V. i0 |3 f8 S; V
        Obj.Label:="warehouse status";+ A0 X" D- ]8 D/ d
       
' r5 b7 L5 `3 F        for i:=1 to WH_nums loop
' f* b! J* ^7 Y& ?1 S                Res:=sprint("Store_",i);
4 y& F8 Z" J) P$ V4 b                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
* W. D: t: `. j5 {" R8 t                Obj.Label:=sprint("huojiaceng:",i);" ]/ R% y# E8 S5 e  D
                Obj.xDim:=WH_x;
: ^* k( [6 b% a3 i, t                Obj.yDim:=WH_y;" U2 }" b' q. B0 m4 Z  \9 B3 l
                Res:=sprint("StoreData_",i);
* E8 c. O5 S# x6 l, A               
5 C2 f/ D& b& r0 n$ [6 o/ b" @                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
- E8 T3 _; q# s; v' g                Obj.Label:=sprint("huojiaceng:",i);: ^. Y# l) g1 z( S. x
                Obj.inheritFormat:=false;5 u7 r% N* J. f  A: _; r/ ~
                Obj.maxxDim:=WH_x;7 M2 F  b$ e" V9 Y5 I
                Obj.maxyDim:=WH_y;8 \' A( p" u. p6 k) s# j
                Obj.ColumnWidth:=3;* g) C2 o. B+ _8 N! q* C
        next;1 B! a# g" m; r$ M( ?, m. Z
        3 |! t" V) ~3 V6 x
        .Delivery.MUs.Forklift.speed:=2;
8 z4 c$ b: F) v0 [7 e/ n3 T0 f        WH_var.delete({1,Part_Nums+1}..{*,*});
  M3 B& H7 C% E) w        for i:=1 to Part_Nums loop
1 q/ ]# t7 W. |+ F+ A                WH_var[1,i]:=chr(64+i);
% k: e1 _( ?. |" r1 Z! r        next;& v2 Z' ^- l6 Q
end;
, U$ f) `0 _  l8 v6 r$ p! `出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
9 R. O" g! q  }( Z: `) L% ~  H9 G

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2025-12-19 06:31 , Processed in 0.734688 second(s), 18 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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