设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 4275|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
( |. m' ]7 \/ E* k7 o语句是这样的/ T2 `+ r9 j# G
is# C6 E! ]0 g4 m9 X+ Q
        i:integer;+ e7 s- }: S( n* M2 b* N2 }
        Res:string;. `) d4 p* I/ |* j( f; }, Q% j7 v
        obj:object;( c' i! Z( U/ [% b, _$ z& Z
do1 q- f0 h4 @/ E
        if existsObject("Status") then
; B, w' ~8 E: y5 Z                Status.deleteObject;
& s* x, z' X* p. U' I- Y        end;! j8 ?. T- @0 a
        for i:=1 to 10 loop; F3 s  V# {: ^: \" n4 n0 G  q" }8 R
                Res:=sprint("Store_",i);
/ @5 V1 X2 ^" i5 H' \% s3 Z% A4 P! |                if existsObject(Res) then
) N# c0 B/ d& p# k! a# F( p% f                        Obj:=str_to_obj(Res);$ M7 Y1 q% d. c1 M1 ^+ E7 v7 s& |2 F
                        Obj.deleteObject;
, P# \' u3 g& T' g$ D7 f6 ^; S  ?                end;
1 x; i! ^9 O; i9 D* W        next;
: ]& M& R5 h7 L; |' F/ z# K" i! a        --shengcheng Status:zimoxingceng% w* P+ v, T$ R; G6 {$ `
        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
+ o9 w/ i+ w/ A        Obj.Label:="warehouse status";% q9 K- A: F% L( @
        9 D4 f- ^' K9 M" w1 v7 @: b2 A
        for i:=1 to WH_nums loop" K0 e" O5 V: d
                Res:=sprint("Store_",i);' L" H9 W2 [' y2 E9 Q* K1 l
                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
( o% H) D' @7 x/ ~" J# w                Obj.Label:=sprint("huojiaceng:",i);; s) e$ f# R  ]. }9 [! I* n
                Obj.xDim:=WH_x;
& l8 t" ~8 U9 \; p  r1 g/ _                Obj.yDim:=WH_y;
8 r, u/ k0 C' K- p                Res:=sprint("StoreData_",i);
- w& _0 S, u# z5 l$ b; T4 z                6 p* {( E. s+ h/ c+ }% s/ K
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
1 D: S# m- s' q                Obj.Label:=sprint("huojiaceng:",i);
+ q7 n6 [; Y0 u5 L5 D4 E                Obj.inheritFormat:=false;
4 {, Z5 l0 g0 a$ R: s                Obj.maxxDim:=WH_x;1 n$ r1 z2 Z3 S% i& M6 ?7 W
                Obj.maxyDim:=WH_y;  j: C+ \" X% @' A2 ?" c/ e
                Obj.ColumnWidth:=3;
8 \6 D' J2 |& P! ?( \- V, }( H% p; q# W        next;
- N( a, A+ ^0 ?# ]$ p! J' P       
- Y+ p% F% `5 q3 |9 l- ^9 f! |  s        .Delivery.MUs.Forklift.speed:=2;+ i' b4 x+ k, s9 C
        WH_var.delete({1,Part_Nums+1}..{*,*});4 c" u0 g4 U  M" k/ M
        for i:=1 to Part_Nums loop& d/ v# Q" t, Y- c% W5 t; F
                WH_var[1,i]:=chr(64+i);
( n+ S$ p. Z% w  K$ T        next;1 ~& j) G6 c7 ?8 W
end;7 a9 S' i8 Z1 n: J0 H
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
" R: p0 X7 \) @# o/ X9 ]" X: a! y; k

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-7-17 20:11 , Processed in 0.012932 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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