设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 3377|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。8 j* s; M2 x( Z- \3 E% f0 H' _* g6 n2 D
语句是这样的
( ?/ y: ]9 A! V8 wis
1 n, G% ^# K- x$ ^2 r        i:integer;
* g1 w* g" d( x        Res:string;. ^; V0 K& O) _% f: z+ u
        obj:object;
  c* P, B0 Z5 k+ M8 Udo/ z7 ]! l9 w/ B7 c3 D; P
        if existsObject("Status") then4 ^; Q! E" [( ^4 e' j
                Status.deleteObject;
/ k( }! l1 W9 z" u        end;& d% X; k4 W2 S2 S+ I
        for i:=1 to 10 loop  a/ r3 Z2 R2 l) D7 `7 ?9 [  n
                Res:=sprint("Store_",i);
6 s5 b8 N3 }6 {$ ~. A' [                if existsObject(Res) then$ w  S" J* B' I9 o( H
                        Obj:=str_to_obj(Res);; Z& A- d& Q7 l" Q" T0 f0 A
                        Obj.deleteObject;& c7 z% f7 s" k
                end;" m+ F7 [9 N; b6 K2 B
        next;3 v! D) R/ b# ]9 F7 X
        --shengcheng Status:zimoxingceng& j8 `% ~9 `9 ]; _
        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
" e1 O- |# s7 J0 h( |        Obj.Label:="warehouse status";
" F# s8 R$ q9 [3 @% t: o2 `       
/ @  d  g) U* ~- J# i: u        for i:=1 to WH_nums loop* l3 m% ]# t& O* z
                Res:=sprint("Store_",i);8 E3 ~' K" P* t5 P
                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
0 g* s7 \2 H# @6 q1 j; M" u                Obj.Label:=sprint("huojiaceng:",i);
1 }$ a3 d' M+ O                Obj.xDim:=WH_x;! T* X, T7 U4 D2 I& M' f6 \
                Obj.yDim:=WH_y;' H& Q* O3 k( z
                Res:=sprint("StoreData_",i);. f3 K+ e8 k1 C% j# L4 F
                4 V" R# \& k8 N  ]9 @0 n: f
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
: ~  {+ k% E2 z# {1 W/ k                Obj.Label:=sprint("huojiaceng:",i);5 l7 w% X2 N% g8 E
                Obj.inheritFormat:=false;
/ b. r) X3 F7 ?4 o- ?. v1 p                Obj.maxxDim:=WH_x;; o5 N7 J$ V' _! k1 p
                Obj.maxyDim:=WH_y;4 _" K) @5 ]# h) E% E( N: j
                Obj.ColumnWidth:=3;3 @& V( U/ L4 O# r' V" }  U9 S
        next;9 h- j' [" g( r- m
        7 ~8 T* ]# |, Q$ ~% r
        .Delivery.MUs.Forklift.speed:=2;, k0 P# i( D1 r; P& @+ n
        WH_var.delete({1,Part_Nums+1}..{*,*});
& o. Z8 q4 l" a* }/ x# U, q2 Q        for i:=1 to Part_Nums loop
7 X5 |/ \4 E! S  L, K2 b- h                WH_var[1,i]:=chr(64+i);
& ?# }3 x+ _! _$ N/ \2 }$ B3 y9 K6 a$ T        next;+ w7 }9 U  b9 E
end;0 E0 H: o/ H1 @
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了8 E6 r- t8 O) @3 j7 V/ D

" r, {' `/ ]6 L$ G3 C" {

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-2-16 07:12 , Processed in 0.024370 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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