|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
3 Y9 e1 Z1 c$ p5 |; N$ Y# T4 T$ |语句是这样的% U/ @$ K; v: [' v5 G9 y
is# a" J% }, `7 h* O4 _
i:integer;
9 f. r# ^7 l# z% z" P Res:string;1 J2 l; N* U7 Q( y$ G
obj:object;
1 U. {, n; H' ?4 J: {do8 u. [# \9 e: e+ \+ ^! R r0 J
if existsObject("Status") then t9 m) c& Y4 W/ H1 q( t
Status.deleteObject;
/ u4 m G: S. G$ s end;
" @3 u- V+ x, W& Q' D @; w } for i:=1 to 10 loop7 k+ k2 \; O) k" C% Y/ S" j0 e
Res:=sprint("Store_",i);
; J3 @- d) O+ Q# h( t( a, Q5 R# [ if existsObject(Res) then
- D7 T0 D, D: T2 {( ] Obj:=str_to_obj(Res);) U& [% H, e6 }
Obj.deleteObject;
( q. |8 f+ @" Y7 B0 P# n5 m3 } end;7 }% i0 E) { b, w8 x( m
next;7 E8 F( V' K' K7 G7 `
--shengcheng Status:zimoxingceng1 X9 e3 c3 T D5 R& ]
Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");# t6 U% [* f+ Y' j" U9 k) {
Obj.Label:="warehouse status";8 ~. j. m2 V2 @3 `- z8 O
1 G) n/ [! S O: _3 H for i:=1 to WH_nums loop
+ v8 z! L! D" e3 U Res:=sprint("Store_",i);( E5 X0 {% c( e: ?4 q
Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
' W; p% k7 o$ W* E Obj.Label:=sprint("huojiaceng:",i);8 @) {& ~' [$ v* F. R# z+ l2 Y4 w0 d
Obj.xDim:=WH_x;- ~0 R7 G$ ~' t" J9 {! I1 h! I
Obj.yDim:=WH_y;
! D3 E" \: P& E6 E: V Res:=sprint("StoreData_",i);( F# w9 y K+ b- X& O* [* H
{ H# B! }2 U5 z' ^$ M
Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);/ a) _- `' H% \4 S |$ ?
Obj.Label:=sprint("huojiaceng:",i);
: w( J6 K! g6 d- {, k! ~% {: Z Obj.inheritFormat:=false;$ B' ?: Q! o# d* C! r
Obj.maxxDim:=WH_x;
" ?, U W7 u A7 m) H6 r Obj.maxyDim:=WH_y;
9 K" e( Q5 V/ r% `1 y% C Obj.ColumnWidth:=3;# \, v8 `* A' J
next;
/ m7 l- c# L. R$ g3 c0 ~ 8 [3 E$ D1 B8 W7 {" t. m
.Delivery.MUs.Forklift.speed:=2;: o1 {# S6 u: _, y. j
WH_var.delete({1,Part_Nums+1}..{*,*});
+ U3 R+ ^) P; V) H3 T: Y for i:=1 to Part_Nums loop T5 k; Y7 L( O+ }
WH_var[1,i]:=chr(64+i);/ p3 l5 k- x+ k# }& u9 I
next;* Q' N0 O4 q5 z/ G' R. m/ ?1 T0 u
end;
5 A5 F* u2 X! `6 M) ]5 ~. {% j) x出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了 , D' X& P3 N9 [% x9 D8 ^. G0 c( O( M
. [0 S8 x* N9 H1 Q |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|