设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 3626|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。" M" b5 k3 M, L5 c* W2 L: D
语句是这样的1 }: y7 H- j9 }5 _
is) ?+ l% `' r  Y2 a. g8 m
        i:integer;
8 O# K! V5 B+ y/ p" i& }+ N        Res:string;4 r! Y. U, z' \: N0 F' T2 B. O
        obj:object;
2 Q, {/ r7 ^2 }do
5 {6 K( L3 N; [. s- g        if existsObject("Status") then5 @/ R! G% W0 o3 t4 h: r
                Status.deleteObject;
3 i/ f9 c$ v  m- G5 u/ ?0 _        end;
3 w+ p) M1 W: `2 g: x% Q# @        for i:=1 to 10 loop
* x4 V7 d: I- {) D# y% ^                Res:=sprint("Store_",i);- L8 c1 z* Q6 V$ t! O6 B6 c
                if existsObject(Res) then
  _7 }: x4 g9 n0 ?: G: W                        Obj:=str_to_obj(Res);
  J8 q! M' C# c9 F( q2 J                        Obj.deleteObject;
7 R( l0 \5 V- G  G* f9 D% i                end;/ D6 e% W7 u. I% b: d
        next;3 q, N6 e7 T7 m( L# o1 }/ S
        --shengcheng Status:zimoxingceng
4 x* f* |( |0 d3 w5 J3 L        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");7 e7 L( F+ [' J% Z4 j5 Q4 ^5 d
        Obj.Label:="warehouse status";
: w. n/ \& [' m" k" h' K        2 ~8 R7 i+ h+ b* e. W6 I* B3 Z7 F; L
        for i:=1 to WH_nums loop- m, @; c+ w  f$ p+ b
                Res:=sprint("Store_",i);
& G7 Y4 {; s3 \* x/ X% [% B% x. _                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);9 h1 w7 A9 }$ f6 }8 T) R6 ^
                Obj.Label:=sprint("huojiaceng:",i);
' L5 H( y% {6 e% K/ g5 V+ ~3 Y                Obj.xDim:=WH_x;, Y$ N9 i! c4 d& p4 k, i2 [
                Obj.yDim:=WH_y;8 i1 \3 Q1 Y+ r% ^3 b7 L5 _/ e
                Res:=sprint("StoreData_",i);. D% E% P# Q/ b
               
7 u" R' \  @% P6 j0 ]0 R% B0 _' k                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
* v: H- _+ k& v, W  s6 [: [6 a                Obj.Label:=sprint("huojiaceng:",i);4 C$ ~1 ]3 K4 f: M
                Obj.inheritFormat:=false;) L+ ^5 [0 S) Y& |$ d
                Obj.maxxDim:=WH_x;' b$ B2 w. f7 z" Q
                Obj.maxyDim:=WH_y;
+ q8 Z& w2 }9 ]2 G* G  N1 G                Obj.ColumnWidth:=3;' |! G- B/ _8 @
        next;5 u. z/ d8 c4 ~. W, Y
        $ Z8 s3 c+ i8 ?0 W6 Y5 Q# F, L
        .Delivery.MUs.Forklift.speed:=2;
8 ~' k$ h: v& J' O        WH_var.delete({1,Part_Nums+1}..{*,*});6 i8 y: a) F. i- ]# ^" ]' m+ D0 u
        for i:=1 to Part_Nums loop
$ i" x( T% u+ |" L. m/ @; a                WH_var[1,i]:=chr(64+i);- q- i! V- M* Z/ K* g+ \3 H6 U
        next;
, y9 P9 u: o1 H3 R9 z8 z% \end;
, z2 B2 j2 h) W6 a9 k# v出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了3 J$ m) A$ j0 {" ]; D) ]4 x
" o0 B. E# Q5 v) f8 b- }

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-4-3 21:45 , Processed in 0.023405 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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