设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 2995|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。$ p7 U- a1 y5 H( O! m' J5 k
语句是这样的
: k- _) e  j. p5 R/ pis
# R1 M5 w/ N6 K5 o        i:integer;0 \0 Y: q, H& F3 x! T
        Res:string;
) n+ _7 S' j- D9 n5 ~2 J        obj:object;9 q! g) [8 f0 C
do% }2 N9 R. d" U- K9 @) y  t
        if existsObject("Status") then
% K8 d# F8 f- R) A1 G7 \                Status.deleteObject;  \+ O: l9 |; u2 t0 j0 A( [
        end;2 N/ u" ]' p2 I% a; Y" A2 E7 \
        for i:=1 to 10 loop
) `; h" @9 u0 R. [5 e! ^2 r                Res:=sprint("Store_",i);
. z; z6 G4 p2 D; }2 I                if existsObject(Res) then
5 B4 \, f- M3 P8 d, B( O9 s                        Obj:=str_to_obj(Res);
# {6 _. [! r, k" L+ s3 _9 g7 {& O                        Obj.deleteObject;
6 E! G! E& {1 ?" i                end;  o3 g9 K- v9 R0 y
        next;
( A& W7 p* q( f/ D# C        --shengcheng Status:zimoxingceng" ]% h6 w$ t8 e9 p, H$ ^
        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");* A* A  f: S2 }6 P- P. [4 U
        Obj.Label:="warehouse status";, u6 m4 Y8 W! P1 \8 T2 v# U
       
4 n1 D) e& [2 r6 ^% g        for i:=1 to WH_nums loop
) x) b" n5 g% J/ z" n, R2 y  G                Res:=sprint("Store_",i);7 U* s. T7 P' O8 C; _
                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
1 ]+ |% O* W% q! b                Obj.Label:=sprint("huojiaceng:",i);4 r7 e% D7 X& m" `
                Obj.xDim:=WH_x;
2 z6 S: n1 f. ^! r; Y* x                Obj.yDim:=WH_y;) E% L8 P, q4 i0 d
                Res:=sprint("StoreData_",i);
5 s3 V1 p! z8 o6 @                3 u% v# V5 ]& G' t! U. ]7 K
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);! z9 P+ U# t7 g8 u
                Obj.Label:=sprint("huojiaceng:",i);
8 w( A0 Q) O9 ], M                Obj.inheritFormat:=false;
* r3 C# o* D# Z# q% O                Obj.maxxDim:=WH_x;  h" `" v1 e; Q
                Obj.maxyDim:=WH_y;; A# g8 s( d* B; j* u  }
                Obj.ColumnWidth:=3;, u. G* G: \& y4 M6 e
        next;. ?8 Y+ N+ m3 |+ H
        1 m) t" m+ N: C3 {" O
        .Delivery.MUs.Forklift.speed:=2;9 w7 G1 U  O9 j  D
        WH_var.delete({1,Part_Nums+1}..{*,*});
( N( \1 T/ {0 t: }8 t4 k        for i:=1 to Part_Nums loop
& D9 V# d/ q8 T# K9 {7 @+ c) f                WH_var[1,i]:=chr(64+i);; f2 ?: L/ }6 R7 T. \) X
        next;
) V) {% e* M% |0 j% y! m2 b5 `+ T, vend;  R8 V8 ?/ H; t- {  U% t, }4 n
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了( d; }- C4 |* E, @
5 Y8 ~& W& X! Z

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2025-11-27 12:57 , Processed in 0.016873 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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