设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 3789|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
1 }0 M; w( a, T* `; b语句是这样的
9 g( ]3 Y8 G8 ]( F( `is) }6 }3 V, F: H& X6 i* X
        i:integer;
* X: J: ]7 \, r8 D, m        Res:string;  n' R9 Z! [5 e
        obj:object;5 S! S# U5 Y, _% O7 [( C+ d
do0 n2 X% v* @# y. Q5 ?6 g. B
        if existsObject("Status") then- ~& D( h% e" h, c( O
                Status.deleteObject;$ q" s( C- P& a  e% x: x& Y
        end;
. }" ~& U- y% J; ]8 W' E        for i:=1 to 10 loop
8 J8 h, j% H  z/ P$ P& K                Res:=sprint("Store_",i);
& C! }4 F, T2 A) \                if existsObject(Res) then" E! ?5 ?1 Y# y% G% X" T
                        Obj:=str_to_obj(Res);
1 }. p) S3 M2 P" j                        Obj.deleteObject;0 S+ z8 o% I/ r( I* ?
                end;
1 j+ ?% k+ Z4 J7 Y' m. c. G8 {        next;' o/ Y. J& B% e" t0 n2 @  i# ~) q
        --shengcheng Status:zimoxingceng
9 I4 z2 j3 |# U) y7 u5 ?! [2 H        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");' I; x; ]! r9 }* f' K* u. v3 w
        Obj.Label:="warehouse status";
+ ?% T# P: C. q8 d! M% }       
% K& c- y7 z3 W7 {0 |! P        for i:=1 to WH_nums loop% E1 R3 |% Y/ e* Z' Z) {/ r" Z
                Res:=sprint("Store_",i);
% w  }4 e2 s$ w  ?                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
7 H" F& Z3 w$ L: @                Obj.Label:=sprint("huojiaceng:",i);/ b0 Q  _: s9 k  Q# c; I! x5 h/ E
                Obj.xDim:=WH_x;
& c; {% V0 t$ r2 j                Obj.yDim:=WH_y;, Z6 Q4 a& K* T5 x/ U. b( q3 R
                Res:=sprint("StoreData_",i);' K! M! ^9 [5 E$ ?
                * x* }& L, {5 t4 ]) G: X- ]* b* }- A
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
. F; [+ J$ r; C# B                Obj.Label:=sprint("huojiaceng:",i);
& J9 d4 |% m2 E2 {6 Y                Obj.inheritFormat:=false;
: N6 O/ ~. d6 D8 q/ n                Obj.maxxDim:=WH_x;& q7 W0 D: ?3 }; n0 C0 {7 Q
                Obj.maxyDim:=WH_y;+ B7 j2 S3 H* p1 l9 h7 S' e
                Obj.ColumnWidth:=3;, h& u5 B2 b5 W! C2 ~* {
        next;7 {- C' s9 O& D& w5 @
       
2 j: A$ p3 z2 I. K9 v        .Delivery.MUs.Forklift.speed:=2;) h& i4 d3 C$ T0 ?6 B! S! B
        WH_var.delete({1,Part_Nums+1}..{*,*});
& p+ }# O& Z" |/ B7 r& i        for i:=1 to Part_Nums loop( l) v+ `$ i6 g9 U, J# j
                WH_var[1,i]:=chr(64+i);/ f- j5 O2 T2 ^8 B$ w% s, e3 ]0 q
        next;5 H: I: e' S. S. J
end;, ^% h( K: H$ }; I( ~: w
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了- ?) v$ \) V8 ^

/ s3 o6 ~8 N3 {7 Z0 g0 h$ v

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-4-26 21:42 , Processed in 0.021891 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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