|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
* F/ M5 u1 t* t& e- k* f( S语句是这样的8 L& g& F& u: E8 A) D( C7 Q
is* }# t A Z. ]3 Z9 I0 z: i
i:integer;4 [. t7 ]9 w' ~
Res:string;9 h& p7 f! U9 [# u9 D
obj:object;, z$ r' s4 O/ K
do* @5 V- p5 P% D* s# X
if existsObject("Status") then
& z y a% j% K" B3 z! A j; } Status.deleteObject;0 m3 \ V {2 u8 f. C
end;4 ^( U) s8 c" N# e' u' G
for i:=1 to 10 loop
/ E7 ]* s8 [& S3 {3 g# C8 `" L4 F Res:=sprint("Store_",i);5 h# u7 P2 [8 L
if existsObject(Res) then. x0 L5 o; H& {0 u$ o t8 k
Obj:=str_to_obj(Res);6 G1 a; e+ F* [( H* I, Q
Obj.deleteObject;) c& F# t$ E9 p8 D+ `6 X8 ]2 J! `
end;
J2 z) D6 ?; H0 G6 H next;
/ P) U: X& q4 ]+ m' l& f- T$ k --shengcheng Status:zimoxingceng, N7 I8 z" `- }$ d$ ^+ l; Y/ ~8 C
Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
% U3 s8 O+ P/ a4 b: |+ K+ ^ Obj.Label:="warehouse status";
$ Y# H, r& f: ^) i% J% n3 c
1 w4 ~$ r( G4 m- i2 ^ for i:=1 to WH_nums loop
- b6 W% Q$ k- _0 I |; A, J$ T; ?% ]$ B Res:=sprint("Store_",i);$ q2 T6 y2 o* g% B* R! O' _7 [
Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);8 O9 q; n6 a/ k3 a
Obj.Label:=sprint("huojiaceng:",i);
. [) @" F4 Z" \ A8 k( E; N* C" t1 |/ h Obj.xDim:=WH_x;
3 @* t5 t3 s. C% i" ~+ l) F Obj.yDim:=WH_y;
: K+ q4 p9 C8 z; O# f* O+ R6 L# a Res:=sprint("StoreData_",i);! s: g- h2 B$ _+ D Q: g
+ w0 [$ Y3 G: @, V2 [1 u- X7 C
Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);, }) Y: r6 P) }& \3 M
Obj.Label:=sprint("huojiaceng:",i);5 `5 \" ]5 e7 c8 s7 f
Obj.inheritFormat:=false;- p/ C. Q: K. ] k' ]% N, `
Obj.maxxDim:=WH_x;
7 ^$ Q6 M+ t7 _5 K! i4 _" | Obj.maxyDim:=WH_y;
8 f: C R. @( ~4 C Obj.ColumnWidth:=3;2 }* }" H. B% c9 z5 s5 {
next;" p$ R; {# Q, J
6 C; [* K7 b; m7 L* m- c; @6 \ .Delivery.MUs.Forklift.speed:=2;
+ N. _9 P: Y* Q WH_var.delete({1,Part_Nums+1}..{*,*});
* g6 _/ V0 Y. q! _2 Y for i:=1 to Part_Nums loop: V. l1 V$ }, {9 L' O; r. ]
WH_var[1,i]:=chr(64+i);
8 F% k0 h. ]9 L% r5 O next;
, p: z c0 F( m" u) U( l" e% o6 p. Nend;
9 G6 F* ^; n: U) e- D出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
/ s* N& X0 `9 u2 n) `* u- x# L5 x( M* E& M* h6 o' Q
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|