|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。3 C% O# y6 G: A$ \3 t
语句是这样的
/ x' s# T4 B7 `3 z$ {$ Tis
2 {/ F1 m- @: C# Q8 Z i:integer;
/ r8 H! g! P( o+ y+ y4 o Res:string;
2 V# J, T" A T obj:object;
2 c! |) n' s. x! pdo+ s. o: T- S* [( N' y
if existsObject("Status") then
# J/ [ I+ P- ]& B Status.deleteObject;
" M4 N& g7 Z& [+ I5 L- D5 L) n8 H# T# v end;. e+ q2 l- K8 Q) u8 `$ M
for i:=1 to 10 loop; F" [/ h2 p3 }& A. a
Res:=sprint("Store_",i);& c+ t- g- ^5 s6 h, B$ v8 r2 ~9 N R
if existsObject(Res) then+ e+ a7 q% \! v0 F& }1 n% l
Obj:=str_to_obj(Res);
( r Z/ J" |( a2 H9 r Obj.deleteObject;
* P3 A' s" l' e4 w$ _ end;5 m- A* E) e/ `) q P
next;
6 E- [! V8 @- s: j; \ --shengcheng Status:zimoxingceng
A- ?" F# N( D& b, H9 K4 ?! A+ w Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
7 F$ x1 x' v% G Obj.Label:="warehouse status";5 K- g) ` D# O, d! P/ Q
( l) Q" a0 t; I& M2 y
for i:=1 to WH_nums loop# v. K2 f& R% H4 ~/ {
Res:=sprint("Store_",i);
) O% C/ S2 i/ y* _8 `8 D6 c Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);+ ^2 z& R2 T/ s( T6 \" @
Obj.Label:=sprint("huojiaceng:",i);8 f# ]( c w: Z8 d
Obj.xDim:=WH_x;4 n& L, y/ V* G% V5 W& Q" X
Obj.yDim:=WH_y;
1 {7 `0 o. J2 [0 b Res:=sprint("StoreData_",i);
3 F+ i* u3 s* D
0 H! r7 N" f" O Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);' F$ w+ P; a( v1 I! g+ G
Obj.Label:=sprint("huojiaceng:",i);
3 E6 C' F, T% @! u* e& C- ~1 F Obj.inheritFormat:=false;
/ P- \$ h" e% ` j+ [/ v5 O. y s! q Obj.maxxDim:=WH_x;
5 Q' x& `, a6 e8 q& J4 {% i" F Obj.maxyDim:=WH_y;
9 T: a6 X4 `) z0 \1 `/ x+ n Obj.ColumnWidth:=3;, n3 d% L2 z+ P9 ~5 b: ~% g7 {4 o
next;- f! j! }! B, l8 t
( I$ D4 V% ~; v# e' c( B* B0 V- e6 K& K
.Delivery.MUs.Forklift.speed:=2;
3 p* H6 B' ?) v4 ^ WH_var.delete({1,Part_Nums+1}..{*,*});
8 E9 ]. g( l% Q2 q$ Q for i:=1 to Part_Nums loop' s* q) y: V: x& t. v% j
WH_var[1,i]:=chr(64+i);9 {5 J' H" V. L1 E' } l. k: O
next;
m1 _2 T1 E* w6 S; mend;
* p+ m. S4 b! j8 K7 a出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
+ f2 p5 q: c; L6 u
0 ~1 }3 c# m) X9 F" J4 I |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|