设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 3641|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
0 `1 V& y" I2 Y: j  B* @) T( b5 E; m语句是这样的
" S+ V/ c. U* P2 ]4 z, _  }& Jis
8 g9 @# m8 e; d0 o* y! I        i:integer;* G" e; [% K6 b6 _+ y  M5 O
        Res:string;, z2 d; ~  c5 N% u1 {. r' P
        obj:object;, @% Q; g. B; c
do
4 _3 E/ V; j$ P0 c4 Y9 i6 P( N        if existsObject("Status") then
& l) @3 m. ?6 D& p  N                Status.deleteObject;$ k5 }( E+ c5 _- s$ o& S. B2 s# W) q
        end;6 d6 ^% M: V3 d( F0 @1 P
        for i:=1 to 10 loop
5 u" j4 ]: t% v' |& g                Res:=sprint("Store_",i);5 L6 ^' `% u5 |: Y: X9 Y1 H
                if existsObject(Res) then
" n* U3 A* M9 O; f+ D/ R                        Obj:=str_to_obj(Res);
0 v- Z7 _% S4 {) r( a- U                        Obj.deleteObject;
" j+ I* x* @7 J. g) B! r/ D5 J* J                end;( ^8 p5 U& ]. ^  Q* }4 E
        next;
0 L8 K; H5 P, S8 f  g. z- g        --shengcheng Status:zimoxingceng
, H1 V: P. G; q- P" H1 Z. X        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
6 b2 F/ l2 z) ~) G        Obj.Label:="warehouse status";; _* J: [/ F" u
          \5 {  j. ?7 v) X6 v8 g" T7 E( R
        for i:=1 to WH_nums loop
& E  m7 K" t3 A; U: T. r% d                Res:=sprint("Store_",i);6 P- M' }) d8 e* w, i
                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
6 c- _4 t' d8 g( |                Obj.Label:=sprint("huojiaceng:",i);1 L6 {/ b( ^9 y
                Obj.xDim:=WH_x;
' T/ M! ?9 i# n/ U! _                Obj.yDim:=WH_y;
9 @0 O7 q1 y- l* M: o# \* r$ P9 C$ O4 O                Res:=sprint("StoreData_",i);9 d+ ?6 ?8 e$ g
                % `2 m9 V# x7 ]7 g, I% s6 u
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
3 Z0 N4 E% q% }                Obj.Label:=sprint("huojiaceng:",i);7 D$ C+ @/ S" \7 N9 N7 Y6 Q2 s6 T9 M
                Obj.inheritFormat:=false;8 `' |0 A6 b8 b8 Z# G6 A
                Obj.maxxDim:=WH_x;
/ W- _6 j9 w" E5 j* M                Obj.maxyDim:=WH_y;+ |4 Y4 N- O$ P1 C0 K$ A8 ^
                Obj.ColumnWidth:=3;0 |. e7 g' R( E6 [& g
        next;* r) Q1 X+ v$ e( g
       
2 D3 |- R+ F% X& H        .Delivery.MUs.Forklift.speed:=2;
/ ~" {# z. L/ P7 m( X        WH_var.delete({1,Part_Nums+1}..{*,*});
3 N+ q9 z# V0 o6 D        for i:=1 to Part_Nums loop4 O: ~4 g0 o/ W
                WH_var[1,i]:=chr(64+i);
4 x8 e( K$ l) z2 e* d  v        next;% k  G: h# U' h6 F6 X1 B
end;
+ w9 Z6 N1 V' G% F7 y出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了# y1 i7 z' f9 P; X; H
6 Z1 |: B0 y* F8 L7 q! W

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-4-6 23:52 , Processed in 0.018593 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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