设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 3806|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
. Y/ ?9 f; w$ P; q* G, \0 }语句是这样的8 ~& K+ u* T! L9 U3 K9 ~$ v
is
! s6 g& q0 p6 I& J( K        i:integer;$ s0 k2 y% I& R' v; o& e
        Res:string;
- h% d1 v1 T% W2 {9 B+ j, v4 \" L        obj:object;
  u. L( ]5 Q0 @9 o) ]! Edo' l) c5 Y2 M, ~. R* y
        if existsObject("Status") then
5 z: u) F4 `$ Z& q/ v* p                Status.deleteObject;
8 R% k6 q& m+ E. \; W1 c+ {+ y4 l5 J        end;
- E, K! v* {! O        for i:=1 to 10 loop3 D! y5 h, f# U
                Res:=sprint("Store_",i);2 ]7 E# e, v7 {2 P9 P! I6 y
                if existsObject(Res) then
+ j7 ]- F+ [1 _% E% r                        Obj:=str_to_obj(Res);
# E" `, _& {; y  O7 X& q8 {0 E1 i+ }5 ?                        Obj.deleteObject;4 {+ t  f$ H5 `) E: O( u  B
                end;
5 D3 K+ v5 L; x* M        next;- g* v, q1 Q7 |5 s
        --shengcheng Status:zimoxingceng0 B% f6 V$ ?  Z0 D" Q5 m8 w/ V" Z4 R
        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
$ v5 U: U6 b/ g8 J, @# ~* I& C; G) b        Obj.Label:="warehouse status";
' T; D: v8 k( |+ o. o/ d       
# h' C- Z6 h5 g        for i:=1 to WH_nums loop
! j( _4 G. c9 z2 h9 ]  ]                Res:=sprint("Store_",i);* E; y. N% v7 U6 m& m' A* _
                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);* h7 p+ |9 }7 p4 L
                Obj.Label:=sprint("huojiaceng:",i);
4 C0 a0 v: W/ ^0 m6 e# {$ e                Obj.xDim:=WH_x;
! o. Y7 W( d. _4 s                Obj.yDim:=WH_y;, |2 A% o! F0 S8 Y; f. K  _+ `
                Res:=sprint("StoreData_",i);. L" I/ y! q2 Y% p; l( y* U) m/ p
                4 _3 V1 J7 H6 n6 [
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);- }( l7 W$ x% E$ f' z3 H( \
                Obj.Label:=sprint("huojiaceng:",i);
. m5 \4 f  [7 D8 r6 Y                Obj.inheritFormat:=false;, A0 [: L% L6 Y0 y( i. q. C
                Obj.maxxDim:=WH_x;- N7 ~( Z3 [& B; f) X% w, A& i
                Obj.maxyDim:=WH_y;# I0 [$ @  K0 [3 n
                Obj.ColumnWidth:=3;- x8 f- X! O0 Q5 E9 R7 L' J# @
        next;5 H1 q+ H5 q, g3 V, Y
        . Q( y4 T$ S; i8 w
        .Delivery.MUs.Forklift.speed:=2;$ M5 w: y& ]3 W/ ?
        WH_var.delete({1,Part_Nums+1}..{*,*});8 r, P7 G4 M+ R0 b; g' ?
        for i:=1 to Part_Nums loop
7 }4 E5 O7 s$ R8 {: u1 [0 }' j                WH_var[1,i]:=chr(64+i);$ T# X" T5 f, u6 D) i$ q3 f
        next;$ P0 N5 I0 [; E% F* S4 b
end;+ F) E+ W% m  E
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
* T6 k2 s% P: E
4 f6 y% `7 }/ l& v

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-4-28 17:04 , Processed in 0.013910 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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