|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
4 `6 R4 t* `8 A; Z& n语句是这样的' C1 _) S5 I) O- V" x: u$ ~3 I2 f5 h
is
% r8 ?9 f; }; w" j' H( _ i:integer;
! d3 {, D; L" ?7 a( e1 F7 k# T7 G Res:string;
: K" }1 z( k3 p( X. D# [2 w; m obj:object;
7 K# _; D; `: p( F. W f0 Odo
# o7 ^* \' U% ~$ X. p if existsObject("Status") then* L7 Y! S" A( _0 H. [
Status.deleteObject;
& m* D& M4 \9 P' D8 M9 C( S end;3 b2 g. [/ J$ K! |
for i:=1 to 10 loop
$ j5 u) E8 |" ^. B, L Res:=sprint("Store_",i);
9 @; ^- m. z$ i if existsObject(Res) then! Z! m0 U$ p' P7 q1 r; [6 [, w( e
Obj:=str_to_obj(Res);
$ P3 z% o: q: g Obj.deleteObject;* R) k( V3 j8 H' ]0 A8 ?) B& G& q
end;
) V2 X1 |9 \7 g next;( |6 G- E9 ^4 c8 l
--shengcheng Status:zimoxingceng7 n$ b$ C& \( f- x
Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");. C4 c- Z: x9 O0 K5 Q% g- U# ^2 T
Obj.Label:="warehouse status";/ N& {" V( d7 G# }
- M' `& [" c% D) @: Y' E# c for i:=1 to WH_nums loop
2 `% @' m' u; n9 n |2 z Res:=sprint("Store_",i);6 h7 p! O2 A6 q9 E& k3 A
Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
, _! v6 f( E" q) z5 J0 w Obj.Label:=sprint("huojiaceng:",i);
( M5 Y/ V/ Y! b Obj.xDim:=WH_x;
7 O Q3 h1 O' C) d2 h+ `( B" f Obj.yDim:=WH_y;* W- L1 j; `: M1 f# g& q0 _* U6 U# \
Res:=sprint("StoreData_",i);) _* L/ W6 d7 u O A. J* z' n K
3 f, A2 V, x7 R6 m( }
Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
; I- p3 ^/ C" ]# \ R9 i. @9 X Obj.Label:=sprint("huojiaceng:",i);
; R5 l6 n1 h! e$ F# s Obj.inheritFormat:=false;
7 H0 y8 }7 a" M$ Q Obj.maxxDim:=WH_x;
! S* b7 `) _; b9 ^: u% C Obj.maxyDim:=WH_y;
) ]/ e- y" V3 x, H; _# z! Y) n Obj.ColumnWidth:=3;- F% I' ~! {# |
next;
( i l" z/ W: M( n4 X
3 S6 [1 z- q! z0 Q2 d! i+ Y .Delivery.MUs.Forklift.speed:=2;- ~# c& F6 p+ o7 J5 x. k; o+ Q
WH_var.delete({1,Part_Nums+1}..{*,*});
$ m! m0 l/ r" R: _) E g for i:=1 to Part_Nums loop
# S N, }" e' d; N WH_var[1,i]:=chr(64+i);
* H( z7 \: \( z$ O next;+ t" ^5 I4 m( y2 N( c
end;' }6 t8 |. m: y5 l/ _2 ^& @& `
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
: O+ `( p5 E7 ~! _) L/ S2 [) K, S& e
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|