设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 4207|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。+ B" d2 e, j: R* f
语句是这样的0 [, ]" W9 I! w- \) V: O
is' j8 ]5 I+ V5 X1 c
        i:integer;) v9 L- I9 _/ _7 v. L$ `3 ^
        Res:string;
" U. {. \) n( C5 C* Z! J9 ]        obj:object;
, H4 X- C" B# k/ d% c% |  T# b, Bdo5 I9 e9 d' V% F5 f3 ?" g; ]
        if existsObject("Status") then, M  B  c% d; n' V- ^0 {6 o0 B
                Status.deleteObject;( S3 r+ {) C  u! T
        end;
2 H  g) B. K0 {9 P, b        for i:=1 to 10 loop
2 O- @# z$ c3 `; K                Res:=sprint("Store_",i);
% P( j  C/ O5 }. b; R* ]* L                if existsObject(Res) then
9 S. d( W- }& d2 L                        Obj:=str_to_obj(Res);1 k& G) T' V6 J) v4 ?5 H4 e& x; ?
                        Obj.deleteObject;
! Z6 ^: p# w7 Z+ q* i2 H                end;
. d7 j% e0 ^. C/ B# Q7 x- T+ s; t        next;3 v( Q+ w* ]: h9 ]# y# z% f! w
        --shengcheng Status:zimoxingceng
' ]5 u% F' y2 L        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");: Q2 V1 \7 n) Q6 |4 C8 y* Z
        Obj.Label:="warehouse status";; r5 s4 M  `0 A$ N0 l/ b
       
+ u7 B; I4 m- H. F( z, {  K- _( P        for i:=1 to WH_nums loop
/ r- m5 }5 A- }/ E4 f                Res:=sprint("Store_",i);
  Q9 y' [2 K% w+ g1 w                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
1 ~6 z& W: l8 f8 C2 X" }                Obj.Label:=sprint("huojiaceng:",i);, m+ S; I( N" X' }* Q6 H6 G6 {; D! H4 m
                Obj.xDim:=WH_x;; _0 g  f6 S9 m3 \# ^* _8 P
                Obj.yDim:=WH_y;
$ M6 r# n+ @& b- Y6 ?                Res:=sprint("StoreData_",i);, \; h" \  U0 f/ t1 d' J4 g
               
& F* K: _/ c3 u' K4 f                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);1 y: [' K8 @2 q
                Obj.Label:=sprint("huojiaceng:",i);
: p6 G6 V, m  \# q" Y" E                Obj.inheritFormat:=false;
( W: T8 x# C  T" p1 q- c' H                Obj.maxxDim:=WH_x;8 v) M- h* S  l0 ?; d
                Obj.maxyDim:=WH_y;
* ^9 N, Q, v. `                Obj.ColumnWidth:=3;, I" v1 U  U/ x) {
        next;
! A" |2 o) q' x$ _       
/ F7 i, B" T% D1 d  A        .Delivery.MUs.Forklift.speed:=2;
- F* z5 `' r% _& _4 S/ K        WH_var.delete({1,Part_Nums+1}..{*,*});& D( i2 j% r, B9 {$ D' b
        for i:=1 to Part_Nums loop
( _1 @3 i, ~$ E% W! a                WH_var[1,i]:=chr(64+i);
7 E% o" W( N0 \+ g" s; b. l0 \# `( X        next;2 t4 j+ k. i; u8 J$ v. K0 Z
end;# k9 ~4 e* l& e6 g: o3 X
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了2 W9 m5 N+ ^/ O% I& M
7 K! m" m  F! }4 ~+ j0 `2 H* Y, f

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-7-7 12:38 , Processed in 0.015100 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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