设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 4435|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。5 ^/ G. [% c4 v" X( O+ ~
语句是这样的- g9 W  @+ q; b7 y2 J: L1 D
is, C! c4 I  e2 k4 q! J
        i:integer;) h2 j% d" B% x) l# e
        Res:string;
/ X* Y% @' C$ ?- Y) _; {        obj:object;
# k0 f" h0 ?# r4 b2 e- jdo
' O. {& E/ f: p        if existsObject("Status") then
6 N: F, W+ c; K: F                Status.deleteObject;) }" L* u0 v  Q3 \- Q
        end;! E7 V# Z# n; Z
        for i:=1 to 10 loop
9 [* d2 H. `3 ]& c; N, {                Res:=sprint("Store_",i);( g; `: r5 s4 O. G* Z
                if existsObject(Res) then  `; K( z- X8 b' G; U
                        Obj:=str_to_obj(Res);* T* ]8 k& l6 @# e! }
                        Obj.deleteObject;
. i# y: r8 M* m                end;1 K3 W5 N  X+ E3 z% ^" O1 X0 Q
        next;
: n) ^% ?4 S7 {- Q- y+ @6 q        --shengcheng Status:zimoxingceng9 B: a" u0 H8 G  e& H
        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");- Y7 T, M" _2 i" C: R$ f3 m2 j3 }
        Obj.Label:="warehouse status";, S* d. y2 N. p  j  j* m
        ; E/ S% v4 m! m% n( `; Y, A
        for i:=1 to WH_nums loop
0 R' b& e3 w; y/ g4 n: H                Res:=sprint("Store_",i);; R1 G3 ~2 w9 I
                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);& X) X+ t( U4 y, A& S7 K+ j" L- L
                Obj.Label:=sprint("huojiaceng:",i);) r% J- ~# j& s' v( y# f, X$ o
                Obj.xDim:=WH_x;- e. m! h# g* D3 ]
                Obj.yDim:=WH_y;
4 g0 e* C/ c  |2 Z& S                Res:=sprint("StoreData_",i);
1 O' F0 M9 X# l! z                / U# Y1 k& q4 `. H( M" q, n! U& V
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);6 T7 H# X- M% o% ^# j2 \/ c
                Obj.Label:=sprint("huojiaceng:",i);
/ ^. J& x3 Q( o( m                Obj.inheritFormat:=false;
" S# u' Q( F, A) s' |6 |+ u9 P                Obj.maxxDim:=WH_x;
/ G' ?3 _, z% j( h                Obj.maxyDim:=WH_y;+ h8 h4 w8 g# r
                Obj.ColumnWidth:=3;
% B" _4 `& Y2 w6 n        next;
. \  g, R  M, U( D) H       
2 e3 I5 w# P0 X5 R2 A        .Delivery.MUs.Forklift.speed:=2;
7 C+ N5 @7 I% @. t" F" q$ A) c! r) t, Y        WH_var.delete({1,Part_Nums+1}..{*,*});% e9 h+ V0 g/ u3 i
        for i:=1 to Part_Nums loop# t4 o. d/ w; m! C; z- n
                WH_var[1,i]:=chr(64+i);
" \9 S: R! s1 j& _, X' w* z        next;
1 E( U" T: X0 X; P% Z$ f1 dend;; d# u( K& z9 Q" \2 K- n& B
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
( i% h2 W6 l3 d6 K' }) g% t: Q8 ?' r# L- ^6 M! M- r( o

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-8-9 15:18 , Processed in 0.016069 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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