|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
/ C7 o4 D( I C) v4 C8 e6 v$ o c语句是这样的2 s ^# U4 Y8 J# M# f* ^! m1 ~
is( T% L! A3 @ f+ Y% S+ {
i:integer; g" L, B4 H- P5 L" |4 z: u. q$ E/ N
Res:string;
- [6 c' M7 x6 c' a+ n obj:object;" Q0 ^" ]+ H8 H2 R
do
+ J. x( j/ d5 P/ U7 Y7 h if existsObject("Status") then
1 k5 g# Z8 h/ I# ]+ ^# | h Status.deleteObject;
' K+ D3 D+ K$ K) ^/ _ end;
& q/ H# j$ N2 g for i:=1 to 10 loop! w' ?5 c0 ^* K8 `8 O. F3 N* h. U
Res:=sprint("Store_",i);
2 _* _# l3 i/ L1 n if existsObject(Res) then
$ s$ o; ^: b+ N; _2 \ Obj:=str_to_obj(Res);; ?3 H$ k; P7 S. t& L: n4 Q) b
Obj.deleteObject;$ ~' x9 H' `6 H* _' j9 ?: b
end;; Z0 l1 H1 t0 v: g: a
next;
& `0 g$ o" G" G; T' j1 d --shengcheng Status:zimoxingceng
1 k0 v+ I/ `0 w& H0 _; C, z Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
% h' L2 A* f* I+ j9 [6 }( l: ^ Obj.Label:="warehouse status";# H) {4 U+ h: J8 d9 V* H, K
- W" O' E8 r6 [# k3 y for i:=1 to WH_nums loop2 {9 E( M7 n7 l6 j; T3 o }# v
Res:=sprint("Store_",i);
) ?( M2 J# m% h4 I- G3 ]0 R/ X Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);0 ?% U! x* }: R- ~
Obj.Label:=sprint("huojiaceng:",i);
% n; c' L- i, E# [ Obj.xDim:=WH_x;& j" C0 Z" q( L
Obj.yDim:=WH_y;5 x* p8 ` a3 Y. W( v6 T% O
Res:=sprint("StoreData_",i);
* R* W% V2 F, \' {1 X) d * N q5 i+ Z/ f& N4 Y" L3 F. y
Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
5 @; ?% f: b9 X1 \) y9 u Obj.Label:=sprint("huojiaceng:",i);
& L" t" V7 |( ^# t8 F- s Obj.inheritFormat:=false;0 H7 D2 D" X( R2 i
Obj.maxxDim:=WH_x;
% a" X& P9 c! W Obj.maxyDim:=WH_y;5 K& O; ], ^0 @* b9 d
Obj.ColumnWidth:=3;1 I( A& K! |7 a, U
next;
" c e4 I, Y! i" |! c & O7 S* E8 w7 k
.Delivery.MUs.Forklift.speed:=2;
) H/ o& s! t1 R5 n3 A1 H! N* Z WH_var.delete({1,Part_Nums+1}..{*,*});
7 M7 Q% V+ T; I* F3 ^ for i:=1 to Part_Nums loop+ Q* g5 b$ I# p1 b. B" p0 I
WH_var[1,i]:=chr(64+i);9 |# R1 V' R: D; _+ t
next;/ B6 S6 Z# m3 g- g; A% v
end;
' Q% G# y" m' ?8 b. `出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
$ q8 ^3 D' p" m
7 C+ \( \! p7 Y* M: k |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|