|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
0 G Z9 y q. J' F h$ m9 S$ V. V语句是这样的
- M; | X( I* P4 j- Mis
7 b; g7 ^1 S- e% x$ K! O i:integer;! Q/ N4 l Z5 |. f; t
Res:string;& |; _( i! p/ [' ^. a* [3 ^& L. m
obj:object;
8 j i+ B0 D$ ]8 tdo" ?& E4 {' c' R. ]5 u' P) p$ D
if existsObject("Status") then" B% r* L. D7 q
Status.deleteObject;
$ n$ t7 ~% k( v end;* B1 N% z- u2 s1 a$ a7 x) K* Q
for i:=1 to 10 loop2 W b. P6 E: x
Res:=sprint("Store_",i);
* ^% H, G2 R- G) d if existsObject(Res) then5 W4 M" I- E" E8 [
Obj:=str_to_obj(Res);
0 ~: ]& G1 F5 S- u3 Z Obj.deleteObject;2 m7 ~$ l0 t/ V$ H+ h# g# a
end;
/ K$ R0 p/ x2 r+ M& M8 o0 ] next;
9 ], w' q0 o. b --shengcheng Status:zimoxingceng
( E5 P, a7 k- \; w! F Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
: {; s# U7 p, f Obj.Label:="warehouse status";
2 m! K5 g- A' f; D4 p 7 c8 E# {3 ~7 s3 C+ w; |
for i:=1 to WH_nums loop
: C$ q$ b( {1 O: m* O2 ^ Res:=sprint("Store_",i);
, x; G8 V$ e) l( C4 y+ N Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);- Q* Y6 Z5 C- ^. g- N @4 V
Obj.Label:=sprint("huojiaceng:",i);( z! u' n( h7 ^* R
Obj.xDim:=WH_x;1 x B8 Z/ c8 Y. I# I: U& l7 z( L
Obj.yDim:=WH_y;
+ m" @1 W( e4 b" E: a, o/ | Res:=sprint("StoreData_",i);
1 t( v& p9 I, d0 q, s
2 N2 _4 o3 _1 Y9 n7 \' p( ~, r Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
/ L0 m6 U B7 o/ B Obj.Label:=sprint("huojiaceng:",i);4 T0 g# L1 g/ ~/ t4 J. i
Obj.inheritFormat:=false;
) [& `/ L8 X6 Y0 L7 F1 p4 R# l4 o6 g Obj.maxxDim:=WH_x;
# c/ ]6 e: e5 L& c# _ Obj.maxyDim:=WH_y;& N! L q: D" F& G5 f$ m$ ~ _" O
Obj.ColumnWidth:=3;- V$ _5 `" e, o# y4 {& r# D( t8 c
next;5 H0 ]( b: i/ `' N% Q; V1 p3 j# l
+ }) y# F" O/ m# v- E' g9 v5 b4 x
.Delivery.MUs.Forklift.speed:=2;2 x' [) f. g8 C
WH_var.delete({1,Part_Nums+1}..{*,*});. V$ y* f6 j% D: P, T. d
for i:=1 to Part_Nums loop
1 t) L: \! W% |) x' J+ i$ o WH_var[1,i]:=chr(64+i);7 t6 Q/ x, u/ a
next;
" k/ s. B9 w/ f6 ~9 W6 A5 tend;
. e# |* k+ W, c/ e x! L出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了 8 d. E2 J p" q4 J2 m& }
. N+ i& o# C% @9 s$ J u |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|