设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 3650|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。/ }+ ^7 X9 a# O
语句是这样的( c: {$ ^; J/ b! |- V6 ?
is
' h1 G& y5 a7 M+ w3 R        i:integer;
9 `# h( Y6 L; e# D4 g        Res:string;
) l: P$ m6 Y5 ~3 \        obj:object;- |5 ~' R9 E% W
do
$ C% Q% o# s/ d' j* V# t/ }        if existsObject("Status") then0 t6 H1 v8 g  ?3 Q
                Status.deleteObject;
+ J+ M5 j, @5 u        end;
. L* ^/ b, p$ ^& L) p        for i:=1 to 10 loop
% S6 Q& |5 C6 ^0 L1 N                Res:=sprint("Store_",i);
; I- z8 _. W0 }                if existsObject(Res) then
2 L8 V! D$ Q7 p8 W                        Obj:=str_to_obj(Res);
7 l2 j; l. ~" f                        Obj.deleteObject;
- t# \  _! h" \4 N% z: n" p                end;
" f3 ^4 C3 Z8 Q2 I1 }3 L7 l" F        next;
- y/ X3 n4 g4 e. S  A( d) q& f6 y        --shengcheng Status:zimoxingceng& v; F7 _0 Y" L9 q
        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");9 B3 ~% S( x4 j' T6 a, ]+ q8 G0 T# v
        Obj.Label:="warehouse status";
- a" X8 q0 E! M) {8 U" @: {9 Q       
% a4 l/ G2 i" @' T        for i:=1 to WH_nums loop5 U5 M2 o7 `* g( a3 u9 Y9 K
                Res:=sprint("Store_",i);2 u4 Q. j$ }2 K$ U* {$ G% u* @8 A* F
                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);$ P# L) ]  Y0 n8 B
                Obj.Label:=sprint("huojiaceng:",i);
9 w/ ~  ^( C8 H7 x, ~9 t  `2 i3 X                Obj.xDim:=WH_x;
  Y9 A* |9 H* W$ }5 {                Obj.yDim:=WH_y;
' V" J  P, I" I" W/ ~" N                Res:=sprint("StoreData_",i);
- }! }. i8 B8 K4 }* X               
  [1 ?9 B3 J0 p& _2 w( l( p& t                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);' F) w' g3 ^, k8 N8 I1 b8 J6 q# Z
                Obj.Label:=sprint("huojiaceng:",i);% H; v) U2 E  ~$ {. z7 t: x/ H6 V
                Obj.inheritFormat:=false;7 f* b" O  {5 A2 M
                Obj.maxxDim:=WH_x;
. }! p( e) V0 r9 a$ ^! V                Obj.maxyDim:=WH_y;
* ^+ J, w: P: X- J, G; |( e                Obj.ColumnWidth:=3;, O/ h* N' Z- ~$ w# ]/ V
        next;, Y6 O+ Z1 {5 n( e& ?, f7 Z
        ; D2 ~8 @% \) A
        .Delivery.MUs.Forklift.speed:=2;+ S" `% D! W8 m8 j
        WH_var.delete({1,Part_Nums+1}..{*,*});
) N$ ]1 V9 F& m8 w0 O2 o$ f) e        for i:=1 to Part_Nums loop
4 V. J, c6 e; C0 U; k3 W                WH_var[1,i]:=chr(64+i);
6 o. B0 j9 [3 X+ d, k6 Q1 P        next;: v1 M7 L# r/ k# F# r* k  L
end;
4 K" K2 c4 R% b6 [出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
0 U: g& p+ V( |0 n! x5 h: K' Q5 `& t$ [9 W+ u

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-4-8 03:44 , Processed in 0.017967 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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