设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 2991|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
2 d6 t, |3 P2 T* b2 a% }9 H' l语句是这样的& ~7 R0 U% U) v  d, R. z
is
; d7 A. r. S$ {, [1 F        i:integer;
2 @6 M) S! Y( E        Res:string;
6 Q+ x" [! Z# y* A0 a( I        obj:object;
( `8 s- S0 [: p* H& A  rdo
$ @3 S3 U! f2 b        if existsObject("Status") then
7 @  w" O+ o9 J+ H/ U5 x3 P                Status.deleteObject;  i" V0 H  I* I2 n0 Z
        end;
% {9 b/ Z2 h7 b0 ~# E' o. R        for i:=1 to 10 loop% q0 ~  {+ y) x% q! g/ C
                Res:=sprint("Store_",i);
/ _+ F  ^! c) _+ V                if existsObject(Res) then
  v5 ?% L" I! N8 q# B& F                        Obj:=str_to_obj(Res);/ I! P8 D! F3 k# c+ W* k9 t
                        Obj.deleteObject;, H4 _1 m3 y% d4 |0 h5 D
                end;) k+ g% V; Z( x& t- l- Y
        next;( L" M6 ~- V9 q; T/ a
        --shengcheng Status:zimoxingceng
: x  K6 W% s& Q# p5 m+ n        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
/ B  E  G) E/ f# \  u        Obj.Label:="warehouse status";
' U2 [2 o# [* F5 H6 U. f        7 Z$ z9 `" c/ ^8 u
        for i:=1 to WH_nums loop8 a. t$ b  V* D7 a, W1 Q
                Res:=sprint("Store_",i);- e9 z$ Y! H  P3 K( J8 j' o
                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
3 r' O( I. I8 A( B  r8 m8 n( u7 Z4 l                Obj.Label:=sprint("huojiaceng:",i);# |% c/ S8 L- _/ l9 `/ @; R
                Obj.xDim:=WH_x;: x) {' J) g  S; \9 n
                Obj.yDim:=WH_y;$ V) e* q* ]) ^: L- w
                Res:=sprint("StoreData_",i);
/ _6 g! p# l" }( r& ~4 P                . v  }& L; o' D" k3 q9 d; k
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);! o1 G6 [5 N( b6 |
                Obj.Label:=sprint("huojiaceng:",i);
* t# s9 [% n9 I, n                Obj.inheritFormat:=false;
9 W2 j- R' ]& _/ c                Obj.maxxDim:=WH_x;. q7 x2 |. \* Y0 ^  s9 U3 P. [7 H
                Obj.maxyDim:=WH_y;
4 E  d% M6 P5 O8 A0 m% c/ I                Obj.ColumnWidth:=3;2 T# |0 ~7 ^9 R% i
        next;
  F' Z6 V7 J6 U$ P' W6 ~# r* u- E       
( p( W# l9 o+ C- R) r1 j        .Delivery.MUs.Forklift.speed:=2;
, s$ ^6 {( ~3 ~  m        WH_var.delete({1,Part_Nums+1}..{*,*});
0 K2 w  _" {% T1 c; b3 N; _0 x        for i:=1 to Part_Nums loop
" w, I2 u' F* X' Y9 \9 L                WH_var[1,i]:=chr(64+i);
9 x% B. q6 n+ K; N, \' C0 k& v' E7 l        next;
. B$ F6 _- U( M- v7 G# x( w; Aend;" }' |% ~5 h7 b9 q. B8 [% J+ e
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
7 u/ }& O9 M4 h( y
6 R4 ^/ N0 P' e. ?9 J1 ?  m: l

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2025-11-26 17:23 , Processed in 0.016133 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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