设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 3516|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。  O" l9 N" V4 l: D9 L
语句是这样的5 R9 f* W) f" N6 z# M( p" c! S7 g: M
is) }+ u5 [/ r- V
        i:integer;; U0 G% U' E8 T1 U) A- c
        Res:string;- V  W1 q( c0 W9 V3 U# b
        obj:object;
% L8 a0 r7 U1 D1 O( u  }8 ]' Zdo
' h+ ^) ^/ @0 Z        if existsObject("Status") then
5 ^; L  b! L4 x" k4 s                Status.deleteObject;; U. @4 u9 |( T. Y
        end;
7 p6 U1 H# X8 @1 H1 ]5 g        for i:=1 to 10 loop
' F6 R. r& d( y) Y% u                Res:=sprint("Store_",i);
4 E, z! F6 }0 z( l5 _                if existsObject(Res) then
, T* M5 \! Y3 y# ~; G+ l- c: u                        Obj:=str_to_obj(Res);
8 J! a: [( f2 Q4 ^                        Obj.deleteObject;7 k) c: q3 c/ E, e2 D
                end;3 }0 E. H; C  p& q
        next;
% c- ^  V3 u* A9 ]        --shengcheng Status:zimoxingceng
  b; ?- g1 f/ I6 r        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
; O/ f( E4 }% e- [6 {! W+ t/ @* O        Obj.Label:="warehouse status";
2 b5 U; N/ j  a9 D+ ]% F       
% O5 n* O- l8 O# D. l        for i:=1 to WH_nums loop8 @; O2 m) S# ?. \+ \
                Res:=sprint("Store_",i);
: C9 P& }7 j" H: v6 d$ h6 R                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);4 k$ L! L! Z  }6 L$ [" Y
                Obj.Label:=sprint("huojiaceng:",i);, U( x# }& L- G( [; L& @
                Obj.xDim:=WH_x;0 `5 T3 [, m9 e" Q, V
                Obj.yDim:=WH_y;
. |" g3 Y: b7 h/ u3 S- N                Res:=sprint("StoreData_",i);
5 f6 ~$ r7 k( S# ]               
4 K+ L4 Q0 x$ j. u* b: N- `5 N/ V8 I                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
" N: O. B2 w8 E  q) h8 E  ~                Obj.Label:=sprint("huojiaceng:",i);
5 v5 d" x4 s' o8 x! d; d                Obj.inheritFormat:=false;- q) x0 E1 \) J. T
                Obj.maxxDim:=WH_x;- y; p, U6 J/ Z) S4 }
                Obj.maxyDim:=WH_y;
  a  j8 ~9 [9 [, q( k0 E, [6 Z. w  _                Obj.ColumnWidth:=3;2 q6 k8 `5 w4 u' F$ t' t* G1 i
        next;
8 w9 L( P' e% u& F0 C       
5 V) I( e) @' {& d+ d        .Delivery.MUs.Forklift.speed:=2;
* u+ k9 |' n; P9 L2 M        WH_var.delete({1,Part_Nums+1}..{*,*});
: t6 X1 |2 C+ e4 f% Y0 U        for i:=1 to Part_Nums loop) K1 H& _2 U, ^2 z4 ?$ N
                WH_var[1,i]:=chr(64+i);' Y- n& f2 a6 K* I/ Z  }
        next;: {5 V3 A) l9 g& o
end;; i! m# t9 c8 a+ M
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
5 I4 w+ a! {0 u6 x- r, D8 L, o
8 a& u1 F' d6 X1 v9 q4 d

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-3-13 11:35 , Processed in 0.016134 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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