|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
: z) L# h# H; M1 m6 Q语句是这样的) t$ L' P8 \, D
is, T: _$ n0 P1 b
i:integer;$ S* @# c' t. p4 r! O
Res:string;
0 W0 r: d3 \+ Y$ C8 R; C* @0 b obj:object;
9 ^' [- e1 X: \, B6 K4 Fdo A6 x% a/ N) k# \0 K9 a
if existsObject("Status") then
+ I2 @5 S5 a* W. r Status.deleteObject;* [# |1 w ]) J# p) [" d- J% Y+ N
end;. d* p, R. G2 q }% N* ?
for i:=1 to 10 loop
: ?# ]7 O5 F. ` Res:=sprint("Store_",i);( o0 O* ^& ~4 W( A8 a7 v6 N6 o Z( o5 v
if existsObject(Res) then
+ l6 y! n8 d, u: R% a0 I4 p9 Z Obj:=str_to_obj(Res);
" i0 B5 p- R$ X5 p0 e2 B& x Obj.deleteObject;, r$ j! B; r! S+ F9 J7 H F6 Q
end;5 G* e% ~ |- A9 h
next;/ H# b* {+ j# \7 B* E
--shengcheng Status:zimoxingceng
6 y: Y8 A" ^' D( L$ O; o( S Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");; L) E/ v# t: X# ~* l
Obj.Label:="warehouse status";
$ V2 Y9 R% D, @/ j0 h3 j4 Z# d & K; p8 K. @$ S" E2 c8 P
for i:=1 to WH_nums loop
5 ~- C7 ] I8 X5 C Res:=sprint("Store_",i);
6 T. M* {, Q$ ^. q& Q Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
4 |8 |+ b! O9 x* A" f B) ^9 j+ v8 P Obj.Label:=sprint("huojiaceng:",i);
1 l4 i8 h2 O1 `* {$ @ [7 X Obj.xDim:=WH_x;) }4 V5 D) r( ~* ^
Obj.yDim:=WH_y;
1 y* ? O/ S3 \' T/ J0 f: H) G" I$ h Res:=sprint("StoreData_",i);
- S( e. W% ]2 Z' H4 Q! C, y* R z: m5 t# e- W% R: \# S0 S: z
Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
; J7 w+ Q' u4 t: ?/ v: R Obj.Label:=sprint("huojiaceng:",i);
4 m0 V+ m( b6 W: e$ s$ T+ I Obj.inheritFormat:=false;
( E/ p5 _9 ^4 J, q! | Obj.maxxDim:=WH_x;' X' \ Z [' y: `# j7 [( y
Obj.maxyDim:=WH_y;" g1 }* D+ [) e0 |8 N( l, s
Obj.ColumnWidth:=3;
. y3 N; y( Z8 N' p next;
# l& y( e& O( B4 R 7 I4 Q ~) N* L+ K6 Q$ }6 o/ j
.Delivery.MUs.Forklift.speed:=2;% w0 x J8 `; S+ o9 @9 Y; q! o
WH_var.delete({1,Part_Nums+1}..{*,*});
! }) h1 g* z5 w2 j+ n" Q for i:=1 to Part_Nums loop2 ]( U4 r# ~9 Y2 W& M: k Q
WH_var[1,i]:=chr(64+i);5 b* ^$ G. Y4 [* K& _
next;
& h v3 W- T; l6 K2 _/ Send;
8 q; ]1 y# q9 m( ?1 U1 V出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
, k0 F q8 c9 ^% F! C9 ?
& A/ c" ?. L$ \, m9 \ |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|