|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
9 p1 ]: X2 A7 h3 u: q2 S# Z7 X语句是这样的 {' A g/ R5 I0 W/ r, g
is8 U& n; _9 H- g C$ K
i:integer;
1 X9 ?3 i Y& d4 S- u$ ` Res:string;2 s( ~0 v) Y* i! E" c5 H
obj:object;
( W/ A, s$ N; Q* l: d3 J2 Q+ qdo
$ S8 i4 q& ^- B; D+ [7 w+ l3 c if existsObject("Status") then! ?$ y) r4 e' t* ]" c: i
Status.deleteObject;
/ G/ r* r8 P) w ]+ N9 s. ~2 J* V end;5 G) N, X* L' D; m- l5 ]7 d) Q7 {
for i:=1 to 10 loop) B, r$ T7 u: t3 _# ^! n
Res:=sprint("Store_",i);0 o1 u$ Q2 D& _+ B0 r- ~
if existsObject(Res) then
3 @( @+ v& f. j Obj:=str_to_obj(Res);' |! O5 N6 d3 s% I. \
Obj.deleteObject;9 M1 N0 D9 }0 l- D; k0 D2 s- |
end;* v h) M4 }5 m. U" n( U3 B
next;
6 |! d. Z1 B' b# r0 U0 X3 c0 u b --shengcheng Status:zimoxingceng
6 M; R! S$ f6 y8 ]0 N8 L Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");# u. e C6 i" n' F
Obj.Label:="warehouse status";- ~. {7 |- E/ m# ]. v
2 p4 [! \. r" z& x for i:=1 to WH_nums loop/ ^6 B Q( v. I6 J
Res:=sprint("Store_",i);( w9 R" Y2 h; l. d$ \% D% ~ ^
Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
4 F6 W$ [* J! H7 V Obj.Label:=sprint("huojiaceng:",i);
- X. s0 s, {8 \4 A1 s+ J Obj.xDim:=WH_x;
! b% ?' l4 ?6 L( D+ _1 w- I Obj.yDim:=WH_y;& D( E4 `1 ]0 N
Res:=sprint("StoreData_",i);
$ J1 f: T% d% H8 @* D, I) W d% X
! K7 z; w2 R9 P Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);; A, U" n. K. l; E% w# ^9 q
Obj.Label:=sprint("huojiaceng:",i);
4 w; b" S; M4 R6 P Obj.inheritFormat:=false;5 R+ V% O8 ]2 n, y# Z
Obj.maxxDim:=WH_x;
3 k) p- I- K( f) G2 C7 f- t7 A! E' r Obj.maxyDim:=WH_y;# v( z; n/ c/ x- i, X! \
Obj.ColumnWidth:=3;
7 g6 U3 g l/ K) K- f) R% ^ next;
, z6 J$ N& T% B( ^; A% S, |" z
8 x* ~- \! E7 j. ? .Delivery.MUs.Forklift.speed:=2;
. X2 ^, x! C6 a6 ?' _6 s$ e WH_var.delete({1,Part_Nums+1}..{*,*});/ w& Y/ g/ s& l( b8 S7 D
for i:=1 to Part_Nums loop
5 `' A1 Y4 q4 B9 H WH_var[1,i]:=chr(64+i);
+ H) D2 R* C9 g+ s* n next;
; _/ H# L# ?0 X) }/ ]) B3 ] nend;
! I0 V( v3 ]' o; p% x6 W出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了 9 [9 c! m6 w+ ]! E( z" H
( N! T) @: |) o3 g: X2 F1 s |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|