设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 3137|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。2 R" b" X0 y4 m5 Z3 q; i" J
语句是这样的" L) e% G+ C0 _% _5 [* k
is6 c: y5 N$ L4 Z% I. m: S6 w
        i:integer;
6 e* _* g/ m' o1 x6 z        Res:string;3 r2 l9 A- G2 a) X0 Y0 B+ }; i
        obj:object;: N* {3 R+ q- g1 W, y# h& R, X
do
7 W5 V% @1 j# X* q8 n( E6 B& U        if existsObject("Status") then! w2 c  Z, c+ ?
                Status.deleteObject;
3 ?2 _1 T1 M, `& Y! ?0 V3 I% c: \' {        end;
/ e/ x; s9 z! Y3 @        for i:=1 to 10 loop
# E0 ~! k1 M9 L5 J* x8 Z                Res:=sprint("Store_",i);/ a' N4 m' F$ l1 d5 N
                if existsObject(Res) then
$ S0 q+ S! V: s: _( j                        Obj:=str_to_obj(Res);$ V3 ?+ w5 k8 b( T- I5 m  V
                        Obj.deleteObject;! z- O$ ]7 @: [% K1 H% T/ o
                end;
3 r) W, p5 F8 z5 f% |9 N" E, f        next;7 c/ A* J3 q$ k3 D
        --shengcheng Status:zimoxingceng
/ `# d+ ^; A, m) e' N        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
5 c) \' o. V" `: n) [" C! i        Obj.Label:="warehouse status";& t+ C3 m6 S8 K+ y* |6 l
       
) t) @2 I- P! G+ g+ Z2 V! t        for i:=1 to WH_nums loop
8 z4 Z9 y1 D8 a                Res:=sprint("Store_",i);
  O' Q. [* j0 u5 i3 e7 R                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
9 y6 |& t/ F( i" a; Y                Obj.Label:=sprint("huojiaceng:",i);1 @! Q/ G/ H( r9 _; C9 A
                Obj.xDim:=WH_x;$ o( Q, g, [! ?6 y* c1 F) X0 V+ ]
                Obj.yDim:=WH_y;
3 A8 \  p& l$ J9 a* H$ l+ u                Res:=sprint("StoreData_",i);. w+ q6 R, S1 C8 S' N) A
               
5 G/ M" m: z5 A# C1 K% k6 C                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
2 P# n! T( R/ W* s                Obj.Label:=sprint("huojiaceng:",i);
; M* C# p; |2 ~                Obj.inheritFormat:=false;  j5 h6 }8 f. ]+ t* M+ v, q* V
                Obj.maxxDim:=WH_x;2 `& u* v1 A- W; ~  y/ O$ t1 u
                Obj.maxyDim:=WH_y;
$ z* P' g8 c+ D1 M& k                Obj.ColumnWidth:=3;
& h: |. G% ~# i% X5 O        next;  k9 m: }! [- B9 f. j
       
) A9 Q4 W( I3 s- _& T6 u7 d2 A, U        .Delivery.MUs.Forklift.speed:=2;) |6 A% @$ W' z3 J: B1 M
        WH_var.delete({1,Part_Nums+1}..{*,*});
2 U' p) G! e0 t" g        for i:=1 to Part_Nums loop5 h9 f, x% v. ~
                WH_var[1,i]:=chr(64+i);
$ `' x5 Q) m9 J- G9 h        next;
! }* W0 S" t4 z7 r5 o; C7 zend;
7 S* F8 f! ^$ Q9 s! d8 b4 |7 W出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了5 a+ l5 \. y; l9 n

% W+ Y7 B4 N5 W+ A; z2 u

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2025-12-24 17:39 , Processed in 0.020810 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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