|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
2 d6 t, |3 P2 T* b2 a% }9 H' l语句是这样的& ~7 R0 U% U) v d, R. z
is
; d7 A. r. S$ {, [1 F i:integer;
2 @6 M) S! Y( E Res:string;
6 Q+ x" [! Z# y* A0 a( I obj:object;
( `8 s- S0 [: p* H& A rdo
$ @3 S3 U! f2 b if existsObject("Status") then
7 @ w" O+ o9 J+ H/ U5 x3 P Status.deleteObject; i" V0 H I* I2 n0 Z
end;
% {9 b/ Z2 h7 b0 ~# E' o. R for i:=1 to 10 loop% q0 ~ {+ y) x% q! g/ C
Res:=sprint("Store_",i);
/ _+ F ^! c) _+ V if existsObject(Res) then
v5 ?% L" I! N8 q# B& F Obj:=str_to_obj(Res);/ I! P8 D! F3 k# c+ W* k9 t
Obj.deleteObject;, H4 _1 m3 y% d4 |0 h5 D
end;) k+ g% V; Z( x& t- l- Y
next;( L" M6 ~- V9 q; T/ a
--shengcheng Status:zimoxingceng
: x K6 W% s& Q# p5 m+ n Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
/ B E G) E/ f# \ u Obj.Label:="warehouse status";
' U2 [2 o# [* F5 H6 U. f 7 Z$ z9 `" c/ ^8 u
for i:=1 to WH_nums loop8 a. t$ b V* D7 a, W1 Q
Res:=sprint("Store_",i);- e9 z$ Y! H P3 K( J8 j' o
Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
3 r' O( I. I8 A( B r8 m8 n( u7 Z4 l Obj.Label:=sprint("huojiaceng:",i);# |% c/ S8 L- _/ l9 `/ @; R
Obj.xDim:=WH_x;: x) {' J) g S; \9 n
Obj.yDim:=WH_y;$ V) e* q* ]) ^: L- w
Res:=sprint("StoreData_",i);
/ _6 g! p# l" }( r& ~4 P . v }& L; o' D" k3 q9 d; k
Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);! o1 G6 [5 N( b6 |
Obj.Label:=sprint("huojiaceng:",i);
* t# s9 [% n9 I, n Obj.inheritFormat:=false;
9 W2 j- R' ]& _/ c Obj.maxxDim:=WH_x;. q7 x2 |. \* Y0 ^ s9 U3 P. [7 H
Obj.maxyDim:=WH_y;
4 E d% M6 P5 O8 A0 m% c/ I Obj.ColumnWidth:=3;2 T# |0 ~7 ^9 R% i
next;
F' Z6 V7 J6 U$ P' W6 ~# r* u- E
( p( W# l9 o+ C- R) r1 j .Delivery.MUs.Forklift.speed:=2;
, s$ ^6 {( ~3 ~ m WH_var.delete({1,Part_Nums+1}..{*,*});
0 K2 w _" {% T1 c; b3 N; _0 x for i:=1 to Part_Nums loop
" w, I2 u' F* X' Y9 \9 L WH_var[1,i]:=chr(64+i);
9 x% B. q6 n+ K; N, \' C0 k& v' E7 l next;
. B$ F6 _- U( M- v7 G# x( w; Aend;" }' |% ~5 h7 b9 q. B8 [% J+ e
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
7 u/ }& O9 M4 h( y
6 R4 ^/ N0 P' e. ?9 J1 ? m: l |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|