设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 2360|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。  ]: }7 S' D, Y" t
语句是这样的/ C0 c0 a. V5 z" ~3 [& J
is3 k' g  ^0 e, E. O! ^# q
        i:integer;( @; l4 J3 y% z1 S4 [
        Res:string;4 \. j7 G  E& C2 ^5 B; F& Y2 i1 }
        obj:object;
0 V' S  [4 |1 m; m& [do
0 ?7 t1 p% [# F3 k8 q: j        if existsObject("Status") then$ i& [. W8 w% ]8 x5 n" B1 S' Y
                Status.deleteObject;
& P' d! h7 k7 g/ f5 Z# f$ x0 G/ x        end;5 D, [+ h1 \: [9 W; I
        for i:=1 to 10 loop
) M+ s$ k- m  K8 e                Res:=sprint("Store_",i);
  W" Y8 `- t* h4 x3 t% d                if existsObject(Res) then
1 C9 E- w/ s2 V: k                        Obj:=str_to_obj(Res);
2 @8 g6 o* h5 V8 W8 z2 E( N* r1 a                        Obj.deleteObject;( {2 j: v8 D' `% N/ Y
                end;
, A- s, G5 q! Z9 S, _. U, e        next;. {& b/ z2 k- r  o# n" _# [  G3 W
        --shengcheng Status:zimoxingceng
! f( q9 |- S; n4 b" z        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
2 G( F! E, h8 a# r" G( e; z8 r        Obj.Label:="warehouse status";. d: {4 y- m# w5 h0 e9 [2 B
       
2 b5 E3 @4 ?) @# y5 {8 z% M        for i:=1 to WH_nums loop$ U/ G( ~- N, w4 A
                Res:=sprint("Store_",i);, S; O: P% C' p# o: Y$ M3 y4 E$ e
                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
& C" s0 ?1 s5 T1 b                Obj.Label:=sprint("huojiaceng:",i);3 p' S. K3 f$ \1 R  V- D) n$ a% }9 T
                Obj.xDim:=WH_x;
9 L2 f' j; w& N! @  Z/ T. s                Obj.yDim:=WH_y;
( V& g9 G  X5 h                Res:=sprint("StoreData_",i);4 ^, F+ h3 {6 N  D
               
, g# h- K" F' Q& F: z* T* U/ t/ i                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);5 v* X' ?' W: e& _1 d, N
                Obj.Label:=sprint("huojiaceng:",i);
5 L5 u2 ]! X7 [. d5 Z4 S& C                Obj.inheritFormat:=false;
. U$ A7 U3 O) S/ O+ M                Obj.maxxDim:=WH_x;
: q4 u$ a* H, Q5 Z+ h9 ^. V1 S                Obj.maxyDim:=WH_y;
# E# b9 H! c6 f( W2 B8 z                Obj.ColumnWidth:=3;
6 E: E  [% ]4 s        next;
! q- r3 k# D2 q       
7 m, @  s7 i* I& v1 L( _3 ^        .Delivery.MUs.Forklift.speed:=2;1 i+ H+ D0 x6 h$ ^
        WH_var.delete({1,Part_Nums+1}..{*,*});
' M" {% p5 ~+ B9 M  i' i. @        for i:=1 to Part_Nums loop! f/ G  d* k+ e1 c) v# x) V( L
                WH_var[1,i]:=chr(64+i);! U. h) p8 x4 r+ b, J" P
        next;+ I+ u3 U5 ?. C7 S7 I; k" K
end;
4 c! l3 D: |( n# o出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
4 S5 j; F: c' s. p2 s/ o" M& P7 j+ [1 l9 h- R+ j' }+ L6 s0 a

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2025-5-10 22:20 , Processed in 0.022924 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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