|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。3 s3 w5 {: E7 X) n7 ~6 y
语句是这样的
$ |' p* x' B4 k+ ?6 i$ K! B- `, [is5 k. ^1 ?% G% f$ L
i:integer;, v5 L; j# z- p3 r" ]
Res:string;
# B. R' I& P. J obj:object;' m& G& a6 Y5 J9 O4 b. Q/ f( f
do3 P3 D; ~9 n! ?. ~; E
if existsObject("Status") then
7 Z0 R5 F6 T. [6 \% M( J& d! K Status.deleteObject;/ K/ ^' v$ O1 [1 u. R; K
end;
( [1 m2 R1 [, ~- W for i:=1 to 10 loop
& }+ `' f5 W- J [ Res:=sprint("Store_",i);; e# V/ w5 p8 ?; V' q/ w/ i
if existsObject(Res) then! p4 _' E6 G- W3 A/ s
Obj:=str_to_obj(Res);8 X- S/ w' ^8 T
Obj.deleteObject;
' r6 f2 D0 q: X/ r3 S3 v end;6 t) g: b& {; h `
next;
! ^" |6 }# z: T6 Q2 _ --shengcheng Status:zimoxingceng
2 \, j+ @/ R" A( N5 T' q' a2 _ Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
1 H4 k* v, @2 J! y+ S+ P Obj.Label:="warehouse status";
6 V2 M+ D9 g |4 `2 D$ m" e% a; x 3 C5 m8 B0 r2 X# q5 s/ v) t+ \9 k
for i:=1 to WH_nums loop& j3 q. D. W4 }9 H" g
Res:=sprint("Store_",i);
. j$ F7 b/ ?* Y# R: |2 J2 `7 e5 y Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
4 E" A6 c0 L4 O Obj.Label:=sprint("huojiaceng:",i);
! v3 U4 v) @6 x( r! r- w$ X Obj.xDim:=WH_x;
2 S# ?% J1 S% p8 ~9 } F; O. U Obj.yDim:=WH_y;0 q2 T5 E" T" c: }
Res:=sprint("StoreData_",i);" z4 g7 f1 V O5 _1 K* k( i
9 T, I3 [" v) c) B5 {
Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
' P( f' \% ^0 N3 X4 G, _ Obj.Label:=sprint("huojiaceng:",i);
: u- u7 Z7 g" L- W Obj.inheritFormat:=false;5 m% S1 T7 M$ `2 L
Obj.maxxDim:=WH_x;& k& @' S& c* X/ P" v* N
Obj.maxyDim:=WH_y;
, ~& t. _9 s- L0 |( c+ u0 I. x Obj.ColumnWidth:=3;
! R% x# r X7 |7 Z/ f next;# v9 Q" Y* r b# F/ u9 ?, A- j) |
( ^/ t7 ?$ u- l5 [3 w .Delivery.MUs.Forklift.speed:=2;% U: M3 j9 @: K' d a, H
WH_var.delete({1,Part_Nums+1}..{*,*});
" d7 E+ l" z3 u+ I/ b3 D5 }/ J for i:=1 to Part_Nums loop
, K) @4 A" d1 P& {4 k4 u WH_var[1,i]:=chr(64+i);8 H1 E0 V' {( i |! U2 t) [
next;$ P! P0 @& ~+ V/ e; c9 W& r0 ]
end;! L, ?+ h0 L% R0 b
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了 8 F/ |- `% @8 K. {5 n
6 D9 f# d0 e# d2 s `8 C3 L3 A' K
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|