设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 3784|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。+ ~7 q9 U0 z! x! \7 P- o
语句是这样的
  D" B3 W" I- d- Eis& X; P) h: t; R7 y5 _% i# T; g
        i:integer;
6 T0 V: y( W5 M( r        Res:string;$ @+ i* B/ M! G7 [- `" P
        obj:object;9 t( F  }5 q4 Q) a
do
5 d( O2 ?: \$ U) i( Q        if existsObject("Status") then: f2 V2 o* N2 K# O
                Status.deleteObject;* W1 K; q, S4 Q* d2 P  C
        end;
; S0 ]! Q( m8 j0 r, b        for i:=1 to 10 loop7 x9 Y8 N* W8 Y, r
                Res:=sprint("Store_",i);
: d# @8 X/ F& Y" |! T" p( T                if existsObject(Res) then
; R0 l6 T5 S% S+ Q4 [4 ?                        Obj:=str_to_obj(Res);3 z( S/ e. e; u
                        Obj.deleteObject;; d8 w9 g  ~6 d3 i, B
                end;
% m' Y; Z$ `- V4 M        next;. t9 G( X$ U" F& Z) m; J3 j
        --shengcheng Status:zimoxingceng
' U* l$ x' {; Z  _$ a0 ]        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
9 N4 D8 _/ N# K" y# h$ ?        Obj.Label:="warehouse status";
0 \1 Q! W! J4 w        " x1 M7 }  Z! Z# n0 ?
        for i:=1 to WH_nums loop
: V& g7 b. B. D" A" Z5 A                Res:=sprint("Store_",i);
4 l$ C  {( r/ Y; W                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
- C% |8 u- `) E5 S9 J9 L+ A                Obj.Label:=sprint("huojiaceng:",i);
! @! ?- c7 k7 L                Obj.xDim:=WH_x;
! @  |" G! M( C* G                Obj.yDim:=WH_y;
; m/ s4 I  }. T- k$ ~& x. n# D                Res:=sprint("StoreData_",i);" q9 H9 a7 ~, V% [; i6 o
                $ i9 P! \0 j* X7 a3 ?
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);* i9 {, |9 q6 p2 p; q5 ^
                Obj.Label:=sprint("huojiaceng:",i);
6 c, \9 T. f8 Z                Obj.inheritFormat:=false;
/ r5 |  L; D8 g; {                Obj.maxxDim:=WH_x;  R- y) A  \' M/ f' `3 F; s) h. [
                Obj.maxyDim:=WH_y;
% x& f5 @- |# D3 _4 H% g                Obj.ColumnWidth:=3;/ [# v- Z! F- _3 s( x) g
        next;1 E" p/ m) e3 n: {2 q9 _
       
7 E! k* n& E% R& B        .Delivery.MUs.Forklift.speed:=2;
$ r- B5 ?; s. d5 {. |6 W        WH_var.delete({1,Part_Nums+1}..{*,*});* F, h2 X( W/ K# b, e8 C7 F' s
        for i:=1 to Part_Nums loop6 f; }: B; m8 N' S! d4 W
                WH_var[1,i]:=chr(64+i);
7 C) G+ z' A$ j4 F4 _. n$ N4 c        next;
4 G( v" Y/ e2 \end;
. u3 `  J4 c; g( Y/ H9 K# A出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了& p$ l7 Q. C; l' @( p! d
9 @+ R- L" ]( ^6 I( N

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-4-26 02:58 , Processed in 0.014361 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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