|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。: O; i. ] e1 o' ? t; e0 A
语句是这样的0 x7 U) v( T0 o5 J3 o
is
# I2 f y% y, h" G+ c i:integer;) x' J$ A1 q4 ]2 {
Res:string;
( b" ]) A: @4 J: g+ H obj:object;
' Q) j. ~6 |7 v' P k5 b( ~do
/ [( c, F k* p( J. e if existsObject("Status") then
' H" _# A& |1 B; J l% t Status.deleteObject;2 q3 Y1 e P' ~; {& M) y
end;
2 i# |! `6 k' i6 z* Q: p8 a) N for i:=1 to 10 loop
6 |! V h* h" {4 ~ Res:=sprint("Store_",i);
" F. s( q J! T1 v8 R a% Y) ?5 w f if existsObject(Res) then
( v* x. B% o* u f- V Obj:=str_to_obj(Res);
, y0 ^4 F2 L( t6 t- ^+ x8 L2 x Obj.deleteObject;: |3 v% B6 e4 \+ N8 f3 R0 l
end;" V, r- \; F' r' U
next;2 }! B: j. Z9 {% p9 m. [( H: N9 j
--shengcheng Status:zimoxingceng8 K; O% ~" }; I) V. _. ~; W' E
Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");! V6 V. U ~; F* R3 Y
Obj.Label:="warehouse status";
5 u' c- a4 V% e6 b
! f+ B2 q' [' f) x, [ for i:=1 to WH_nums loop
$ e0 i, N# N" y; ^9 F Res:=sprint("Store_",i);6 z. d( N7 ^: ~
Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
/ h5 C- e, ~! Z9 m J5 S1 ^, o d Obj.Label:=sprint("huojiaceng:",i);
' Z4 }3 r: N/ H- _. A Obj.xDim:=WH_x;
* S$ b1 A. @! f! M% D: H7 \ Obj.yDim:=WH_y;
5 ~" I1 t) u. {9 ?' p, ?) x6 z/ Q Res:=sprint("StoreData_",i);/ X6 f7 W5 k! k
6 V9 S5 N6 ~- v9 P( P; k7 t) r
Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
: w8 _; D6 \$ | x0 _+ O* A Obj.Label:=sprint("huojiaceng:",i);
1 `' \1 v8 D+ u. l6 H! h D+ E Obj.inheritFormat:=false;. R: d6 a7 ]1 B/ W+ p, y0 X# E) }
Obj.maxxDim:=WH_x;6 v& N. l2 ^3 {2 m2 @
Obj.maxyDim:=WH_y;$ ~! _- \% K0 a8 ]( [7 ?4 o
Obj.ColumnWidth:=3;3 ]3 O3 z* G6 w5 U0 \) c$ W
next;
, c' f/ M j _9 U/ G1 A
' p8 g2 c A8 F8 b& }* ] .Delivery.MUs.Forklift.speed:=2;
8 H& E7 |3 U/ w7 k1 w WH_var.delete({1,Part_Nums+1}..{*,*});& J2 m. g- ]% m8 ?8 P; w7 V! J6 a
for i:=1 to Part_Nums loop& P7 p& \3 ]9 i2 y& z& q
WH_var[1,i]:=chr(64+i);, t3 n1 n3 t- u- y
next;
; I k- Q% ~: U! S6 [end;
" A0 j0 U5 b: E出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了 ) \2 u4 j! j) y9 Q- h9 F- N
+ h! }$ n: b9 t$ \7 Y
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|