设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 4426|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。( r, y3 z8 m5 M4 v  @
语句是这样的. v* J( Q' Y- y  T: g, C
is
8 W8 B4 U4 x3 ^0 _5 y6 n* c        i:integer;
7 B0 k( |- ~4 n, F1 x" R( F3 V        Res:string;
$ I" I. ~) ]5 G) Z0 \        obj:object;2 `8 v: M4 ^$ B7 j
do
/ Q& l' B$ o4 a1 Y  c1 T$ w# n) n        if existsObject("Status") then# L4 U5 v% W: i8 R8 P7 x5 @7 E
                Status.deleteObject;
  T! v' _; @" Z        end;
; N1 G9 |3 V9 J' X) I        for i:=1 to 10 loop# |3 v$ X5 x+ Z, E" p( V* x
                Res:=sprint("Store_",i);
2 e8 b6 U4 f9 P8 _' \+ x: o                if existsObject(Res) then# l: f' X: n- G. {$ ~1 T. Y( ?8 e
                        Obj:=str_to_obj(Res);
; [, }5 ?5 V3 J0 X# _8 @+ o                        Obj.deleteObject;
: F) T, H0 M/ t! _                end;+ L) C# d' g6 H. {8 d
        next;
, o; }% |7 Q! c0 V2 p6 D2 ^        --shengcheng Status:zimoxingceng. \$ Q6 p% I+ F7 D! ]. F
        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");0 V% j6 e" v  ^2 _4 l" A; \# M
        Obj.Label:="warehouse status";- _8 S$ J4 [4 Q, a$ Z9 D8 C8 m/ g7 @4 r
        + l2 v: @1 }* r2 t$ ]6 U
        for i:=1 to WH_nums loop
9 J. K2 g* }8 }5 `) o' ~                Res:=sprint("Store_",i);
, Q) D( j: u. r. P% g5 f1 k                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
( N+ e' i6 k9 W6 p                Obj.Label:=sprint("huojiaceng:",i);
7 I' Z, k) ]! n2 X  ^3 J                Obj.xDim:=WH_x;
* w; y0 C$ F2 Q                Obj.yDim:=WH_y;
+ D' G$ Z3 O; L$ Q: c                Res:=sprint("StoreData_",i);
# X# y7 F! b' @               
0 T  a  Q7 h. }                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
5 X  m  T0 k  z* e5 _                Obj.Label:=sprint("huojiaceng:",i);+ i3 U& n# f" N0 i0 s. k/ z0 M
                Obj.inheritFormat:=false;# E: n) A% @2 S, U2 G4 L1 V1 ~( ~$ N7 k
                Obj.maxxDim:=WH_x;
( r/ f* G+ t2 Q, G4 Y                Obj.maxyDim:=WH_y;4 S) b  G) q+ t9 g4 m# R
                Obj.ColumnWidth:=3;
3 d  A* x, X5 O1 p: ^- X( [        next;; B- S/ [. ~/ _. H8 Y- |5 `9 Y, C
       
& X) H: a" l/ E$ M  _1 @9 {        .Delivery.MUs.Forklift.speed:=2;
0 C( t* N& v& y! s. B9 w$ j- ?. r        WH_var.delete({1,Part_Nums+1}..{*,*});
" c6 @( K/ F9 i) n4 }- @        for i:=1 to Part_Nums loop- B! D( w! T- X( a3 |" X  _
                WH_var[1,i]:=chr(64+i);& P' G; A% M0 `, L* c8 Q' J0 m
        next;+ A1 N$ Z" ]" j4 X4 D1 l8 w. _4 m
end;: o$ K# Q8 o; c) A3 ?! k
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了& f  C' R+ l: n+ a4 x( M  x
8 N: V$ b9 x* K9 [+ }5 n. |+ ~

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-8-7 22:44 , Processed in 0.016976 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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