设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 4067|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
7 v; C1 s! w  a" g! l4 J语句是这样的0 e: Y% j' C% I( k8 b5 w6 q9 w
is0 o& g% Y* R2 x6 M7 d) D- V! Q
        i:integer;
! T" e) r" I$ U% A: I7 q        Res:string;% E" ?: C$ s$ O; m  e! F$ \
        obj:object;
' H. y' D; g: o# Bdo
- q5 K9 N" P9 ?5 c        if existsObject("Status") then+ g0 ~, k( E: V  w8 c
                Status.deleteObject;
% O. n# X# r7 Y/ d9 K        end;) J6 v; k2 h$ z2 V* R9 r# o
        for i:=1 to 10 loop( R5 L5 Y# C) c' n! \
                Res:=sprint("Store_",i);
6 @; I8 R* `! n3 ]0 }6 P1 E% g: R                if existsObject(Res) then
  W- |! _! e) c; S                        Obj:=str_to_obj(Res);
# J( Z) @" J% @1 u' B$ b# b                        Obj.deleteObject;# T" b0 g8 v6 x; N/ T, ~; {
                end;" X- O% Z; E7 _( }" c/ K: X" o
        next;
' C, e* x* M- K) ~% c        --shengcheng Status:zimoxingceng- a. w2 F5 I) \, K+ X: c
        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");7 c1 j/ u: S" F! Q
        Obj.Label:="warehouse status";3 `/ I- j, o- ]; d8 x6 s
       
2 X- z% B) R$ f& U        for i:=1 to WH_nums loop2 A" p( l4 Y& t; R/ U7 u
                Res:=sprint("Store_",i);6 Y# ~1 v* U1 D8 ?6 U, x( ~
                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
+ x! x! |) |/ [# p' P                Obj.Label:=sprint("huojiaceng:",i);& x0 o' w: V3 q" e; C
                Obj.xDim:=WH_x;
5 J6 }; m; I! K! N) ~                Obj.yDim:=WH_y;
( ?; F- O1 `$ J. C+ t) N7 d                Res:=sprint("StoreData_",i);9 ~4 Y! p/ c" j
               
5 w% l( B/ T& H- Z- t0 Z2 X                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
* P2 l& k/ \+ q/ _0 x; J2 l$ q* ?( O                Obj.Label:=sprint("huojiaceng:",i);
- D: B0 V' z' F0 L: Q+ D                Obj.inheritFormat:=false;
5 e' B: t+ f3 q  l' {                Obj.maxxDim:=WH_x;0 W! y$ Z0 a+ C, p  f' L
                Obj.maxyDim:=WH_y;! ?2 _2 F8 K7 i* y" J, u( w
                Obj.ColumnWidth:=3;
; N+ b- H# l$ p3 Q6 g8 ]        next;
! \3 Q+ |5 _6 v% h; X       
* h! v1 u; T* ^        .Delivery.MUs.Forklift.speed:=2;
/ S& V* |& ~2 C3 j        WH_var.delete({1,Part_Nums+1}..{*,*});
( [5 p, ]# _. J, Z3 A/ j9 R        for i:=1 to Part_Nums loop- p6 `* [1 Y8 @+ e. y$ p/ }9 a
                WH_var[1,i]:=chr(64+i);% G# ?6 x9 O" X. r4 G" u8 f5 b& Q2 @
        next;
* W( e5 o1 a; t7 P2 x0 W3 ^4 L3 oend;
' G+ J% C& H- N* h7 b9 [: G出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了. S6 Z) q$ d% D: @9 q

; U% e" V& g# M+ R: r

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-6-13 09:01 , Processed in 0.013698 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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