|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
' k, k2 k8 l4 f6 C' @& G语句是这样的
: c9 j P; g) j. Q0 O7 Bis
0 S) `6 P) ?" s0 K i:integer;7 m' J9 g4 R9 N; o
Res:string;" J% j) B# v {& s# l' |( _
obj:object;4 r. I$ C) m, j. T% d" T; V
do! x- @: Z7 f, Z1 V
if existsObject("Status") then
@: Z0 S R% w( k7 k& x+ I Status.deleteObject;3 t( f1 Z3 Y3 Q9 X
end;
" ^+ k- c" ?. A t for i:=1 to 10 loop! o7 M; F+ _; {8 p
Res:=sprint("Store_",i);
# r# z- Z3 M6 e' ~; ^' N& G8 p( R4 y if existsObject(Res) then
/ s, b& h& J# A6 X( } Obj:=str_to_obj(Res);
( u, V- f' ]% [. Q' c# W Obj.deleteObject;/ M2 p& a% c% }5 W+ _; O& x8 I, V$ E
end;
Q6 F0 ^9 C7 C* ] next; \ \5 c$ i( o! c( ^5 _
--shengcheng Status:zimoxingceng" f, c2 S% l6 V( Y
Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
) m$ f9 T M" b/ ~ Obj.Label:="warehouse status";$ s3 R& B2 t4 n4 U0 j/ C$ h% E
* d, l' i# c% O( O: g6 h3 I for i:=1 to WH_nums loop& y6 ~. n0 k, |* [. `* J# u
Res:=sprint("Store_",i);
: U. R1 H2 ]9 v, O6 i0 u% X Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);6 p0 n* F7 H& v' \& Q% u& f
Obj.Label:=sprint("huojiaceng:",i);3 n$ f6 a3 Q& R/ t6 R. P
Obj.xDim:=WH_x;
$ s) {2 x3 T. J* ?: c' J- k% } Obj.yDim:=WH_y;
0 f4 s3 x' w9 X2 Q7 x* T Res:=sprint("StoreData_",i);
3 _, I+ Z, V1 O3 j) C9 C/ k+ X
1 \" S$ B/ b7 q9 @0 h$ W% a4 L Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);( h4 f# x B' }3 A; }) l
Obj.Label:=sprint("huojiaceng:",i);
0 [1 Y( d X9 v' r! `& R Obj.inheritFormat:=false;
" T5 p7 t, @, \" t Obj.maxxDim:=WH_x;. T; S3 t: h4 z9 U! Z3 w# d# R3 Y
Obj.maxyDim:=WH_y;5 v! d% D# Y* m8 E! U: t
Obj.ColumnWidth:=3;( }2 a1 x @3 I$ ~# C
next;0 k+ b6 V0 D) q2 V) D6 B* H' [
* d& n1 C0 m8 a+ ^3 ]4 { f7 f: P
.Delivery.MUs.Forklift.speed:=2;0 n8 R, ?: q3 C' ~
WH_var.delete({1,Part_Nums+1}..{*,*});
i1 a: ?+ M1 N7 K: ^& r4 T- R for i:=1 to Part_Nums loop
( m3 n( H% y0 b9 ~% Q. K* K WH_var[1,i]:=chr(64+i);
/ i9 u. h& x3 K7 v5 [# I next;
! @# f$ L* E* x1 N* L' wend;, }, h4 H# _7 m: S; G
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了 # M% V. N/ _: F3 A4 K) s) b0 b
' D0 t/ \6 D* x7 v; k, O7 N
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|