|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。; I/ s2 T& J) b6 w
语句是这样的
; H/ `( V; N3 [2 y0 E7 L8 Y# Kis
; v3 B' K3 U l2 j i:integer;
# m: d6 M9 {9 f+ W z7 T+ p Res:string;8 Q0 m" B! i" l E( @2 [. s: v
obj:object;7 s5 ?8 z/ g: l; B
do4 z$ P0 E& v; m ?- N9 C
if existsObject("Status") then8 n* X" r2 U4 i. O! u' t
Status.deleteObject;
8 U5 y+ }+ U' O1 @8 S8 k9 n end;2 l! E& q# x! G: e f# s% r3 @4 `
for i:=1 to 10 loop0 h5 r9 m# _! G9 p& k- ?+ v" c
Res:=sprint("Store_",i);. V! E1 z+ L. N) \
if existsObject(Res) then8 e8 W' X$ i' l8 n+ M! X2 }5 I
Obj:=str_to_obj(Res);
0 L9 c ?, `0 O/ W: M Obj.deleteObject;: N* Q) y1 O$ x) `- P& n
end;
7 Z9 r# [' @; I next;8 M k l$ i6 Z
--shengcheng Status:zimoxingceng+ X& I# X+ l0 ]. m/ W; S0 E
Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
( k% {: t& ]) G/ Y; a6 P Obj.Label:="warehouse status";1 ^6 K( T& x+ U. K0 m! K; u; M* F
4 b/ b- A$ `3 H8 ]2 L6 M. w
for i:=1 to WH_nums loop
1 x0 I( K5 n& g: l U) g9 m, k Res:=sprint("Store_",i);
8 t, E) D, \" _( u' c- y Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);+ S( Y) t3 e3 F ]) F O, ^& \
Obj.Label:=sprint("huojiaceng:",i);/ J0 ?0 @; y7 `9 G
Obj.xDim:=WH_x;
6 Z% `5 n" S' ?" z- R" j7 e \ Obj.yDim:=WH_y;
% m4 r+ d7 g6 }% c, v& E Res:=sprint("StoreData_",i);
1 F: {7 v( u- M3 x9 c7 b6 c' ?* k
. U3 t) z7 q5 V( I2 j$ B. ]4 f Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
' q7 U- N7 g7 M6 x Obj.Label:=sprint("huojiaceng:",i);
) [( M% g l7 y% h3 U: K' d Obj.inheritFormat:=false;) S( N6 h7 Q; S# J9 {9 K! q4 j* c
Obj.maxxDim:=WH_x;
& T: h3 N5 T1 U0 B( p Obj.maxyDim:=WH_y;1 c5 |& g$ A* G
Obj.ColumnWidth:=3; I6 U; w8 z$ {* B# f: w7 x% M
next;
* O- t, _) z2 M% x# Q8 f% k / G* o$ h) C* f; J, x
.Delivery.MUs.Forklift.speed:=2;& Q3 A9 g% P+ n/ g7 |) l3 L3 I
WH_var.delete({1,Part_Nums+1}..{*,*});
; u! v. }' B& ~; S% `8 x for i:=1 to Part_Nums loop
5 ~) ?+ D3 ]9 Y2 C/ V* m0 } f WH_var[1,i]:=chr(64+i);" X1 F( r& X% _) j* R/ D
next;
: r; p, S8 h1 Q/ X& n) m; R# Aend;6 } U; `4 p+ u! v& g
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了 # l& T' ?2 m- k" E
/ ]. ~9 D C3 o4 T& \* n) w
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|