|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
n6 L+ `3 J9 V" x" K# g语句是这样的
- _$ Q7 D' L% y' g, {+ Mis
" ?, @+ ]6 K9 N3 ~- B i:integer;
! l' \; f2 K5 j, S4 S9 L8 ^7 L Res:string;
& k* @# i* @% J* W7 {2 }# z- c obj:object;
; E: E* g y8 m2 C$ jdo- Z2 E- h0 Y2 V" p# o
if existsObject("Status") then; `- P2 o: {! Q8 }$ G l) [8 e
Status.deleteObject;- Q3 y, l O" W1 U
end;% D" \; l& L4 L
for i:=1 to 10 loop
% t' A: v- _ k% P5 c* B7 Y, K Res:=sprint("Store_",i);
) w# I& R) }6 f& I# c" } if existsObject(Res) then1 b; w( R& M V" d, x+ _
Obj:=str_to_obj(Res);1 |; L# s- l7 ~/ V5 G& K
Obj.deleteObject;6 R2 H/ |* W- _# J9 f `+ x
end;0 i0 d6 F& t) ^9 A/ ?
next;" m" T( f; M- @- m7 U
--shengcheng Status:zimoxingceng
/ Y! j: P! x" x& C( P, a Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");, g4 t& d; \9 p6 T0 T9 H- G* o1 |
Obj.Label:="warehouse status";
/ M5 P' M* X! {/ c4 K
6 ~% m7 v {$ D! J: } for i:=1 to WH_nums loop
! I7 N5 g# Y, L6 z b5 Q& V4 F Res:=sprint("Store_",i);
. a& ~* P! j3 C; Q- I2 d Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
) A0 d/ ?. {/ \' | Obj.Label:=sprint("huojiaceng:",i);
" G ?7 \6 y- i( X8 g Obj.xDim:=WH_x;
. B, [/ ?3 h3 t5 y# G3 Q: L5 R Obj.yDim:=WH_y;
4 O# O* \$ ^3 }' \: _+ m3 E Res:=sprint("StoreData_",i);2 \: B7 W# C1 T- t3 t
% I. i% G- j; t, m3 D
Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);7 q4 E( _9 V5 O. E
Obj.Label:=sprint("huojiaceng:",i);
! J/ A. g/ {! H6 a- k. Q+ a' D Obj.inheritFormat:=false;
: `, z" T5 v+ ^; V Obj.maxxDim:=WH_x;
# V0 v3 F/ E8 S9 T; f Obj.maxyDim:=WH_y;
6 K/ ~3 U8 p5 G8 Z. f+ G; I) m& p Obj.ColumnWidth:=3;
- |4 P: X/ F( L% x9 J next;/ g& q) _: X# Y& a
2 x) }2 d/ |1 c0 y- M
.Delivery.MUs.Forklift.speed:=2;& W4 o9 E5 @: s7 b( @( A" Z! J
WH_var.delete({1,Part_Nums+1}..{*,*});
3 p) p/ B8 e _9 I1 U" a for i:=1 to Part_Nums loop* I( f/ c. s% z* ?6 \
WH_var[1,i]:=chr(64+i);1 _. Z! @# P2 C S( O
next;
+ @8 |* ~" o, C: i# G8 Nend;
) h+ r4 E/ T8 C# g- S# R出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了 , J; y/ y. Q, x% |9 v
$ f: E. Z5 b/ |. c
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|