|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。7 h b/ n- ~/ n5 }+ E4 A) F7 C8 h
语句是这样的
! o. @" Y; R; S/ ?& `+ }% K( Lis/ V: Q7 a. t4 {5 M2 o- a& Y
i:integer;
/ D8 m: x- T1 X! F0 Y: y. M C. I Res:string;3 w# S8 I1 Y9 H- H6 ^
obj:object;
$ H! A+ u- k6 K- Ndo3 y% r% V' K! n% p. ^9 b }$ Z0 M
if existsObject("Status") then
5 i' e9 {0 i$ I, B$ X; c Status.deleteObject;4 `; E4 r* @# z O
end;! \4 R3 `8 z7 M. r( C+ C$ n
for i:=1 to 10 loop" V+ S4 H& v! R- i$ @9 B- n
Res:=sprint("Store_",i);
. n. |* a2 X) Q2 L- | if existsObject(Res) then
# J6 U6 v7 j" T& X' j3 b& S$ j) g- z9 } Obj:=str_to_obj(Res);
; o g. z+ J2 C, `8 }1 | Obj.deleteObject;- y) w" q Q) f/ I" k7 W" C) o
end;
4 F* P& b$ L* X6 I2 y: w' Z next;
2 O5 z; V& j* R$ c --shengcheng Status:zimoxingceng0 Q+ x% u3 H0 k7 X4 [; T
Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
( |$ R1 _% ?+ c1 }$ o1 O Obj.Label:="warehouse status";
0 u! K. {0 K4 o1 Q3 _ z6 n . x5 p) i" N5 K9 o" h# ^% ]
for i:=1 to WH_nums loop
; Z% `4 g9 }7 j/ G5 M Res:=sprint("Store_",i);
. u, ?4 t( C* q! R. ]1 M& H' q' N1 h! i Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
! v/ U( Q% I! W# Y Obj.Label:=sprint("huojiaceng:",i);
* J) E& Y$ u! L# F' u$ q. A! D5 g. }3 } Obj.xDim:=WH_x;
6 A l6 A/ |% C+ f# i- k; k Obj.yDim:=WH_y;
7 q0 O7 P( G6 p( I" q9 Y Res:=sprint("StoreData_",i);- F( G% C$ P7 {( k
* c L$ _7 F+ Y* n m
Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
: Q9 d: h/ S% L9 d; ?: m0 K$ |) X Obj.Label:=sprint("huojiaceng:",i);+ f5 o4 d* l2 O) Y( }0 A! r
Obj.inheritFormat:=false;$ y& p4 D4 b* m* P9 l' P% K1 F
Obj.maxxDim:=WH_x;" i" S2 j! z7 g) L
Obj.maxyDim:=WH_y;6 s1 H3 [# C3 K w" ^
Obj.ColumnWidth:=3;$ T H3 Y2 L6 j3 z. k0 l
next;5 ?+ }8 X& @% n. v9 \
! P2 Y. P8 d8 P .Delivery.MUs.Forklift.speed:=2;$ k# k1 m) q9 \8 }0 C- K
WH_var.delete({1,Part_Nums+1}..{*,*});
! ?" Q# e+ s* v( {* p2 I- E for i:=1 to Part_Nums loop
3 F: X- w/ H5 X5 c WH_var[1,i]:=chr(64+i);( t Z& S" D9 i
next;; c- r7 Q" }& N7 O0 _* U
end;( B& {& T! u# f$ p" c- @% \
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
p& B% r, _; o
# |; M! i0 _8 O |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|