|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
8 [6 G3 J7 V" P4 R8 A; u! w" g9 k语句是这样的! w: m g+ x3 ~) R
is
% T8 U) ^) I- | i:integer;: B- r) P7 r- O$ P
Res:string;
* _; Q2 L! p! j' W# S. n obj:object;6 A2 k, K( J, ~% ^1 K1 v
do: R6 S" t6 i1 d* T, [1 {+ ^( F
if existsObject("Status") then( T; T# x; `3 X8 f% u( o2 V8 p* r- x
Status.deleteObject;. a0 j8 t; b% o. l# H5 C1 a" C9 o
end;
0 t% b4 I/ W; l) O for i:=1 to 10 loop
2 ]& `% w; p5 q$ n% i$ Z# B Res:=sprint("Store_",i);9 Z1 S, `3 z" A8 z; `5 W
if existsObject(Res) then) w! g8 F" i2 _
Obj:=str_to_obj(Res);
3 M* A( _- s. P! @6 I# _9 E Obj.deleteObject;! ~- w- N* M0 g6 A
end;$ m8 r$ W! t E: ] F ^
next;
3 L7 |) Y+ d/ k4 `3 \0 s( ? --shengcheng Status:zimoxingceng$ H& |3 |% }; C) p/ I0 i( C
Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
1 Z: L* c/ `) t. |( q' j7 Q4 ^: c Obj.Label:="warehouse status";6 G+ H) Y: | k% I8 I* Y
1 D4 S. [& L& d9 I for i:=1 to WH_nums loop9 K% V3 J& _4 T1 P: O A
Res:=sprint("Store_",i);
7 [' h1 x$ o0 t- U% H p Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);7 C' K1 e1 J3 p% |0 M. }. H
Obj.Label:=sprint("huojiaceng:",i); w- ]" K D0 q0 c7 j7 F1 x
Obj.xDim:=WH_x;
1 Y7 O7 ~8 N. ]1 | Obj.yDim:=WH_y;- ?- `7 G8 E2 c4 C# f, d3 b
Res:=sprint("StoreData_",i);1 r1 V/ d/ ]; _8 S, z6 L
& B4 z- |6 S0 f- v' ?/ s
Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);# }% B4 D" D0 u# [% N& r0 d
Obj.Label:=sprint("huojiaceng:",i);& [/ P" q; j" a8 q% b) n. h# D
Obj.inheritFormat:=false;
9 w& y2 i; S u1 x2 X* y Obj.maxxDim:=WH_x;
2 A; v# u n" g4 ^% Y' T9 B Obj.maxyDim:=WH_y;. t. b$ y, V8 f! \9 s
Obj.ColumnWidth:=3;
9 N; t* b" z; z next;
' @8 \9 j8 E8 L9 Z - L `( a. \+ } y" X+ h& b9 H
.Delivery.MUs.Forklift.speed:=2;
. B' f; B s! f$ w4 B8 M3 M! ~ WH_var.delete({1,Part_Nums+1}..{*,*});" z( A- E& w+ x2 X- o
for i:=1 to Part_Nums loop1 b1 T2 p7 J1 e
WH_var[1,i]:=chr(64+i);
2 {9 M$ d' v+ ?* {' f, m; H, z next;
* o1 V# ]( Y% f% b3 E) Gend;
" B5 f6 N# T1 X2 l7 B Z出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了 1 b; ~$ p4 w% z4 w" M8 `& _, Z
k5 d* c i! K' I& v: W8 Z' ~ |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|