设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 3912|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
  w4 x& V* R- k( ?# E; A* I语句是这样的
# {& M& N" \! M7 [( t* p6 \is
( f' R: @2 |  K" `+ ~) T) B3 g& I3 Y9 v        i:integer;- h  W/ n9 ?8 l6 U9 L- U* y
        Res:string;, \- f! N* [3 x. _% r: z. Z
        obj:object;
8 H  D. g: O7 I6 zdo+ F* t& g5 \# D! h
        if existsObject("Status") then
% \- M( c( q0 |2 M                Status.deleteObject;& R7 T/ s6 o# Y' S/ D9 m
        end;
0 v4 [7 `: [1 ^9 c# g        for i:=1 to 10 loop
/ E  v! @% V2 F; X                Res:=sprint("Store_",i);+ B8 `" c) `5 F3 C5 X3 P
                if existsObject(Res) then0 L  `+ B; c4 f
                        Obj:=str_to_obj(Res);* @) B7 d6 c5 T8 i6 H. `5 v& {: b
                        Obj.deleteObject;' l8 w- ?6 ~- [" S9 T
                end;
& q) \8 c- @7 b7 m        next;% T5 U( s; \( J8 {
        --shengcheng Status:zimoxingceng
6 f% W( R3 c& r6 u; N4 X' T% d        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
! W. K; \2 j  |- y        Obj.Label:="warehouse status";& ]: k# {+ w- R6 H
       
+ B5 U0 `2 f4 R, G$ X/ Z1 b        for i:=1 to WH_nums loop
' h( S* _6 J- \& ~. ^                Res:=sprint("Store_",i);8 c7 V! t( q5 i5 y% H
                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
# P. x! u' ]$ d9 \4 `                Obj.Label:=sprint("huojiaceng:",i);0 n8 a# @; g- O, S1 ?
                Obj.xDim:=WH_x;( X1 ?$ I7 A) w1 q) o8 E
                Obj.yDim:=WH_y;) H, j- j) _- c3 R/ ?
                Res:=sprint("StoreData_",i);
( j, G9 E5 b* d; x" J3 V1 w                5 k' D2 p$ t& ^/ }0 D
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);  L. ^' c' X  i1 ~4 I; J: {% y" k
                Obj.Label:=sprint("huojiaceng:",i);
8 U; l( w) l$ c9 u0 ]                Obj.inheritFormat:=false;
, A$ j" V2 H) n* W+ m                Obj.maxxDim:=WH_x;% n! \9 A; }' c
                Obj.maxyDim:=WH_y;9 b" Z6 K1 m. Y
                Obj.ColumnWidth:=3;
4 U# m7 J; c1 r$ o2 N3 p        next;( |) P- s0 L* P* ]; |# X: t
       
9 ]' J7 i6 q; r' C; N        .Delivery.MUs.Forklift.speed:=2;  E# r) ]" g2 C+ |$ R
        WH_var.delete({1,Part_Nums+1}..{*,*});  I; k) ?' |. ]5 k4 C
        for i:=1 to Part_Nums loop% B! g0 t' m4 ]/ t
                WH_var[1,i]:=chr(64+i);3 E7 s1 W# k  G0 K& s
        next;
# a' L( T* y/ {  j1 b1 W; q: O3 bend;
# ^9 ]# W0 ?! e+ j$ u9 E出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
* e% q2 c, Q8 i. _7 M
) ~0 a9 b$ G; ~! U/ w1 ]6 X' R

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-5-14 15:14 , Processed in 0.020026 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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