设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 4164|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
1 |& p+ ^2 f5 g/ [* Q& o语句是这样的* M0 o0 N* }& a: V- o
is
* B* I$ I0 P: T        i:integer;# I) T- {( w, f! I# g8 i+ ?
        Res:string;. R7 a/ O  Q/ R9 `
        obj:object;
! H$ d" h: J! j) R8 gdo
! ]& s5 k; D$ r: S: t6 m        if existsObject("Status") then
% W3 Q% |8 `% r0 p                Status.deleteObject;  }% y1 U) s$ [& ?
        end;
$ t  H! d. M5 {7 J        for i:=1 to 10 loop
9 k6 N6 _% P6 Q3 t) |' E                Res:=sprint("Store_",i);0 @# ]3 I* z% L8 X! h, ]" Q  z
                if existsObject(Res) then
, ~, w5 z; ~. K, O: p                        Obj:=str_to_obj(Res);
/ A7 P1 E# B! O' }                        Obj.deleteObject;
1 X& d3 I; a! [4 }7 ^. R                end;
2 e. P1 c& V, ~% y* d( F9 O        next;+ X! S* @, d. H: F1 G$ e8 P
        --shengcheng Status:zimoxingceng: P; x" V# {8 S$ j0 I% ]1 x3 }
        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
+ G# T) D  `+ X$ E        Obj.Label:="warehouse status";) m- ^& B3 A6 u! T& G1 f
       
$ A" y0 q9 f  x# d* X8 @: D        for i:=1 to WH_nums loop4 p! o0 W( G6 {
                Res:=sprint("Store_",i);0 i" ?$ H# I7 B
                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
0 Y& ~* G) ]7 U0 l0 U                Obj.Label:=sprint("huojiaceng:",i);
" Z/ V: P: i% f# }                Obj.xDim:=WH_x;7 m) X6 b) V, J. D/ V3 c7 A
                Obj.yDim:=WH_y;
/ _/ E& c$ `# `                Res:=sprint("StoreData_",i);
0 t' i, O: |9 I5 i6 M                ) j6 X/ k% r" i* T7 n! @0 N' _
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);6 u: e7 E! d4 p: m7 _0 \; @
                Obj.Label:=sprint("huojiaceng:",i);
! I9 T) _* r/ A; m9 m                Obj.inheritFormat:=false;
; j1 T& T. {3 A                Obj.maxxDim:=WH_x;
( B2 N/ R+ J# [; K% q                Obj.maxyDim:=WH_y;
: k7 f3 l2 ~4 O5 w7 e6 b& f2 q* w! L                Obj.ColumnWidth:=3;
4 k/ ?3 y5 u1 k! Y* Z5 p. P        next;8 I6 P9 v0 d! ~, i& m$ y
        : K3 |. c! i/ T
        .Delivery.MUs.Forklift.speed:=2;
* ]- B$ P0 N  h1 o% C% l5 k' \! t6 H        WH_var.delete({1,Part_Nums+1}..{*,*});3 ^  y3 f7 G$ U. |
        for i:=1 to Part_Nums loop
$ {% H* i" v6 g5 C! q" V4 q$ W" a; B                WH_var[1,i]:=chr(64+i);
) D4 \# ?4 \3 Y3 C        next;
! s6 q' K1 I7 d" O. uend;# B! n, K% m% ~9 P) p
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了$ [* D) }- T" i( Z# F
. e) y$ g2 m( l+ i! h. _% [6 P

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-7-2 05:27 , Processed in 0.016939 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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