|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。4 L+ L7 @8 L. \1 Q
语句是这样的6 w( D2 e8 k3 Q
is
& O5 k* P6 X1 ?) l0 L3 z D) \ i:integer;! p# a0 {6 D( M
Res:string;
* { e1 D: ?" K; J obj:object;3 p6 p9 {, a# S6 f, @+ G! H
do
2 T3 V. I& \7 R2 h7 r" w' O if existsObject("Status") then9 A; Z) b: z; [8 a
Status.deleteObject;: A2 m: ?+ x7 d
end;
& Q9 y/ Q3 O9 y5 R: F+ B. x. Y for i:=1 to 10 loop, R3 ~2 a* ^# h% \
Res:=sprint("Store_",i);
& A `( K/ Y! O# u( F$ h if existsObject(Res) then9 P1 A% a; @0 u7 X
Obj:=str_to_obj(Res);- `; L; K. q: u s: Y: Q+ y! J
Obj.deleteObject;
4 S3 C% p2 b8 c( k0 v# Y, y# Z end;* N: M1 N1 G3 t" s. l
next;& q8 C, J- x; H g: }! [# C) G
--shengcheng Status:zimoxingceng
& h8 n6 U* `, O8 W5 F Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");, U! [& |. A( x d! W0 S
Obj.Label:="warehouse status";
8 n8 K1 b$ o# I) u' @8 M5 f 5 \% q" e% K" [4 }' e: T" K; m
for i:=1 to WH_nums loop$ O5 L# b, \! s; S( Y* f) v
Res:=sprint("Store_",i);
, t, L1 n5 d# z5 \ Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res); r* N" r7 O' s1 Y2 g/ j
Obj.Label:=sprint("huojiaceng:",i);2 K6 z; @1 a9 X' G7 X
Obj.xDim:=WH_x;6 f' ^' [& W* P/ o$ z, a4 p
Obj.yDim:=WH_y;
% d. H) I' e3 R) l( x Res:=sprint("StoreData_",i);' ?4 V: g% W) S3 O
+ @8 r" ` @, V1 F) s
Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
( g% m) r% z1 o q- Y Obj.Label:=sprint("huojiaceng:",i);
% {7 v- R6 {% `" p/ w& z u9 \ Obj.inheritFormat:=false;
' q1 R5 ?, @" E, F8 |) }' t Obj.maxxDim:=WH_x;' P2 F$ q3 B3 |" K2 k S) o( `4 |* k( K
Obj.maxyDim:=WH_y;/ _. a$ {( ^4 r/ a2 s* z
Obj.ColumnWidth:=3;4 g+ Q2 b1 l7 v& h' d4 e0 G8 k
next;
- L- X p6 ]5 K 4 ~1 x* u; u1 Z9 u7 u1 [# F
.Delivery.MUs.Forklift.speed:=2;/ j- u; b% J8 e9 l/ ?! T) I
WH_var.delete({1,Part_Nums+1}..{*,*});
6 L. b! ?2 @5 ?( l' E" a& B! \3 q for i:=1 to Part_Nums loop# v% f* k% R. v \& }% M" U
WH_var[1,i]:=chr(64+i);, z v+ ~# o3 b4 i" f( B
next;3 h7 ?. r( g7 g7 `8 l H
end;
5 G8 W2 S- M( \+ ^出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了 0 y; ?, r5 X- G) J4 U0 c
( z& t7 [5 F4 l
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|