设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 3575|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。7 e- N, Z" g, I$ v2 x6 K. J
语句是这样的4 s  ?9 k; Q  n& P) V7 T0 x
is
* N2 ^9 l5 N: U        i:integer;
3 _- }( C6 i& G& `! _8 S' `        Res:string;
* s: ?  D2 t& ~; q        obj:object;) Z; }- K( q( d( ~0 [& q+ x2 U7 {
do
' U! Q+ [! [4 M- c( C/ c: G        if existsObject("Status") then
! {9 B" k( Z: P$ S3 t* T& k- m                Status.deleteObject;
  L5 z9 D4 ]  |6 E        end;
+ I% Z2 Y6 j3 Y9 r        for i:=1 to 10 loop& K5 q7 q  }* N2 }2 Q' j5 B, a! e
                Res:=sprint("Store_",i);5 E# K! ~( C3 X. L- s8 K- M" ^
                if existsObject(Res) then
; m( K3 b: D% j8 c' v                        Obj:=str_to_obj(Res);6 {+ k( _8 Z1 K3 a
                        Obj.deleteObject;5 {5 t, R- k& b7 B
                end;
# H% O4 K* F$ w        next;
9 w# w3 O" x  L+ b$ }        --shengcheng Status:zimoxingceng! b! n5 e! n9 w
        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");) P# k: |6 M5 O% k- e: x
        Obj.Label:="warehouse status";; X% k3 i& \+ H' f
       
  e  Z; e" R+ f. U: M' R/ A        for i:=1 to WH_nums loop! s3 I4 F; N$ }! B
                Res:=sprint("Store_",i);
* P2 c, v+ h+ V$ a8 f8 {                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);9 T2 E+ ]* g" X5 J- X* q" r% H
                Obj.Label:=sprint("huojiaceng:",i);9 g& ?2 u  X7 ?$ y) g; j$ A/ a
                Obj.xDim:=WH_x;) x1 S- w8 w& E7 w+ v7 i5 P1 C
                Obj.yDim:=WH_y;
- Z! {% E* Y: F                Res:=sprint("StoreData_",i);& ~3 `% W) S; [8 _: F
                / N( U& r1 n! h7 R; G1 d' G6 r1 O
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);0 V" B0 D* S* M* P( a$ w5 }
                Obj.Label:=sprint("huojiaceng:",i);
* [7 W" ?7 {% O/ b' m) m                Obj.inheritFormat:=false;
4 G7 q0 ~/ W* Y. k3 T" D6 l                Obj.maxxDim:=WH_x;% Y. x3 s' B  V* ^/ @
                Obj.maxyDim:=WH_y;* O: ^- D8 v9 u* I8 m! Y% n
                Obj.ColumnWidth:=3;  z! c& v  [& \3 g0 X5 i7 q; i
        next;  y* H/ W8 l5 [% ^! @
       
+ ?' v4 }  [  ]2 `' `' j        .Delivery.MUs.Forklift.speed:=2;- P% Q4 v. w+ ?; [1 Q# ]; [
        WH_var.delete({1,Part_Nums+1}..{*,*});
) r3 e/ I# K& H9 x# G/ {! n9 D        for i:=1 to Part_Nums loop
; H0 t* V" U: v0 O2 f6 l                WH_var[1,i]:=chr(64+i);
* m7 M7 t! B, N5 p6 q0 V        next;
' D8 C: ?( N" r+ R+ c  [4 Xend;
0 X6 Y  u* Z5 X) i- j9 G1 ]+ `出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了. l" Q& L6 _$ {0 X! I# B
8 i' @& U3 H6 {- X

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-3-23 01:43 , Processed in 0.019139 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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