|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
6 x! O, A% |/ m0 z语句是这样的
' Z+ p# L$ @, t$ J" dis7 ~. I& e0 W6 \3 F4 w. ]! d2 m; g
i:integer;4 c+ R9 a2 m; |
Res:string;. ]' e8 n( d0 C3 ?2 B. [3 C. O1 g
obj:object;
R" V5 \6 _3 e4 {do
- w7 k, l* B2 P5 X3 J if existsObject("Status") then
" Q7 z) |0 ?; d! N, p$ X8 d' V+ N Status.deleteObject;
" M9 Y, A* P! R* F/ M$ w h4 ^$ N+ L end;
" E3 z0 p' `0 C4 w( K( m1 m* @ for i:=1 to 10 loop
& i* P9 T5 `8 e; r1 L ]0 B a: ^" | Res:=sprint("Store_",i);) K/ N. n2 w# v8 r3 }1 ^" x) Y
if existsObject(Res) then
0 l" J2 y; s% h Obj:=str_to_obj(Res);
! o* B$ F9 E4 ^9 R: z5 T Obj.deleteObject;; u: k3 V$ t1 ]* Q7 {( v; B H
end;4 d7 Q @) ?# _: P2 J
next;
8 L; C$ K6 i1 i* {. k- { _/ C' b --shengcheng Status:zimoxingceng" l1 M& R: r/ p( S
Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
' t, b& j: d! I2 }8 e6 e8 } Obj.Label:="warehouse status";
0 [7 n. Q5 x3 r# q# O$ s0 d# N( R
5 h2 g8 b! ?2 p for i:=1 to WH_nums loop
. B* T8 ~: b" `0 u Res:=sprint("Store_",i);
' H1 b5 w2 y: ~% W4 I2 \: g7 ^ Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);2 _. I$ B0 M. K8 ?2 Y
Obj.Label:=sprint("huojiaceng:",i);
+ g1 w' J% a4 r: q: ? Obj.xDim:=WH_x;
4 @! E2 E+ S" h8 p& f) s% W Obj.yDim:=WH_y;; f3 i9 n$ C0 g+ l9 R# M4 S
Res:=sprint("StoreData_",i);( n1 P- D. j6 Q' X4 D
/ s' R5 o6 A ?( k/ R9 ]
Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);1 P4 c4 p1 w* R8 a: D
Obj.Label:=sprint("huojiaceng:",i);
8 \; Q; G6 ?# e' H$ X) R2 r Obj.inheritFormat:=false;7 C. s6 s4 ]5 G4 p
Obj.maxxDim:=WH_x;; A! A4 Y1 k4 x+ B0 D( m: z2 H8 I
Obj.maxyDim:=WH_y;
/ n6 i1 ~) n3 }; n: \$ H Obj.ColumnWidth:=3;1 F- {5 i: M, `7 K0 H4 o
next;
( `/ i( y6 n! K; j $ R3 _5 z% ]4 Y/ Z A2 O3 T) G
.Delivery.MUs.Forklift.speed:=2;$ x8 }5 @( [* V4 P
WH_var.delete({1,Part_Nums+1}..{*,*});
" Q' B( a% t5 N; r for i:=1 to Part_Nums loop
9 U: D5 I. U4 K, h V% |, V WH_var[1,i]:=chr(64+i);
8 r" E T& U3 E; ^$ E next;
/ i8 v* V9 X+ N) s6 ?end;1 _1 N2 G8 `! N( d7 X* _
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了 ! `) y" c9 f) y. y" k, C
! l) e0 p4 Q1 W* y |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|