设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 4010|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。, O, F9 K" a$ J9 y! ]+ |
语句是这样的8 s, h1 `* X& N" w# i7 [- j" y
is, K" k0 F: f7 T9 x1 l) U9 m
        i:integer;
7 `$ z* Q3 Q# L1 m+ e+ x        Res:string;9 n  |" M7 A. ]1 n, F5 @
        obj:object;9 `7 G" `. a% g( ]4 l" m2 o/ Z/ z1 ?' h0 f
do
7 e  ~3 X% U- ?0 `" @- H        if existsObject("Status") then
2 m' I& ?; Q0 m8 Z4 [5 I                Status.deleteObject;3 f) k* c3 D  [% @
        end;0 y3 t( ?" h) K8 N+ q0 B+ m* q8 C% J
        for i:=1 to 10 loop# C  R7 s( G! c! x  t
                Res:=sprint("Store_",i);$ u/ v) X% ~" }5 B2 [
                if existsObject(Res) then
; f% }5 U7 J0 g( D0 c/ {                        Obj:=str_to_obj(Res);/ F3 O; w/ r. y# ?9 r/ M3 G
                        Obj.deleteObject;
' X3 E  O9 A2 X& i0 Q, c6 u                end;
* \( K0 Y  d/ j        next;8 t0 {; ]1 E" H7 Z- V. x
        --shengcheng Status:zimoxingceng4 M" m: d7 M+ S2 Q1 c
        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");* l" C' G  B+ u
        Obj.Label:="warehouse status";4 N, C# J% D- }
       
; d3 T; |2 d6 V        for i:=1 to WH_nums loop
* y' @/ O2 h  C. ~                Res:=sprint("Store_",i);% G/ C+ C% {  [4 j5 E
                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
  N9 d6 H0 ^( I- C5 w                Obj.Label:=sprint("huojiaceng:",i);+ a$ h" Z  k  B/ f; }! }
                Obj.xDim:=WH_x;% X* d* @. @- I: d+ ]
                Obj.yDim:=WH_y;: J* e: ^8 n8 Y
                Res:=sprint("StoreData_",i);
: U# o7 b8 J" F                - I3 H) Q2 X: w; f0 u
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
+ {; u0 E% ^- r2 k; Z3 S; ~  }                Obj.Label:=sprint("huojiaceng:",i);
5 }6 }* e# Q* o% _                Obj.inheritFormat:=false;
/ z/ Q( p) Z7 c. E+ }) q5 l                Obj.maxxDim:=WH_x;
# l; z6 Y4 {/ M( E. O( X                Obj.maxyDim:=WH_y;5 M" e. Z5 F8 b% O% n
                Obj.ColumnWidth:=3;5 ]5 _0 @, j0 I9 J
        next;; v# V* R8 I9 k1 m( s
       
. Q2 c: G" A/ b/ x9 P* A        .Delivery.MUs.Forklift.speed:=2;
( ?7 L& V1 d4 \' b5 g        WH_var.delete({1,Part_Nums+1}..{*,*});% F. p# u/ L$ Z- I( E
        for i:=1 to Part_Nums loop
: M; J) E9 d1 t                WH_var[1,i]:=chr(64+i);- S& ^8 ]) y9 o' P9 b1 J0 X
        next;) y: K$ ^7 b( d0 w( A" z
end;( `" p% R1 A5 ^/ V% H# h
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了0 X) R1 c  c# p" M
! S' c* M' H) ?* A2 V8 D

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-5-31 07:32 , Processed in 0.017003 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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