设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 3964|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。- _' `* o/ _% a5 }; Z
语句是这样的/ ~, P! N6 i, O& k3 x) H4 Z
is" s, i. }. q+ f5 ?
        i:integer;3 B! A* s* F  [5 _. ]8 G$ N
        Res:string;$ u1 M+ K) b7 L" F
        obj:object;% c3 @, n3 j6 _6 p
do- j. W5 W4 ?: x. N3 D5 L
        if existsObject("Status") then, E* Y3 q1 E1 m$ [4 i. j: P
                Status.deleteObject;
& q- i! B6 }2 S! y# ^4 p4 `7 k        end;+ Z* A4 I( n7 j4 w
        for i:=1 to 10 loop* _. v* X5 K8 `3 Q
                Res:=sprint("Store_",i);8 A! b. U, x# o- Y% a- ~3 J, _! B1 C
                if existsObject(Res) then
7 X6 ~7 @+ c: W                        Obj:=str_to_obj(Res);
. T3 J7 T& [, H. }, w5 T                        Obj.deleteObject;
7 _( C2 i8 Q) n! n1 [4 l" N                end;: s# K3 j" s2 u9 w8 B0 Y2 p; e
        next;
9 f/ q4 c9 E& @# G& j( G& u/ b        --shengcheng Status:zimoxingceng
) T+ c. Z7 |9 K6 X: c        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
2 K" O+ O6 ^3 W* z8 r% }        Obj.Label:="warehouse status";
: V/ _8 c# D# _' S        ) g- J" s8 `+ G* L
        for i:=1 to WH_nums loop
+ \0 r& ^5 a7 F0 y0 X6 c                Res:=sprint("Store_",i);+ U7 z% v$ O" ]# y
                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);3 J/ h. E0 P/ M/ ?' `
                Obj.Label:=sprint("huojiaceng:",i);
; S+ {# L" k! ?                Obj.xDim:=WH_x;" X9 m9 S1 o& H8 u, }1 ]6 C
                Obj.yDim:=WH_y;5 j! T# r8 o$ \9 |% ]/ T! P- ~/ o
                Res:=sprint("StoreData_",i);
" m5 l* r) T; d- u! H6 E2 e               
) l5 f0 j3 U9 q3 d6 L5 ]+ f                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);, ^; ]! @  u5 I( e
                Obj.Label:=sprint("huojiaceng:",i);
4 p+ [: I# u/ r; G/ }9 S0 |0 u                Obj.inheritFormat:=false;
7 ?6 G& k9 X2 Q" w+ V1 i& J                Obj.maxxDim:=WH_x;7 |% M* k/ k; W: }" F2 i
                Obj.maxyDim:=WH_y;
& i: e# ?6 @1 F# a                Obj.ColumnWidth:=3;
3 [: }: K" @# @5 ~9 o& w0 x        next;
7 S* f! `  Q' f1 F# M       
9 B1 K$ T+ u  L/ [9 F        .Delivery.MUs.Forklift.speed:=2;% {3 a% ^, Q" Y& P4 s: e
        WH_var.delete({1,Part_Nums+1}..{*,*});
6 |; R* i- G! a2 H        for i:=1 to Part_Nums loop$ }. f" @4 f$ _7 \! Q
                WH_var[1,i]:=chr(64+i);, H  k: t# n1 i) k
        next;0 z: T4 X4 r1 V3 s) K; C
end;. w! C0 R) |# B6 o, x1 j1 p3 ?
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
( Q  ?  w4 p( D
3 |0 z; H0 o  A' r+ I

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-5-22 15:33 , Processed in 0.016995 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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