设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 4526|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
7 c0 d" S' ~, `% C7 s1 m$ n语句是这样的
( E! E. N# C# u! i/ tis* ^$ u4 Q$ L( i; A
        i:integer;6 o$ N; W8 X. W4 T6 J+ @7 ^! P
        Res:string;' t7 E' j2 [9 j3 P, j7 H
        obj:object;
5 S: M: i: k* r; ?$ `do! |4 U7 g. b2 M* S
        if existsObject("Status") then. h& {% j' p. D/ z" U1 y
                Status.deleteObject;
' d4 R5 Q: l8 C" d  E& V        end;! {+ [8 L0 P0 t8 h) w1 I! A) ~
        for i:=1 to 10 loop
2 J( h1 }- R3 Z                Res:=sprint("Store_",i);
- {& ], Z$ F) I  r* R' X                if existsObject(Res) then
  D$ |2 R7 n* ^* B                        Obj:=str_to_obj(Res);2 W' F/ x% @8 ^, b$ v) a- W
                        Obj.deleteObject;/ W5 l& P! _# T, D3 A% W  |9 j+ l
                end;% L1 @& G+ @; U3 A3 W% v! `5 |. Y. d
        next;5 g: b" E% {+ P) i, v8 q
        --shengcheng Status:zimoxingceng
, v$ m1 [+ K& I- I! q        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
1 u" @0 f- B/ O        Obj.Label:="warehouse status";
+ b: ^5 I3 v  `; {" A. o          Q' b  O% H2 X' ~/ X# v, a4 C0 ^
        for i:=1 to WH_nums loop
5 V# l4 H& ^- Z* j/ K! j" A/ e# ]                Res:=sprint("Store_",i);
& m3 A, Z& X9 G2 a+ J                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
0 ?; n9 |9 K/ g$ z2 W                Obj.Label:=sprint("huojiaceng:",i);
* \3 {9 M; {, S/ m                Obj.xDim:=WH_x;- [+ {# d* B! o6 t1 o
                Obj.yDim:=WH_y;
, k0 t$ B% }: Z' C& z                Res:=sprint("StoreData_",i);
/ B" ]7 e4 j) x4 ^                - K" N) Q/ Q; y  H- F& h5 ^# M
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);! n& B9 Q' L' L, M( Z  u
                Obj.Label:=sprint("huojiaceng:",i);
6 J: y* [9 J. q6 x; T  V; L0 v                Obj.inheritFormat:=false;
0 [+ Y2 [" O/ n- _                Obj.maxxDim:=WH_x;4 @- O7 Z, l- T* x2 C8 q
                Obj.maxyDim:=WH_y;/ I( ]$ t% o) u2 R' X
                Obj.ColumnWidth:=3;$ {5 f# m5 F3 v0 _1 ~2 [
        next;
" l2 _& R' o. h! G" N+ R+ G       
0 m' w- `* V% u* a. z5 x8 q3 i# Z        .Delivery.MUs.Forklift.speed:=2;
2 _% _1 e" I5 F( P* v* E* I  G3 Q" y! I        WH_var.delete({1,Part_Nums+1}..{*,*});
* N9 n7 r' C9 U% w) ]$ d* ]        for i:=1 to Part_Nums loop
: ^& ?1 A8 @  s$ w, ~& l: m- u' h                WH_var[1,i]:=chr(64+i);+ n- D7 N) k7 K$ M1 m& w
        next;
2 y8 H# f% a/ y: c, N1 I/ m/ Kend;
1 C% \5 ?% [0 ?0 E1 c: m+ m出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
  J' x0 q3 P5 z, \. B$ k5 t2 `9 l" q- G* F- L) N) p3 y

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-8-28 21:01 , Processed in 0.014579 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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