|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。, \# e8 c# \. R
语句是这样的% s9 Q# P$ u$ o7 X! w; y. V
is# a+ s4 _3 F; C1 B/ q
i:integer;
8 R. P5 N! a( }1 E [ Res:string;$ E( m' d& t1 L/ }: |5 a9 r
obj:object;: _- x3 A t6 w8 c* q
do; T2 x6 Y9 i2 r+ D+ ^
if existsObject("Status") then
0 b' z( G5 ?; U) d# ^ Status.deleteObject;) _' {& d0 e& Q1 n9 ~3 m
end;3 _: @3 M6 c2 A$ i
for i:=1 to 10 loop
! u M; L! x% D, M" ] Res:=sprint("Store_",i);
. l& W+ }$ D0 G: r' o- \ if existsObject(Res) then
$ G9 J9 C( V) g, l% a$ ? Obj:=str_to_obj(Res);
+ x/ d& t+ u. n- r+ A/ z Obj.deleteObject;# k( B7 z4 L3 g2 @; k& z) P
end;; i5 Y/ b/ K3 I- n2 B, x: N3 N0 {
next;
1 G; j* U- p* |( `! k3 A --shengcheng Status:zimoxingceng$ P. D3 o0 T" M+ Q9 ~! a* b( M
Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
4 X6 o y4 B* t Obj.Label:="warehouse status";& ? M5 @; Q: f( S3 h
' V* W. J0 l8 o0 m# C8 d4 T) } for i:=1 to WH_nums loop
- w3 `: w9 }2 x6 g6 o: a5 [ Res:=sprint("Store_",i);+ j% A; K f/ T5 a4 V
Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);" m: d$ z( O- l m
Obj.Label:=sprint("huojiaceng:",i);/ h% q- p1 n* H
Obj.xDim:=WH_x;
& [- @. ?) h9 |% ]9 h+ l! T Obj.yDim:=WH_y;& p) a+ N4 Z6 l. Q; x1 L& O. i
Res:=sprint("StoreData_",i);
* u0 b l2 W% ]7 n) f7 h
# h, U0 i& S* p* y Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
4 V% \$ L6 G: N1 O" u Obj.Label:=sprint("huojiaceng:",i);$ \! q/ P, ?0 x; ?
Obj.inheritFormat:=false;# S. x! H- t) `$ _1 B$ ?7 _' b* K
Obj.maxxDim:=WH_x;
. {9 c1 F$ `4 K" E) K Obj.maxyDim:=WH_y;
2 z2 h$ }9 b3 U2 [3 d6 U Obj.ColumnWidth:=3;
6 @ I- L. ]' ~1 G next;1 S* O y9 J' g+ O) s
! f4 L9 X0 O( M5 ?
.Delivery.MUs.Forklift.speed:=2;* m) z, _8 f! c
WH_var.delete({1,Part_Nums+1}..{*,*});- d6 g, b: N: B4 n( H; {! U, v
for i:=1 to Part_Nums loop! y7 \2 _& \, {6 k. f
WH_var[1,i]:=chr(64+i);
! e) @7 b- V$ z next;1 H+ g3 L) w, x
end;
4 K' o) X0 N3 a5 Z! M出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了 0 H5 x. Z$ Y% I" l: L
! y& V8 Q1 J7 X
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|