设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 4536|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。% `# g7 w7 i, A# a
语句是这样的& w; c5 K: f3 x& u1 J
is
: M+ |4 B. M9 Z3 c7 F- G$ W# A        i:integer;' H4 E5 l7 e4 S* L, K# b7 j# J2 D
        Res:string;, M6 g, G& |0 l, G! O9 U
        obj:object;; s" Q2 Y4 z, ^/ [* }5 X
do
/ h$ x# l$ S2 L        if existsObject("Status") then) N$ z( i, v1 l, x) U% M* }
                Status.deleteObject;
4 }; c7 Z7 _. Y* N        end;
8 @9 j) Z  w8 T9 p. W5 t" R6 ]# n        for i:=1 to 10 loop6 J* _5 u  C" n5 l
                Res:=sprint("Store_",i);& ^" K1 \6 d8 T0 D. z  E5 T% f
                if existsObject(Res) then0 E9 t0 j4 V! y# ~, G" l; w# K
                        Obj:=str_to_obj(Res);! U) X- M. D$ K& \8 k) M9 ]
                        Obj.deleteObject;
; O9 S& K. x. L1 F' ]8 |                end;
+ [5 [) V1 G$ Y: Y* v  p' E        next;8 r4 P) I; [2 D! E' m) ~2 n
        --shengcheng Status:zimoxingceng9 P3 V9 d/ U9 s! L# d3 `
        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
( o* k- m  z4 S" \- f/ o        Obj.Label:="warehouse status";
5 n: F- ~$ ?& m0 k4 h        8 H) s. L9 h9 n
        for i:=1 to WH_nums loop  Z4 O+ N' F, `2 E: G7 s. c! b- p
                Res:=sprint("Store_",i);
0 g/ @) G- ^0 R0 h+ o& {$ @                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
( H( l$ k1 G4 s# N0 X1 w1 R  r0 D                Obj.Label:=sprint("huojiaceng:",i);
( a- k0 F9 s" J5 N+ f                Obj.xDim:=WH_x;0 y( ?$ m8 s* S2 v, f/ |# {3 S
                Obj.yDim:=WH_y;# E- d. E: L. `+ i) K- \7 m0 o
                Res:=sprint("StoreData_",i);
8 z% S' z2 e  L3 C' F7 S( \0 f                ' L: f2 m2 u( \7 j$ Q
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
8 n# x/ ?/ j* i: n2 k6 F! D+ d- S                Obj.Label:=sprint("huojiaceng:",i);! F5 @! P/ M8 R
                Obj.inheritFormat:=false;. r2 ^3 m6 q0 @* o3 N
                Obj.maxxDim:=WH_x;
- I% r( |2 ~: u* b2 i                Obj.maxyDim:=WH_y;$ @# @& W4 s3 N
                Obj.ColumnWidth:=3;
) {9 T6 K* b1 D9 n9 D; \4 V        next;
' g2 ?) N' ]5 M        3 m; Y* _- h( U. Y2 B
        .Delivery.MUs.Forklift.speed:=2;
6 l8 o- z6 a! Y3 K$ t        WH_var.delete({1,Part_Nums+1}..{*,*});
0 X  l2 {: n5 i& @        for i:=1 to Part_Nums loop
/ v& S2 }3 O5 e$ f9 S1 Q                WH_var[1,i]:=chr(64+i);
) g5 G" K. m  [% b! [# z        next;
& R( P4 q! k6 \end;
8 U" E  D: C( Y出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了0 W7 g# g, C! [5 {; L# X. ]

* `6 c! Q7 W6 o# O3 s

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-8-30 01:30 , Processed in 0.026661 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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