设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 3593|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。9 B3 U9 B( @; Z3 A
语句是这样的9 e4 R" q  Q4 d' \9 o* l3 |$ b
is
5 i. t) `* S% Z' k$ B% b5 F  X        i:integer;; ~1 m( x2 d( e0 b7 _  T$ \
        Res:string;
; v8 g1 k2 D- U        obj:object;
8 M1 L9 s; q7 |' C6 }$ R; qdo: W5 A  M$ Y  B. H0 X' U
        if existsObject("Status") then( Q3 b9 L/ ?) f- C  B$ d
                Status.deleteObject;
# Z* r. s) ?9 \: \2 X        end;$ B# k  b) g0 V# O
        for i:=1 to 10 loop6 A# S- y* ]* z) O0 _0 Q
                Res:=sprint("Store_",i);
  x+ `6 S8 C/ e& ~1 M9 v4 y                if existsObject(Res) then
( Y9 J7 U+ e, H2 E) q; l% @$ t                        Obj:=str_to_obj(Res);
/ }- s, g" l) t& {9 y( K                        Obj.deleteObject;
( ^0 p/ a+ m& ?                end;7 x; L; h3 F& H0 _: s1 I: d# _
        next;7 b4 K2 W" {2 ]3 X4 V' M( Z4 j4 B
        --shengcheng Status:zimoxingceng
) v1 a, r' P' S- g8 P/ k        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
( o0 P- y( v! t        Obj.Label:="warehouse status";: W- ]* C. [' n* p, ]! r8 f
        0 w0 h+ u; R: A8 A
        for i:=1 to WH_nums loop$ m& l7 s% G( f
                Res:=sprint("Store_",i);
  v6 x9 \. o/ C2 d/ }& G, ~$ D                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
5 P/ S* |$ d" }6 q8 A                Obj.Label:=sprint("huojiaceng:",i);
1 n4 q( I' ?6 Y! J( W                Obj.xDim:=WH_x;
+ r) B3 A4 g' G$ O& n, N                Obj.yDim:=WH_y;) ~0 Q4 A  K. m$ g- H5 ]" Z( R
                Res:=sprint("StoreData_",i);4 p$ \/ T5 H' L
                : o+ m3 r0 F* i0 R. [2 T
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);" L. N, ^, v5 f% Z+ K+ d
                Obj.Label:=sprint("huojiaceng:",i);+ w, B3 ]( e4 L0 w3 O
                Obj.inheritFormat:=false;
& Q3 @8 {3 X% H                Obj.maxxDim:=WH_x;
6 j$ M# F  u  L3 T' u  Y1 Q                Obj.maxyDim:=WH_y;
+ r, i" R: @! ?                Obj.ColumnWidth:=3;
: n+ c% t6 s% Y9 r        next;- |" B' _- J. e& o
       
& \- I4 F: H6 k        .Delivery.MUs.Forklift.speed:=2;6 C! b0 ]! f% W/ B' o+ w* K4 U2 L* _: Z
        WH_var.delete({1,Part_Nums+1}..{*,*});
7 \" e1 `" @9 F6 ^$ E1 D( y% S/ q        for i:=1 to Part_Nums loop& {) J- T7 z& T+ c  j# L  P* C
                WH_var[1,i]:=chr(64+i);
% o3 K+ @: L; V* r- u        next;
% G0 K2 k% C+ i% Y! iend;
" F; }8 _) F0 Q) o. h( O8 [出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了6 _! _* e6 w$ D0 n( W

4 f: h! }2 L) \% ~- X

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-3-27 05:35 , Processed in 0.019761 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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