设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 4157|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
( ~! m- ?" T5 m6 B3 d& b: {语句是这样的
' Z0 {4 J% N4 T# F/ ]8 u$ @( d% Wis; S8 @9 X6 z+ x2 \6 E" x
        i:integer;0 `( ~6 N8 A/ |5 O( d5 V
        Res:string;9 {  L. j# @8 A) [, U" d
        obj:object;! [1 a" ?) a9 }0 G" }
do
3 f& B% q4 {1 m( I        if existsObject("Status") then
" p% |! T- ?! _' Q: q                Status.deleteObject;2 G& l, P) |! w; ?5 i7 I% Z" l  y# M% ?
        end;
! i, Q8 z* G4 q        for i:=1 to 10 loop, _& [% F/ J& ^1 ]% t6 C+ u' l6 o
                Res:=sprint("Store_",i);
# p) e6 n  b! A                if existsObject(Res) then
9 Z6 I0 Q1 l6 m4 o) X0 C                        Obj:=str_to_obj(Res);
3 Z6 O, F1 ?+ \4 W4 J3 K; T8 ~4 |                        Obj.deleteObject;
4 _. ~6 G4 b- {( F% K3 w+ c* H! f                end;* k$ f7 B* |9 O$ X/ d5 Z) }; }2 R
        next;) O+ O* F, ]( _" b
        --shengcheng Status:zimoxingceng5 q2 H6 E) N6 {1 I
        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
8 u# F0 @2 u2 ^' Q# S' H( G        Obj.Label:="warehouse status";
- L  |8 w% [1 j2 d1 a1 J' y) w/ C2 `3 I  l          h- L( x+ M# o0 c3 Q  Q
        for i:=1 to WH_nums loop
) }- f( S" x. \1 v                Res:=sprint("Store_",i);5 S7 [/ ^- E7 [0 Q  {) x$ P
                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);. }  g: T5 r6 ?. K9 S5 J( p2 ?
                Obj.Label:=sprint("huojiaceng:",i);; I* V* |* v1 F. |, h
                Obj.xDim:=WH_x;
; O" k, o8 f9 I9 F                Obj.yDim:=WH_y;
* u* e/ q, s& Q- A4 b                Res:=sprint("StoreData_",i);
) x3 f7 A6 t  j1 z4 x5 O                # A" p1 O6 `$ M8 [# p; C5 ^
                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);/ _' @. f2 A8 ?5 z0 z
                Obj.Label:=sprint("huojiaceng:",i);+ O( s$ m! h4 J1 s- K$ y
                Obj.inheritFormat:=false;1 |% J9 W  s7 H8 Q3 k2 `8 T
                Obj.maxxDim:=WH_x;
* ~$ g7 U3 S4 `+ ~+ X                Obj.maxyDim:=WH_y;  X0 [% t, n5 i6 v+ [" i
                Obj.ColumnWidth:=3;2 X. x) B  U4 U8 ^. d; h
        next;2 h, x3 C3 M" d7 A
        ! L) M8 ~  N! n2 q5 q
        .Delivery.MUs.Forklift.speed:=2;  A% y) m9 V6 k6 V" x' ^
        WH_var.delete({1,Part_Nums+1}..{*,*});/ s8 o5 }8 M) a  U2 K$ h/ {
        for i:=1 to Part_Nums loop: {; a& `5 \  x6 z# K, B
                WH_var[1,i]:=chr(64+i);
; v$ X9 l$ z$ I6 I0 X6 e" q" M+ l. x        next;
+ z  T% f7 v+ _" Wend;
1 i7 A* T* T, l) l  p: }* ?- ^出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
$ x0 Q( J- M" s( t! D0 D0 W4 I$ p, O0 W
: |7 m8 E( U+ J& e

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-6-30 08:02 , Processed in 0.017468 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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