|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。 ]: }7 S' D, Y" t
语句是这样的/ C0 c0 a. V5 z" ~3 [& J
is3 k' g ^0 e, E. O! ^# q
i:integer;( @; l4 J3 y% z1 S4 [
Res:string;4 \. j7 G E& C2 ^5 B; F& Y2 i1 }
obj:object;
0 V' S [4 |1 m; m& [do
0 ?7 t1 p% [# F3 k8 q: j if existsObject("Status") then$ i& [. W8 w% ]8 x5 n" B1 S' Y
Status.deleteObject;
& P' d! h7 k7 g/ f5 Z# f$ x0 G/ x end;5 D, [+ h1 \: [9 W; I
for i:=1 to 10 loop
) M+ s$ k- m K8 e Res:=sprint("Store_",i);
W" Y8 `- t* h4 x3 t% d if existsObject(Res) then
1 C9 E- w/ s2 V: k Obj:=str_to_obj(Res);
2 @8 g6 o* h5 V8 W8 z2 E( N* r1 a Obj.deleteObject;( {2 j: v8 D' `% N/ Y
end;
, A- s, G5 q! Z9 S, _. U, e next;. {& b/ z2 k- r o# n" _# [ G3 W
--shengcheng Status:zimoxingceng
! f( q9 |- S; n4 b" z Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
2 G( F! E, h8 a# r" G( e; z8 r Obj.Label:="warehouse status";. d: {4 y- m# w5 h0 e9 [2 B
2 b5 E3 @4 ?) @# y5 {8 z% M for i:=1 to WH_nums loop$ U/ G( ~- N, w4 A
Res:=sprint("Store_",i);, S; O: P% C' p# o: Y$ M3 y4 E$ e
Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
& C" s0 ?1 s5 T1 b Obj.Label:=sprint("huojiaceng:",i);3 p' S. K3 f$ \1 R V- D) n$ a% }9 T
Obj.xDim:=WH_x;
9 L2 f' j; w& N! @ Z/ T. s Obj.yDim:=WH_y;
( V& g9 G X5 h Res:=sprint("StoreData_",i);4 ^, F+ h3 {6 N D
, g# h- K" F' Q& F: z* T* U/ t/ i Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);5 v* X' ?' W: e& _1 d, N
Obj.Label:=sprint("huojiaceng:",i);
5 L5 u2 ]! X7 [. d5 Z4 S& C Obj.inheritFormat:=false;
. U$ A7 U3 O) S/ O+ M Obj.maxxDim:=WH_x;
: q4 u$ a* H, Q5 Z+ h9 ^. V1 S Obj.maxyDim:=WH_y;
# E# b9 H! c6 f( W2 B8 z Obj.ColumnWidth:=3;
6 E: E [% ]4 s next;
! q- r3 k# D2 q
7 m, @ s7 i* I& v1 L( _3 ^ .Delivery.MUs.Forklift.speed:=2;1 i+ H+ D0 x6 h$ ^
WH_var.delete({1,Part_Nums+1}..{*,*});
' M" {% p5 ~+ B9 M i' i. @ for i:=1 to Part_Nums loop! f/ G d* k+ e1 c) v# x) V( L
WH_var[1,i]:=chr(64+i);! U. h) p8 x4 r+ b, J" P
next;+ I+ u3 U5 ?. C7 S7 I; k" K
end;
4 c! l3 D: |( n# o出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
4 S5 j; F: c' s. p2 s/ o" M& P7 j+ [1 l9 h- R+ j' }+ L6 s0 a
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|