设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 4100|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
2 T: t0 M$ o) f1 e- Q  o& E9 l语句是这样的5 o4 E; s' n9 U+ j: Z5 X
is
6 n% \) Z( f: B: M7 p        i:integer;1 g8 f$ s2 S! Z! I* O8 f
        Res:string;; i8 k- ^1 U0 z. o6 l
        obj:object;: e# [, y$ r2 Z% U. j- U4 a5 K6 y8 Z
do( J' \3 x* e) g0 }! V
        if existsObject("Status") then
! i5 h% I! _9 h& D+ F                Status.deleteObject;, y# R1 x( `0 n" U- x; l  A, ?/ T, v
        end;
7 g- ^3 m- S3 G  C/ q+ i. e# s        for i:=1 to 10 loop: Q4 k1 R+ u  k1 q: N6 E' p
                Res:=sprint("Store_",i);
4 C% h0 `8 x$ o" y                if existsObject(Res) then! ?8 g0 r" Z3 i
                        Obj:=str_to_obj(Res);
; _9 Q' V5 V7 ?- O# e* @- J9 ?! C                        Obj.deleteObject;: R3 m- J) S4 F) ~/ g) m! G7 {5 t! y
                end;
) |( z7 k: B  ?; G0 G( h0 E. p8 _        next;. E" j1 A+ @7 ]+ @7 {
        --shengcheng Status:zimoxingceng
  \# r6 \! [( Z        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");+ w5 L0 S2 E, S* u9 N
        Obj.Label:="warehouse status";
* ?' f5 v" `% G2 u6 P8 r8 w3 `/ R8 g       
2 `1 C4 s9 q8 l; D( ?/ ^" y- [. O& u        for i:=1 to WH_nums loop& u1 Y( n0 R" P+ k  Z
                Res:=sprint("Store_",i);
* U% b2 g; n5 `2 j3 t                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);/ m% J( [. Y+ H2 z7 m
                Obj.Label:=sprint("huojiaceng:",i);% C8 T( U9 ?9 K: k: T: a
                Obj.xDim:=WH_x;
, P9 C: \4 K7 \( m$ i                Obj.yDim:=WH_y;
, Z$ N& ^( [! W) `# H                Res:=sprint("StoreData_",i);+ P% P1 c# i$ ~6 s& w) q. k( G' h
                ) B: S6 \) [4 w" {, O
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);2 _" a* |) U0 u0 m" v( X6 m
                Obj.Label:=sprint("huojiaceng:",i);# k; b# c' @, V( A! V* }: Q9 M6 l
                Obj.inheritFormat:=false;# \* ~  o4 c8 {( |0 n8 q
                Obj.maxxDim:=WH_x;% c6 {1 n, W: y6 |2 R
                Obj.maxyDim:=WH_y;
' t1 r( P- w2 A                Obj.ColumnWidth:=3;2 d* w) b3 o2 V+ m
        next;$ x( a; |( y: r+ D/ t
       
/ P0 f' Y  M8 V2 K4 \& x        .Delivery.MUs.Forklift.speed:=2;, N6 b' s8 S% f6 ~4 Y3 o; E& m
        WH_var.delete({1,Part_Nums+1}..{*,*});% z, O% i, ]% ^/ S5 u& C
        for i:=1 to Part_Nums loop
- j& I, s# M  p" R0 g                WH_var[1,i]:=chr(64+i);5 I; Q* Z* k7 w8 l" \
        next;
5 u6 \6 R2 w7 C# R  Wend;
% F1 m& r1 L- b! @出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了+ w* B4 t9 C* g: |" o  n+ ?6 p8 i

& d( i- T  G3 r# o

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-6-20 02:01 , Processed in 0.015450 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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