设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 3608|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。# j; ~# Z; ^0 V, [9 x/ s4 s
语句是这样的( k0 f  Z  Q! A4 f+ Q6 s0 j
is
/ A: O3 f& M5 l2 u( x        i:integer;
1 ]7 X6 L# R0 x% l. ^        Res:string;( a& ^  X7 d' R5 u) Z
        obj:object;
. m9 i# E. ^' a$ w& P: b6 f) kdo" |9 N& y4 m; t+ }
        if existsObject("Status") then
8 S9 o. d0 Z$ k. I                Status.deleteObject;% ]2 ?7 Z; ^& O/ T1 v! x- {1 T
        end;. o8 I% A1 x/ {9 s) _' T/ t2 N
        for i:=1 to 10 loop
4 y5 r* `4 N( w* X: r                Res:=sprint("Store_",i);1 {9 \- i/ J3 g* [0 E
                if existsObject(Res) then
* v1 s- O! o2 \7 G                        Obj:=str_to_obj(Res);
, v- a2 [' }* U  u                        Obj.deleteObject;
7 w  p" _( R/ H- U0 \                end;% K% d& v; h: J- h- w
        next;  W6 l( V- ~  Y0 W$ G  ]& {5 D; Q& I
        --shengcheng Status:zimoxingceng  {" G) _7 }( w6 ~
        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
( p. R# t0 _/ ]        Obj.Label:="warehouse status";, E; f9 }8 G' D; B! e4 ]
        . o/ y- ], G& O0 A+ P! w
        for i:=1 to WH_nums loop
9 m4 K0 T* Z: {                Res:=sprint("Store_",i);
8 \7 j$ Z  x$ P4 m+ C                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);: [  |: o/ ^  c5 t: I1 h, ^4 ^  [
                Obj.Label:=sprint("huojiaceng:",i);
4 W, @. F5 e3 C( [, x1 v                Obj.xDim:=WH_x;6 `. L4 N8 `4 ?2 Y0 {! h
                Obj.yDim:=WH_y;
. N- I6 e$ D) t: e                Res:=sprint("StoreData_",i);
9 Z" S8 @- \0 q0 O1 o               
1 x; i# ?+ h1 R8 _7 U$ e7 Q                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);1 G: _7 t6 v0 z+ a0 f! a" h+ q
                Obj.Label:=sprint("huojiaceng:",i);
4 |: Z. G  j/ l: \" _9 Y7 t                Obj.inheritFormat:=false;( d' e. w  Y2 O7 R/ a
                Obj.maxxDim:=WH_x;
" K! T+ S8 B! ~7 J                Obj.maxyDim:=WH_y;9 I+ ]5 B" }" V4 D; s. d7 a% M
                Obj.ColumnWidth:=3;
# o; g; `9 q# S* r        next;
8 \, I2 u" u( M5 w2 r+ h        ' R* k  ]  p. k: ]" |
        .Delivery.MUs.Forklift.speed:=2;
4 u/ `0 Z; V  o) G# S9 X        WH_var.delete({1,Part_Nums+1}..{*,*});5 ^; L; I, `$ ~4 ?) z6 ^( e
        for i:=1 to Part_Nums loop9 B+ D# c' k! K9 B, v, U5 Y
                WH_var[1,i]:=chr(64+i);% s4 B* [; ~7 I0 p, Q$ `
        next;
! A5 K) }- G% S* t- n* f! Aend;
% d1 ?3 \) I7 q" e% I出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了8 ^; I; O2 E8 N3 ~+ g! j
# ^) s, z! [" @* q/ P; J6 z5 B

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-3-30 15:33 , Processed in 0.018934 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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