|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。1 O7 |! x% `" A% B. w
语句是这样的7 i- H9 H5 T1 ~6 z! d, K7 w' T/ v
is0 }6 M0 U- s) {7 r, o
i:integer;
* ]9 z( g {( P Res:string; @6 B5 K$ N- K+ K. j+ I
obj:object;1 E/ p( \7 h- V: W) K
do
z4 @; }$ G, _- j6 q if existsObject("Status") then
0 V' \/ U9 `5 F# [; @% | ~ Status.deleteObject;
( w" l) N0 H6 U' ]& O, r end;' }8 T: B" e; K9 [% u# p7 b* q
for i:=1 to 10 loop
" m- n3 y8 b% @. v% q Res:=sprint("Store_",i);0 N. `5 l$ w) {
if existsObject(Res) then
, R$ R9 [) Z, e; h. ~- k# i Obj:=str_to_obj(Res);
8 U1 N# J0 |6 c' u Obj.deleteObject;
$ `% c( j9 N/ Y9 T8 G$ S end; K' u) P* h, h6 h/ F* [! k
next;
& t- b8 f V, O" ^5 T --shengcheng Status:zimoxingceng
7 T! T% O' h+ H8 U+ t) v Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");6 P2 c% D' I4 h7 T/ o# c8 r( y& J
Obj.Label:="warehouse status";, h$ S0 J4 e1 Y. _6 d2 Y
% j" g: Z# r; U4 A; M# |
for i:=1 to WH_nums loop( ]/ C# F1 P1 b& k
Res:=sprint("Store_",i); g! }& t, }1 V' b' l% |5 M( i" Z
Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);8 O" P7 Q6 e5 B
Obj.Label:=sprint("huojiaceng:",i);- p* V- {0 v. _. J( L
Obj.xDim:=WH_x;
9 r$ g- \3 \& M& l; R8 p& d Obj.yDim:=WH_y;# m+ N3 R8 x3 z2 @! F: s
Res:=sprint("StoreData_",i);
& p2 A1 E6 e2 c/ W& _' f ( T0 H8 ~. i8 m' {' A+ S( q5 ^
Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
9 ?& }/ x, }# f) F1 S Obj.Label:=sprint("huojiaceng:",i);
+ e. X6 x+ o. C9 J' ~' b7 s- X$ K Obj.inheritFormat:=false;& M2 V: d2 u7 `) j" V
Obj.maxxDim:=WH_x;
3 c2 C7 L- x. b( r# u% t Obj.maxyDim:=WH_y;' x$ T; t0 r, o' P& U7 e4 v
Obj.ColumnWidth:=3;
( |8 @+ z* g/ @4 c) H7 }, ? next;; V! ^' S" q+ _; P' r
4 i# |8 K1 t/ z: g' T% T+ A2 o, y .Delivery.MUs.Forklift.speed:=2;
- ?$ {" c$ j# q9 l; M1 m WH_var.delete({1,Part_Nums+1}..{*,*});
3 I* i3 }- A( T1 W D1 x1 g& n$ H for i:=1 to Part_Nums loop
4 f' b2 @9 e" N4 ~ WH_var[1,i]:=chr(64+i);
5 p2 O% ?3 d0 j2 }. S next;# n. c8 _# | x ]5 x) c+ F
end;
" h& t4 `( F3 d& C6 i' z; K! S4 I出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
) u1 k9 s7 v; q3 x+ y, \) @& s
* |% p' A# M- o1 L9 K# l# M* A2 q |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|