设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 4267|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。/ h, B, K' R4 |8 D: c- i
语句是这样的9 y2 Y' n0 R' W1 K
is3 S# y% I! x4 `2 `
        i:integer;! ^5 A. w3 T( S" D1 v, D
        Res:string;
# c6 M& U0 n7 z0 O" Z        obj:object;+ A3 o+ K2 ^( M9 y. q( M+ C
do
! S& W' K' ]$ o/ ^& V& b2 I. m) D. x6 K4 `& S        if existsObject("Status") then  d' g  V* [8 f2 ~* S  D. \, q% h
                Status.deleteObject;* C) O& }6 D' l+ U
        end;
4 _( E  j0 h. m+ Y        for i:=1 to 10 loop
3 Z  l; r; y; R) P                Res:=sprint("Store_",i);+ |- F$ Q7 F4 |) ^! w0 Q. |
                if existsObject(Res) then" |. q) z1 d5 x9 W
                        Obj:=str_to_obj(Res);9 ~. V# @  e+ k$ z
                        Obj.deleteObject;
' h; s, l' Z8 T7 H                end;& }& _, f6 o3 p: j
        next;, Y! [& E6 z0 Y  p# B7 ^: x
        --shengcheng Status:zimoxingceng
- v* p( a. Y8 Q) A1 E        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");. _5 r# |7 c! H* s( n% P
        Obj.Label:="warehouse status";
/ e$ M' v4 G# d( {        # E( _2 N* O. F
        for i:=1 to WH_nums loop; ~' i. f3 l$ k7 K" A
                Res:=sprint("Store_",i);
$ H& N. B) ^5 V                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);2 \0 J% X+ X. |5 s5 l
                Obj.Label:=sprint("huojiaceng:",i);
+ V% J4 j% i7 S3 M" _, |# G/ H                Obj.xDim:=WH_x;
/ U, U4 b3 p" Z( p( @/ U                Obj.yDim:=WH_y;
, o; X* U4 u& H( a! y                Res:=sprint("StoreData_",i);
5 V, A# @  E/ a               
$ {3 D7 i* h- r9 X: k6 o                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);4 z" l4 R% z1 D4 z# _
                Obj.Label:=sprint("huojiaceng:",i);/ G# v2 ]+ ^; K
                Obj.inheritFormat:=false;" U) H! D8 N5 d+ v% j: Y" }
                Obj.maxxDim:=WH_x;4 F" s6 v. f, h, z
                Obj.maxyDim:=WH_y;9 ~* H/ q$ u# y. x, v
                Obj.ColumnWidth:=3;
. u" o  l+ z# k! f7 v! @9 f        next;
6 w! m. n5 }9 Y( Q( ]1 @        5 R+ A1 F8 p! K& ?+ R( s# C5 j
        .Delivery.MUs.Forklift.speed:=2;9 E& ^& _: i- X5 l- y: l
        WH_var.delete({1,Part_Nums+1}..{*,*});
/ o$ D6 k2 O( [. U4 o* B$ s  U        for i:=1 to Part_Nums loop
" `9 d; _9 }( k( h. W- ~                WH_var[1,i]:=chr(64+i);6 e) C, j* D6 e
        next;
( m( q1 Z7 t; [" b2 Mend;: N" B% q+ \2 `5 E: M. ]
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了9 H0 a  d. F" q

0 ^6 ~$ P8 L( R6 J! u

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-7-16 12:59 , Processed in 0.016971 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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