|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。# J9 k$ d0 @4 o8 C
语句是这样的; b1 S% r' b! i0 `* |
is
9 d8 l% p( m9 w4 W i:integer;) A8 _- N1 F9 s3 o- Y, g8 o4 v
Res:string;
* S/ j; u$ g2 E' _ obj:object;
% h9 ~; k7 U5 F' R7 F4 e t& Bdo; t1 H# Y5 z/ q
if existsObject("Status") then: P, d2 [) f& b) d
Status.deleteObject;
2 u$ w* u: ^) ], O1 K* r end;
2 x6 e0 C+ O) F7 V for i:=1 to 10 loop9 u' B+ v5 [ I1 X
Res:=sprint("Store_",i);
$ p8 X/ L) E1 l- ~' h/ q; w if existsObject(Res) then
9 h) A- G" t% j! N) _ Obj:=str_to_obj(Res);
9 H. }+ S: p/ P6 N) i6 q Obj.deleteObject;
8 z( _3 J$ R5 a% @ l end;' M* z+ H+ C5 j! n6 M/ ~* w3 ?+ R6 K: P6 v
next;& L) E1 q. h' C3 M. y% f
--shengcheng Status:zimoxingceng
3 A* k6 _7 s+ C" T5 ^5 i Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
5 O) A# h* u @ Obj.Label:="warehouse status";
9 W1 B4 @' h/ g3 p! L3 v, Q ' _) C& ^/ Y K* B C$ y- @0 G
for i:=1 to WH_nums loop; |1 f* Q6 y- X: Z
Res:=sprint("Store_",i);
% d4 Z6 O8 [6 N7 q. t/ n8 D2 O Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
: l0 k6 o, m. Q4 h! m+ C7 n% @ Obj.Label:=sprint("huojiaceng:",i);" O6 B. Z+ h% e% Y0 Q" y9 x/ [) p
Obj.xDim:=WH_x;
. G* P% y# x. |0 U1 X Obj.yDim:=WH_y;
3 c* T8 {1 d/ g6 v$ Q3 x- h. m( d Res:=sprint("StoreData_",i);9 @) K* Y0 p+ j% c' k3 L
) V# Y! h5 Y4 i
Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
# s& C: o9 e/ l- ]4 Z/ @" l( I Obj.Label:=sprint("huojiaceng:",i);
* [* s( b0 w% A! L1 H/ ?# Q Obj.inheritFormat:=false;
5 }; D. Y' V9 d [4 k/ \! n9 | Obj.maxxDim:=WH_x;" ~9 l' f; U9 F* x$ {
Obj.maxyDim:=WH_y;
. m' N6 I# {- c! j0 d% @6 z- W Obj.ColumnWidth:=3;$ d$ o2 y i- J% C1 F9 L5 F6 V
next;# F* ~/ l0 a- ^' T
3 B& r. `* i$ b .Delivery.MUs.Forklift.speed:=2;
) p" }4 g: T7 _0 ^$ L: n' v' r6 f WH_var.delete({1,Part_Nums+1}..{*,*});& D. ?& H: D3 z! w) m
for i:=1 to Part_Nums loop3 F/ |9 R9 w" h
WH_var[1,i]:=chr(64+i);: S% U2 _/ V4 j/ j4 ]/ Y! d
next;
6 e8 W/ s- o+ l# {" ~1 ?% N( b* Yend;9 q! f! N( a+ W: P4 i9 n
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了 8 U! R9 [& @1 u; k1 s- y8 k# c
+ H" D& W7 w( `( W6 X |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|