设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 4463|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
. I5 f6 E0 z* L语句是这样的- x4 E- N( |+ J* O
is7 l0 D9 E: j7 v+ U3 g. `
        i:integer;) y$ G- X9 W$ B* d$ q0 T' N
        Res:string;
7 x0 H, C. X) L" Y! ~        obj:object;
8 n' F) Z; J0 |8 {) x* z4 Q+ wdo- u6 e; t: u, p' H* y5 s0 \
        if existsObject("Status") then
1 _& a  H* `, R, K8 H( [( P& i1 L                Status.deleteObject;& E) d7 ]1 R9 o! F
        end;; K' O5 w. J& u$ r; O0 x1 d2 Z6 d
        for i:=1 to 10 loop) r1 l4 e% T3 [+ `2 ^" H" j
                Res:=sprint("Store_",i);. h" r  p3 {/ ]0 ?, |+ e
                if existsObject(Res) then
: w5 B& S& b( S: y2 P* P                        Obj:=str_to_obj(Res);
# Q( l* [+ L; W8 E, f+ r) O- G                        Obj.deleteObject;
( s8 C8 B$ e" y( t3 ~9 o! E, a! ?, L* Y) o                end;
' l9 @( f9 ]  |! {- B- g$ i/ o, e        next;
* H& ]) Z! L8 d# z5 V( k' Q2 E! r' d        --shengcheng Status:zimoxingceng
  T/ A& }# `: C/ a+ o$ n: O        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
6 q: M5 h2 G" h! C: I1 [( W        Obj.Label:="warehouse status";* }2 ~5 @4 s! j" D6 ]
        . n8 G6 B- W/ x9 K
        for i:=1 to WH_nums loop  S+ n$ C0 G- C" h, J
                Res:=sprint("Store_",i);
& w  {  ^; j) P6 O; w( K! a                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
$ \5 w( w; s& X2 `4 j. u                Obj.Label:=sprint("huojiaceng:",i);( D) t# B* T6 P/ r8 Z
                Obj.xDim:=WH_x;9 `) ]1 L( J! i9 {# E
                Obj.yDim:=WH_y;/ K" v* f+ I7 P
                Res:=sprint("StoreData_",i);( n+ u3 I6 h3 F, O- k( {' S& g
               
8 k  Q5 \" k% K; v                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);$ p/ h- h# l0 y7 I; h2 o0 `! s
                Obj.Label:=sprint("huojiaceng:",i);  C- L# Y# x" C5 Y
                Obj.inheritFormat:=false;/ f3 t  W* g5 d3 Q$ m& V8 R
                Obj.maxxDim:=WH_x;: N" K# i8 ]- N5 ?% A. T
                Obj.maxyDim:=WH_y;# N& n1 |+ q& U* u# E9 N  d
                Obj.ColumnWidth:=3;
# R! p: c2 Y" D) T/ `% m1 C# c        next;# a* S6 n3 H: G6 K
       
. c5 q6 A+ v/ U. s9 H! j        .Delivery.MUs.Forklift.speed:=2;4 [: a! g, ^' f! B
        WH_var.delete({1,Part_Nums+1}..{*,*});. [* B' u4 ]' s0 m# @' ]
        for i:=1 to Part_Nums loop
3 W% F' Y- k  k                WH_var[1,i]:=chr(64+i);
+ y3 A  W7 C" T+ Z- s        next;5 s; S9 ~/ ?$ G/ V
end;
, C$ X! p) c+ [. l6 F% ?出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了. u3 u3 Z8 K+ _$ ^  X& T- p# @

/ |* ~( L8 N/ K( h, n+ F

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-8-15 23:32 , Processed in 0.017324 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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