设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 4385|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。1 H7 N/ G! I  p9 h% W7 k% n
语句是这样的! U& `6 D8 K, j) R- j
is) b" k3 c: N4 ^1 B$ ?
        i:integer;/ u, c% n' x. Y2 w7 {: n; F
        Res:string;) }5 [/ [( @7 X9 C
        obj:object;
. L4 `, {  F5 j  J/ {do5 Z$ r/ K# k. A* d% O
        if existsObject("Status") then( |9 }! c- S( W( J' i- J
                Status.deleteObject;
, K/ S4 h: [( m( U0 v, n2 s        end;2 Z' X/ @9 W  {8 J, a% M
        for i:=1 to 10 loop+ j7 q5 i! k' u  H0 [# f$ S3 ]
                Res:=sprint("Store_",i);
  _" J- A9 y( `: c& j3 q                if existsObject(Res) then2 P# t* V! F/ H# m0 ?+ M7 B; G! w; Y
                        Obj:=str_to_obj(Res);9 f+ `: \' H) \! w# i6 w6 z
                        Obj.deleteObject;
( u2 i$ E& }5 u% ]3 h( {" l                end;9 ~1 R: J6 b3 `2 W
        next;
4 u# S% N8 k% G4 t: h0 Z% q6 X        --shengcheng Status:zimoxingceng
  G: m( Z; D( g) F/ c# K' F        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");2 S1 n# w* @/ k
        Obj.Label:="warehouse status";
& A# P9 e7 e4 `4 E        ! d, A7 W" \/ B& i% K
        for i:=1 to WH_nums loop4 [% }2 _' e6 m- H& d" w
                Res:=sprint("Store_",i);
, ]7 a' T. i( K8 h8 O8 }- @                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);1 v0 ^  m8 b- e0 n4 y2 l+ V4 I6 F
                Obj.Label:=sprint("huojiaceng:",i);
* }! w/ r: ~2 x/ e# p  n                Obj.xDim:=WH_x;
4 U8 Z( b0 b6 y  z( `                Obj.yDim:=WH_y;6 K: o2 l+ C6 J4 Y) n% Z
                Res:=sprint("StoreData_",i);
* x2 x- p$ ~8 K$ M* m. [                8 G  a1 y! l9 ]( I3 ~+ K
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
, @. H, B- F: t! U                Obj.Label:=sprint("huojiaceng:",i);- E7 h" ^7 x# X( l. x' v5 I
                Obj.inheritFormat:=false;; l. s0 V; N& O. }3 F  Q0 f/ h
                Obj.maxxDim:=WH_x;
+ X1 V& I' I! F' w& b% }                Obj.maxyDim:=WH_y;
# S6 T8 I) k9 M% u  c$ U                Obj.ColumnWidth:=3;* f7 O9 Z& Q; h0 g
        next;/ P: S& g9 p" @3 Y8 j1 U
       
/ Y2 B! H. A- j( z+ U) }7 @0 u3 c        .Delivery.MUs.Forklift.speed:=2;- Y3 P8 A9 F) ~8 @) W
        WH_var.delete({1,Part_Nums+1}..{*,*});$ h0 F* d8 i2 P* e$ O/ n* R; s
        for i:=1 to Part_Nums loop
! d4 M6 v" D. p2 v8 L# |                WH_var[1,i]:=chr(64+i);: x& ^/ z4 P. O- Q* j* M/ Z& v, g
        next;
" C* g( J' {8 {8 [; \end;
3 O4 ]' M) s* V% {出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
# G' v  Z7 T" c* W7 o1 ^4 t" J) l9 S& e! h3 [! w' ~' p

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-8-3 14:41 , Processed in 0.016462 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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