设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 4511|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
, }0 k- F$ u/ r语句是这样的
* f4 G! D' b; Z5 Uis$ p9 l: [) B  E5 c2 o5 }5 a+ |0 j
        i:integer;
* K" b5 m, Q* F2 k9 M0 n        Res:string;
3 o( @8 {1 j! ]. Q  `$ S1 G0 ^        obj:object;
$ ~$ D5 g7 e& @* I& E' ido
/ Q6 G) G7 w9 |- y* m" \7 p9 s        if existsObject("Status") then& T# b/ H% C! I# S. b( s  W; U
                Status.deleteObject;
- e7 f0 e3 ~0 c$ E6 M        end;. F* e& S2 Y6 ^- j2 ^5 J
        for i:=1 to 10 loop( c- x$ ]7 a) ?% J1 z, n- H* E
                Res:=sprint("Store_",i);6 R3 k' i# C: r4 C- e3 d% y9 S
                if existsObject(Res) then/ t8 P) k- E0 a& z
                        Obj:=str_to_obj(Res);5 j1 M, H' }; {
                        Obj.deleteObject;  v( t: A6 E! g$ n# Y6 }
                end;4 u3 x; P8 `4 t" N- i
        next;
3 N& _  P" l  @. [6 Y. E        --shengcheng Status:zimoxingceng. h0 e7 X' p4 u  z$ ?( l5 y
        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");& b( ?% D5 D" A' \8 J6 E/ i
        Obj.Label:="warehouse status";
/ }1 `6 D" i! r' h" j, M5 [; r0 V8 g# C        4 T/ o+ g: x! Q: [: v  e
        for i:=1 to WH_nums loop
) g, [% U; m/ M+ k9 s9 s                Res:=sprint("Store_",i);" H/ b1 M( t! }2 ?& `" }
                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);5 Y1 P) p! G  d1 r( {
                Obj.Label:=sprint("huojiaceng:",i);
1 v( i$ Q$ Z# G  T# _7 w                Obj.xDim:=WH_x;
0 y& ?. U1 p7 t) d+ L; ?                Obj.yDim:=WH_y;
: z. K9 O! S4 `) `" k6 n' c                Res:=sprint("StoreData_",i);
  X" r! N( f9 B7 ?               
  _0 Q' c- K! [) x+ e. J$ {                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
/ E4 C* ^+ s8 ]0 [' M9 ]% A$ |                Obj.Label:=sprint("huojiaceng:",i);
* |8 ]0 Y* L. o% a' p1 j; @. m                Obj.inheritFormat:=false;
& C9 ~: V" x2 k; V! l/ b1 I, A, X                Obj.maxxDim:=WH_x;
3 Z2 e9 _* L7 g/ T+ [                Obj.maxyDim:=WH_y;
4 N3 K% M9 V# W3 \  O$ Z$ _                Obj.ColumnWidth:=3;* i# I9 q- H' j; z5 n- z
        next;9 g0 B' Z8 Q# `# W% U+ ?
        , C, S8 W: Z* X
        .Delivery.MUs.Forklift.speed:=2;
5 b# b# y3 G4 y0 G# ^" n        WH_var.delete({1,Part_Nums+1}..{*,*});
* l6 J2 e( X2 w- X        for i:=1 to Part_Nums loop
% |, M6 X) u/ b                WH_var[1,i]:=chr(64+i);7 |) h  M1 [9 i' i
        next;* w' W; \$ M' Q
end;8 Y6 }  |( R7 f8 D7 G8 D+ g1 Y* x
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
: I. ]7 L: }- a% S4 v
& H& V4 p+ H+ \1 ^# {

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-8-26 00:36 , Processed in 0.019745 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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