设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 4147|回复: 0

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

[复制链接]
发表于 2015-5-10 17:46:09 | 显示全部楼层 |阅读模式
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。4 m. W2 {' c/ L4 q# Y& E! Z
语句是这样的
( s# l8 O5 V( n- k$ ^is# J, R' d' O1 f4 q5 w3 F8 w: g2 T
        i:integer;
# V1 H1 n; W+ k& Y        Res:string;
0 B! p3 {% F/ Y7 E5 g        obj:object;- O; C- @, V, ~, Y- Z5 e
do1 [) w- N. Y( `8 u/ _, e
        if existsObject("Status") then
  m! y$ m2 x+ n: {: ?* N                Status.deleteObject;
# H4 u, E) e0 b. ]" a        end;6 y9 Z5 z  x' D7 @" \1 \) H6 i* m
        for i:=1 to 10 loop
6 M+ ?; N3 }6 N6 S. |$ K                Res:=sprint("Store_",i);( F) t9 n0 ?5 A* w/ k- w* R7 `0 i
                if existsObject(Res) then
0 H3 E+ I  j; \* d                        Obj:=str_to_obj(Res);: r9 ?+ I4 G) I4 a2 f8 T+ d
                        Obj.deleteObject;3 c1 A7 Z) C- u- p* b: e3 R) F
                end;
4 F6 v/ L9 T! B) D5 b' P" v        next;
9 J' J; S# Z1 x0 a9 v! P/ N. A        --shengcheng Status:zimoxingceng. p, f9 S1 z% K6 {
        Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
' S$ I. E- J8 Y1 X4 v1 [# g        Obj.Label:="warehouse status";5 U/ w2 R$ ~) Q
        % x) S5 @. X6 v' q  O5 q
        for i:=1 to WH_nums loop# \  w! Z3 N: X7 I! o5 U/ l/ ]5 ~
                Res:=sprint("Store_",i);
+ P; @" c& w  x, y9 `) f* q# y- T- K                Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);4 L1 z- x+ n* R4 o4 I0 v
                Obj.Label:=sprint("huojiaceng:",i);. b4 g! u* h3 B
                Obj.xDim:=WH_x;
* c; }: v5 X1 H. J1 L                Obj.yDim:=WH_y;
& q: E! ?) z  K' B; W- I                Res:=sprint("StoreData_",i);
% A  g- `0 s- t3 X, d) a! r               
1 I+ y& a! w8 M. k+ V0 P/ F                Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);/ s6 [0 U: {3 y/ g& W2 u7 V# S
                Obj.Label:=sprint("huojiaceng:",i);
7 n) f! I% |  |) H                Obj.inheritFormat:=false;, E6 ]6 V- R& p% D- M
                Obj.maxxDim:=WH_x;
) z7 l' r! p. b5 E7 U9 ]& Y                Obj.maxyDim:=WH_y;
  N, L- r/ F2 E0 G8 }" N" V                Obj.ColumnWidth:=3;
; T# F/ j3 O5 u2 c4 E9 Y        next;
+ K+ P+ c0 H' m: m        - B- ?$ }/ K& w* N) z2 }/ V- g
        .Delivery.MUs.Forklift.speed:=2;
) ]3 G, e+ v  L- {, E) x: y3 S        WH_var.delete({1,Part_Nums+1}..{*,*});
' ?6 c& y0 _; \9 y        for i:=1 to Part_Nums loop
  m) c+ E' P0 h- s& p( D                WH_var[1,i]:=chr(64+i);
, O" y5 V: W& K. B& i  B        next;
+ `5 \$ `$ B+ h. s) X8 Z6 d+ rend;' l. }9 |: B5 C' T2 t9 S. q
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
" A8 B/ }) P- n7 P( v1 u8 v# j) n) v1 p4 F+ D* S

本帖子中包含更多资源

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

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

本版积分规则

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

GMT+8, 2026-6-28 08:20 , Processed in 0.018515 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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