|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。- f. U Y( P8 Z6 |5 ~; G$ M8 y9 X
语句是这样的
- @2 i9 }: @0 ~" fis
5 ~1 T( {8 n! m- k' b' y( U$ C i:integer;2 ~* a, y: w) ~* U x, p+ E
Res:string;' j# _ B" C; I/ Y
obj:object;) h, N4 [8 L5 @' l1 J" C
do% E* a: e- e9 K9 N- m+ {. V
if existsObject("Status") then
1 O5 \" ?& A" Y: e: h1 k5 J- N8 H$ h Status.deleteObject;7 U0 { ?% W9 p; E: A% h
end;% V; q5 Q7 g5 {! O
for i:=1 to 10 loop
* ?8 i- s+ E7 R& W( @% Y) V Res:=sprint("Store_",i);
# P& H I4 ~# x4 J9 t! y if existsObject(Res) then
# p+ M( k: z( @+ ^2 t5 ? Obj:=str_to_obj(Res);( f6 r, {" X7 i" b% p
Obj.deleteObject;+ `; u4 q. {6 u3 T- q
end;0 L# B$ `! B% u' M+ [- B
next;- u8 l) w, A. L7 c" Z
--shengcheng Status:zimoxingceng O1 t( p. C1 o& Y; _ p" s- q
Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");6 R2 S: A$ u# a- {2 x
Obj.Label:="warehouse status";+ B7 \8 t3 E& l! Q4 Q$ j' ?9 H
8 d5 m& X( b% a& @/ q for i:=1 to WH_nums loop
4 t* G. b) h' U2 u% R) i5 a Res:=sprint("Store_",i);3 w4 O a, r* e. i
Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);0 }( [4 V, ~8 d7 g2 g+ R" j9 v
Obj.Label:=sprint("huojiaceng:",i);+ R! x% k# m! F1 i2 C( F
Obj.xDim:=WH_x;
4 H) p, d% [: A& Z Obj.yDim:=WH_y;
; S9 G8 A1 x% g8 e$ v Res:=sprint("StoreData_",i);' K2 }/ j9 _; _. g3 n8 R
/ f1 V# j6 s+ Z7 Z
Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);2 {4 c! c1 D7 v/ g1 R$ r0 f
Obj.Label:=sprint("huojiaceng:",i);
1 h9 ?5 Z- K4 I Obj.inheritFormat:=false;
* Q, H% ^! k+ Y/ A) e) Y' A. C, x Obj.maxxDim:=WH_x;
, E4 m! g- J. O$ d2 y' t% d Obj.maxyDim:=WH_y;
% L4 X- D3 S3 _: R/ F4 F Obj.ColumnWidth:=3;5 x5 @& v; e3 n l M( y5 v
next;0 T+ E, i0 s- C* @" {1 B
$ u+ P, B+ l6 d' G1 K! l .Delivery.MUs.Forklift.speed:=2;
5 P9 W x& G6 C' e2 V# X WH_var.delete({1,Part_Nums+1}..{*,*});
. k0 ?( d9 u) J for i:=1 to Part_Nums loop& ~8 f5 S& f' |
WH_var[1,i]:=chr(64+i);
, i8 l0 ~+ ^ \) r9 N" O$ {+ N; M next;
2 Y6 F/ r; a7 w. N6 g( Q9 Nend;2 W4 j n/ R( ]# B$ t
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
* C$ a0 B; W# l" z$ q. l! F0 }" Z- h# T, g' T9 g' }/ z8 L
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|