设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 4236|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。+ e* `9 P8 s5 Y5 {3 u
语句是这样的; J% _+ A) U- t: J1 n
is5 Q1 _" V" l. p) o3 h
        i:integer;
: y1 s8 t+ h9 x/ D6 K* z        Res:string;
+ @/ z; t, D4 Q. O1 F- D- _        obj:object;
7 ^2 H; P0 p8 Y+ {% s- P5 ?do4 I4 l2 y0 ?7 d3 A
        if existsObject("Status") then
3 f0 ^, z! M" S$ d! P3 m. D                Status.deleteObject;, X: b! Y. o- |- f- H( r( Z
        end;8 E( i9 D6 h; Q$ u" V, b
        for i:=1 to 10 loop! _* b- y/ O3 ~* X# T
                Res:=sprint("Store_",i);
; j* L/ q( h: ?. f* }* n: D                if existsObject(Res) then
1 D# O8 _- ?7 g+ c5 H) s                        Obj:=str_to_obj(Res);. Y; T2 D  z, w4 a5 J2 r6 [
                        Obj.deleteObject;9 N* C2 T1 p  J0 v6 C) x+ [
                end;
4 \- J5 @4 Y! u' I# A, }9 d        next;
1 x2 \  |! u6 C9 e. M1 n# _        --shengcheng Status:zimoxingceng/ q, ]" k; B1 w  n- I
        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");& p0 b$ M* G) J& I
        Obj.Label:="warehouse status";6 g; z! q! h  N$ y2 ~
       
& r$ T" n. x, y2 Q+ `7 N# Z        for i:=1 to WH_nums loop
7 ?( T- W/ R) P" {                Res:=sprint("Store_",i);
6 X& p$ i% M5 N  z                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
7 ~$ f& u/ a6 o3 k' w( X1 R                Obj.Label:=sprint("huojiaceng:",i);
! ~, d3 m3 t4 a  Z3 w4 m                Obj.xDim:=WH_x;2 s% X; n! ^( h2 Z/ a) t
                Obj.yDim:=WH_y;. z) C% H6 y! r5 U
                Res:=sprint("StoreData_",i);
# f0 l& r) [# L                5 b8 K: [' \5 l: T
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
6 K, i( o8 r8 {3 ?1 b                Obj.Label:=sprint("huojiaceng:",i);+ S# e6 n) k, y8 A" ~  ?
                Obj.inheritFormat:=false;6 m8 t7 q- Z6 G, ?. O# }5 J
                Obj.maxxDim:=WH_x;
5 p3 ^7 u# ?4 y  N                Obj.maxyDim:=WH_y;
, `8 _5 F  C" o/ v1 v$ Z! k: e5 h5 E: h                Obj.ColumnWidth:=3;/ L1 I6 J( R9 u
        next;" O  n0 p+ B1 o
       
  @. k: h. Y7 I1 N* N. e        .Delivery.MUs.Forklift.speed:=2;
1 b5 e5 E4 v' j$ U/ S5 b        WH_var.delete({1,Part_Nums+1}..{*,*});1 C# s. ^! E3 v8 u
        for i:=1 to Part_Nums loop
  }, x6 N! @" u5 Z" q8 l                WH_var[1,i]:=chr(64+i);2 S# r) O, M* S3 ]
        next;) k3 B7 a  P) [1 r" G0 y5 @
end;, x+ t# c2 B3 K1 x
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
' r/ @* D# A. Q7 X& n- c9 m2 @$ T
4 n+ j' m  Z# H# Q

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-7-11 18:46 , Processed in 0.016035 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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