|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
& Y! ~ q; K+ H1 x6 A+ {语句是这样的2 Y+ ?1 u% n- Q8 `8 S7 N
is
, l, l+ ]: I2 H) e i:integer;
, y* G I2 T" t: j. t Res:string;
0 d- l9 T6 v0 k5 N obj:object;
3 v. I5 O+ c Q5 a; d+ Tdo
, d% L+ z- q! T* Q A) ? if existsObject("Status") then% |6 o, H* Q1 i4 @6 r9 g# W' C
Status.deleteObject;& m/ b0 O( w- \3 a% M; e! I
end;6 \! Y( N+ G; G
for i:=1 to 10 loop$ B' f# n+ Q$ W& o
Res:=sprint("Store_",i);
9 o1 v+ t( w) \0 ~' W if existsObject(Res) then( `) P9 N6 u+ C$ x" X
Obj:=str_to_obj(Res);
. l& }5 U0 r2 ], D" g7 _) C Obj.deleteObject;
- H7 K7 k+ P' a8 D6 g end;
- d7 I. x! k' M/ [ x/ Y next;# P4 }. _4 j6 t. [. z0 T
--shengcheng Status:zimoxingceng
" G0 l3 W7 p4 z Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
$ y+ P9 p( T# {1 |& ] Obj.Label:="warehouse status";
/ M/ f# H _. I5 z
+ k! f5 Q9 h5 T5 s D2 { for i:=1 to WH_nums loop- J, ?2 r( e# H# v$ o1 K
Res:=sprint("Store_",i);1 k: E7 Q# R4 z* ~
Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
. O( R& P h4 H Obj.Label:=sprint("huojiaceng:",i);
( A2 {) _4 i9 F" l! |( @, ^. b Obj.xDim:=WH_x;- X$ a' o8 R6 P A
Obj.yDim:=WH_y;
D1 p. F% T" S( r2 U Res:=sprint("StoreData_",i);7 w3 I2 q* v4 @2 u: I
9 W% A( @* F% T Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);) w Y; Y+ u: z1 z! t
Obj.Label:=sprint("huojiaceng:",i);% B+ l7 P* S5 j9 U. s, h7 ]
Obj.inheritFormat:=false;( [5 D" k8 v6 m; ^
Obj.maxxDim:=WH_x;
7 j( @: D: D+ { Obj.maxyDim:=WH_y;& e2 B% T4 ~8 ]8 G$ j
Obj.ColumnWidth:=3;
+ ]. u/ \: F, F3 A( E& P next;( n6 r' D, X7 P
6 A3 C9 F" y) T
.Delivery.MUs.Forklift.speed:=2;4 O9 V, I% k; f7 d
WH_var.delete({1,Part_Nums+1}..{*,*});
/ l( D0 s$ U+ E+ ]( w9 L U; Z for i:=1 to Part_Nums loop
& A: s9 T# S& n$ y WH_var[1,i]:=chr(64+i);
7 ?5 \6 w, h: o next;
- J) s+ M* D! c; v( Rend;1 Y9 D4 y7 C- u0 O! x' ]
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
9 u% {) P( }7 a# D
d# B2 ]7 E! m3 N |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|