设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 4487|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。* B1 p* j6 f; S3 @" V% n0 p
语句是这样的
* q* Y% Z* y8 i" J( ois
7 `9 ^1 @' [- l  b6 U* [        i:integer;2 O7 K* q7 A4 Y5 T3 B/ }/ d5 @
        Res:string;
' A0 ]0 _' j, O" C        obj:object;8 s. c0 T- M  `$ s& r$ I7 t
do2 ?( U: @" R$ u+ q8 b) B
        if existsObject("Status") then0 j% c4 O* I  U" K
                Status.deleteObject;. R# `7 S% E' E: X
        end;
% f0 a5 d- H4 M  ~( ^4 T* g. E        for i:=1 to 10 loop9 l1 P/ k7 c# T) T0 U2 M
                Res:=sprint("Store_",i);2 \, z  B/ y3 h2 J. Y0 o# a
                if existsObject(Res) then
8 o, r/ {- F5 S. L0 z                        Obj:=str_to_obj(Res);8 z, Q: q: r  R* k. V) D( x
                        Obj.deleteObject;/ Z6 K1 \8 `0 o' M
                end;
0 R3 a" F7 y: {7 E; f5 n( S' _        next;; V0 K- n) Z4 ~- U1 z  e2 Y
        --shengcheng Status:zimoxingceng
2 ^; A, c  |' J; ~! e' w1 \        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
4 C+ z% t" J6 w# H        Obj.Label:="warehouse status";
0 B' Y* |" o/ {) C( R# b        $ g( r8 n7 z7 m6 t# ?/ o: c! q( T
        for i:=1 to WH_nums loop
. M7 A9 q7 P* n# @                Res:=sprint("Store_",i);8 u- Y9 J/ u2 v! P& W+ H, c
                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
8 P- W/ G, n3 F+ X  l                Obj.Label:=sprint("huojiaceng:",i);
8 W) b5 V7 |, h3 E+ z% l6 q& q8 L                Obj.xDim:=WH_x;1 v  `) P& }  Y
                Obj.yDim:=WH_y;2 j+ N3 _% a8 D) {" F
                Res:=sprint("StoreData_",i);
. V5 i: V% Q! I+ k5 m/ V# T% C- H4 |               
5 [' D/ z- S$ n  V8 o/ x                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
) o* e! d( L# D/ E; T; x                Obj.Label:=sprint("huojiaceng:",i);
# Z, I) o% o4 C/ u: X' R9 [                Obj.inheritFormat:=false;1 E* Z) k" O. f8 S# W8 ^: ?$ F
                Obj.maxxDim:=WH_x;
$ l' j) M; ?4 `                Obj.maxyDim:=WH_y;
7 _$ E' g! D) P3 Z3 P2 j                Obj.ColumnWidth:=3;" Z, }. s! p. ?: x7 ^% ^
        next;( s  b7 z" Q$ z) g" u2 A0 {5 [
        ) D1 o- m% B% f7 Z: v1 ^! i
        .Delivery.MUs.Forklift.speed:=2;
( s- h# A- j3 l5 j8 `        WH_var.delete({1,Part_Nums+1}..{*,*});; c% h( T6 a6 J* S
        for i:=1 to Part_Nums loop. r$ Z1 l, D- ^3 W4 i
                WH_var[1,i]:=chr(64+i);1 v" B0 W; s; f5 C1 K
        next;1 ?3 t% D! k  }
end;: ^4 V+ |6 G) V" e8 ?
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
( ^1 C+ U* v! A, t1 [; N. u
9 k, o+ K$ Q% O+ X7 i! {

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-8-20 19:05 , Processed in 0.021115 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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