|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。: I; k+ w7 W4 c$ G! M1 }. q
语句是这样的1 M& l; l9 \: f( V* z. w3 k
is0 H8 ?( \4 N" s( X
i:integer;
. X" f& t! i9 Y1 }6 @. I1 B Res:string;; a4 q$ p1 }% X3 ~% M$ `- Q
obj:object;8 G# ~7 z* c/ A1 s
do
$ w0 D. l ]5 w) h7 \ if existsObject("Status") then
6 J$ i3 E$ t- ~; u" d. _3 a: L: @ Status.deleteObject;
( ~5 s" | @+ O. }. `/ p end;
+ ~) @; l, \! x: Q% F" b for i:=1 to 10 loop
# |" h! A( F: a4 x- q% M5 U7 V Res:=sprint("Store_",i);4 L8 e2 J/ Z: s* k- Z
if existsObject(Res) then j( A% P8 [" l* _2 {* \1 E3 H" S4 |4 Y
Obj:=str_to_obj(Res);
; W% f7 l0 h' ^: u- C$ k9 q Obj.deleteObject;& m0 O# O2 K0 W% }" o5 y4 O( c# C+ k
end;
* u5 L7 ?/ h( H4 P next;
3 J2 u4 @ G! i2 o# [' l --shengcheng Status:zimoxingceng% Y4 Y- |+ G1 ^/ z3 D
Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
- l# M7 ?7 J- Z$ m6 ?7 O( E Obj.Label:="warehouse status";
& h; i# p, G+ N% A, U ( [ X+ E3 _8 g! ~$ L( w
for i:=1 to WH_nums loop. g; ]4 b8 q" z
Res:=sprint("Store_",i);
4 H: M5 r" c5 ^" J: S/ L: D) D* y Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);, x3 j8 K' o) X$ U* Z$ C q; ^
Obj.Label:=sprint("huojiaceng:",i);* u! F9 z6 j; o' T& O- C; F
Obj.xDim:=WH_x;
) C' B7 O" Q& s* T9 ~$ q+ @; v Obj.yDim:=WH_y;
% c7 l7 T. W A Res:=sprint("StoreData_",i);
8 Z7 r* C. u( k
6 ~$ w. R/ r* W0 F* E9 m3 F Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
% r3 A0 h- s; [ Obj.Label:=sprint("huojiaceng:",i);
) \7 {' d# K( U- { Obj.inheritFormat:=false;7 @5 h3 D: \, f* C3 P
Obj.maxxDim:=WH_x;: k+ H% O7 y0 Z) h: R2 K. B; I. j, U
Obj.maxyDim:=WH_y;
# S: M9 }$ C& [2 F0 a- q% n( F Obj.ColumnWidth:=3;6 ?; ~9 d- ~+ z$ K1 t: T) q% | Q
next;, J) u4 o8 N6 d% [: h1 h
1 k# M1 ?8 X% }% r, ? G
.Delivery.MUs.Forklift.speed:=2;- o) m) {+ _# t: a6 e. n2 _! A
WH_var.delete({1,Part_Nums+1}..{*,*});( R! q5 Z9 w& Y, o
for i:=1 to Part_Nums loop
% p6 ~: y0 b3 x! b+ f; }) \8 T# p WH_var[1,i]:=chr(64+i);! l) {" S3 ? T& _( s2 ?/ N2 g1 z
next;+ V/ X% [" z$ M9 d
end;3 f$ i8 G. K) m/ p, I
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
8 R6 r+ K8 e3 q
" i" `, h) _' z8 c r3 U5 i |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|