设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 3854|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。4 D0 \6 B; _, i8 x
语句是这样的
4 p. [  [$ T, }( T4 Iis
2 y2 k3 {+ B/ ~: Z8 b: k        i:integer;' d$ r% W# `; Y
        Res:string;
1 \, E8 W; c! k+ J( {4 x( K4 `- Y        obj:object;9 D) ^1 q$ [& R8 B3 a7 z1 J/ G
do0 u$ P2 s6 h) z3 k
        if existsObject("Status") then
) E, a$ x" s7 P% R; b- \& `" m* m                Status.deleteObject;/ }, \( }5 Y9 q( R1 p9 F. O8 q
        end;
9 E- t) w1 a! z% c, V5 t) T4 o$ [# `        for i:=1 to 10 loop
& d/ A; X# Q( S                Res:=sprint("Store_",i);
+ W" G# V) H8 m( ~0 |                if existsObject(Res) then
6 K9 d6 j2 C: Q- c# S$ }                        Obj:=str_to_obj(Res);
5 A! b- `# _3 ^$ S9 |0 k! x, `5 a  H                        Obj.deleteObject;1 y/ h, K( V3 B
                end;' o/ q" Q- P6 H
        next;- @: \. C% j0 y- L) y3 {! {
        --shengcheng Status:zimoxingceng
% E9 ~* \+ l  u9 e        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
8 K4 R9 K/ z$ M/ C) o        Obj.Label:="warehouse status";( m" O3 u( g# j3 u  ?8 Y# I
       
8 d& O5 N" Y+ }  ?- w' @        for i:=1 to WH_nums loop& |& P/ E7 |/ `# S! U+ [
                Res:=sprint("Store_",i);
5 J* L0 I: \  e. c  A5 t; c                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
  W5 z/ o3 d! a7 F  a& e% O                Obj.Label:=sprint("huojiaceng:",i);1 n, k. k* P8 J; ]& j2 U; x) c
                Obj.xDim:=WH_x;
' e4 s( j6 `8 _* O$ B) M( @                Obj.yDim:=WH_y;
! n1 C# U  r8 {6 n1 {# r( Q                Res:=sprint("StoreData_",i);
, t1 Y" G) i) w* Y$ h                $ G  l4 ]+ o# H$ M
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);& n8 j( r+ O$ N. h
                Obj.Label:=sprint("huojiaceng:",i);
# o% l# c2 g( h$ L                Obj.inheritFormat:=false;8 n3 G1 H8 x1 j/ k! N
                Obj.maxxDim:=WH_x;
! X# X/ n1 [7 d+ x# X                Obj.maxyDim:=WH_y;
+ w' t. B/ `$ l1 f                Obj.ColumnWidth:=3;* x4 {: R" V! y- C6 V8 @) E& p
        next;
1 ^+ H+ A* a  s       
9 G3 T, p! I& K/ F9 L        .Delivery.MUs.Forklift.speed:=2;
. E6 V: E& G4 X$ @        WH_var.delete({1,Part_Nums+1}..{*,*});# B- S" Q0 f) B$ N2 s. C
        for i:=1 to Part_Nums loop
% a0 j7 O5 S0 G4 {6 r' r9 Q% R                WH_var[1,i]:=chr(64+i);5 z; Z3 ^, W" C1 l3 q
        next;
( {$ O. ]- a# Rend;
+ J) k& L4 T( ?+ u4 |1 F0 a出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了- D4 e& D* Z! n# G0 S' A
" q/ L% ^' J) n$ I$ F( V8 j/ n

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-5-6 09:17 , Processed in 0.020520 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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