设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 3259|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
) V: A" _; h6 C4 h. ^+ }5 w& s* R语句是这样的7 i0 c% ]9 d. B- B
is6 Q% b. [3 c4 o- D5 y
        i:integer;
- R3 Z8 ]6 e' j        Res:string;
  F" I7 w! F' c        obj:object;- X5 ~* G; N; m4 f3 @; {
do4 Z: C  g/ P) o  Q! ~
        if existsObject("Status") then5 z) D2 N+ O$ R0 g9 R! h5 y2 W' ~3 j
                Status.deleteObject;5 p& A  G  g5 J. W  v5 W# o
        end;4 Z: Q/ d& i* F. i9 a
        for i:=1 to 10 loop
8 y5 \2 ]8 p" H$ d4 A0 W9 |                Res:=sprint("Store_",i);- g! M' E  T9 @: _+ _0 U
                if existsObject(Res) then) S$ l) m$ i2 j* T- K2 I% Q" h$ O
                        Obj:=str_to_obj(Res);3 m4 r6 j3 ~6 L& u5 q% \
                        Obj.deleteObject;
+ P2 T2 t2 y! r' R                end;
. ~/ ?! n* K' I% C6 `' b4 S* K: O        next;
. w; U+ o5 n6 P* D1 A- F4 J        --shengcheng Status:zimoxingceng! ]; r: S8 @* D: [5 `+ W
        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
# F' P9 a( ^+ {; g- ]7 `$ Y" p        Obj.Label:="warehouse status";
2 P. n' |' N# w5 C% d. l! r        4 {, M+ j8 z" P
        for i:=1 to WH_nums loop' L4 I3 n" T2 m9 Y9 u+ m
                Res:=sprint("Store_",i);" t2 k5 |5 l" ^7 g* i& ]: m: `
                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);/ K2 n% B0 Y1 Q6 r, g
                Obj.Label:=sprint("huojiaceng:",i);
9 t5 \* L4 c- v$ B. V                Obj.xDim:=WH_x;* C! O3 u2 d1 l# G( }( E$ x$ ?6 Y: S
                Obj.yDim:=WH_y;
* l' R' {* \5 b) Y                Res:=sprint("StoreData_",i);  K- X2 s% T' q' }4 Q
               
2 k+ V" ?& j0 l5 _/ }/ l9 n+ `                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
1 I8 l, F; h, O! x                Obj.Label:=sprint("huojiaceng:",i);
0 R+ c( @$ O, }0 q& w                Obj.inheritFormat:=false;
. A+ y% z9 U0 o                Obj.maxxDim:=WH_x;
6 B; g- T( [! ~( k7 ~* ]9 y                Obj.maxyDim:=WH_y;
8 Y7 ^2 K. Z7 S/ P* v                Obj.ColumnWidth:=3;( L% i/ c' e! Z' n8 |% ~
        next;8 }1 }9 h% O* s3 Y
        . U% c( v- I( ~  Z9 h5 S
        .Delivery.MUs.Forklift.speed:=2;6 p4 k8 v9 R* d  H) B$ C
        WH_var.delete({1,Part_Nums+1}..{*,*});0 T9 }) I( h4 C/ Q
        for i:=1 to Part_Nums loop
5 N% m- b) g* q4 u                WH_var[1,i]:=chr(64+i);
- ^: P: m# j' c& K3 `        next;5 Y$ V+ \: w' I5 Y* @0 ^% u0 u
end;
3 S3 X- `1 D7 D出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了4 ]" i" X/ g" P

/ r2 v0 ~) X9 B/ Y- D, z

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-1-27 22:46 , Processed in 0.019987 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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