|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
; e. |) `( T; L语句是这样的
8 {# X# s% N: r/ B4 Cis
! ~7 J8 \- ^9 E* \1 g2 p4 R8 F i:integer;- N3 c) H: X; N
Res:string;/ F9 \+ T4 N0 ?: g
obj:object;
6 P3 Z2 j# {- vdo
& H8 ^5 y. M" r# U+ w" e: q0 x if existsObject("Status") then# B& A: h& u- n
Status.deleteObject;6 I" j9 p( [ ^* y, C
end;
# E t% D! N. P* | for i:=1 to 10 loop% j6 \" l' }' h8 S2 @* B! |7 z( v7 i, H
Res:=sprint("Store_",i);' L1 ?; _6 n) w3 |
if existsObject(Res) then
( l q8 w* b7 @1 R Obj:=str_to_obj(Res);
: e* Q1 b0 L9 k8 H6 u1 U- J Obj.deleteObject; X' E8 W. c$ |3 |0 m# P' `
end;
0 y" L! @5 H2 \, U0 F. \/ r next;
- e9 W8 y4 u7 X1 E4 k" D3 S+ S --shengcheng Status:zimoxingceng! K6 l5 L& M5 O& O
Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
9 q; ~$ O. y1 [8 N; \; U8 l' u Obj.Label:="warehouse status";
& V9 {$ x7 G) p& c/ U1 Y# g
0 |3 l5 G) \! o/ G2 W3 ?$ F for i:=1 to WH_nums loop
* ^3 m2 L5 Z7 P* ` Res:=sprint("Store_",i);
7 h% D. H0 @2 X Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
8 a6 x% j6 m: n1 [! E2 V- L/ h Obj.Label:=sprint("huojiaceng:",i);
9 A. G8 S. C) g7 x- v2 q Obj.xDim:=WH_x;
3 V& _+ L o4 E# e! \ ~ Z Obj.yDim:=WH_y;+ C3 D3 E8 W0 {) p' X
Res:=sprint("StoreData_",i);
8 d6 ]$ \# Q* w; W; \6 p
! t/ _, D$ \$ f$ T+ v& T Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);8 U$ [( N. D$ }( |" J i6 T0 j
Obj.Label:=sprint("huojiaceng:",i);
" k- c1 W9 D& S& l2 N Obj.inheritFormat:=false;
/ Q: s& X# S* ?) f/ g5 O- K9 W Obj.maxxDim:=WH_x;3 D% t0 |9 {+ z" N
Obj.maxyDim:=WH_y;( I% ~3 g$ f' t9 K
Obj.ColumnWidth:=3;. f+ ?% @: y) m; O
next;6 t; @; }8 m4 d; i
) u, k' ^0 a; p) g7 h' s .Delivery.MUs.Forklift.speed:=2;
/ ^& [' A' g9 `1 c1 B1 W9 Z4 u4 t/ r WH_var.delete({1,Part_Nums+1}..{*,*});4 W( [5 ?, w6 ^$ _: {1 [
for i:=1 to Part_Nums loop
2 F# ~1 {7 q! y! j% Q7 F) a) T0 E WH_var[1,i]:=chr(64+i);
* D8 r3 V: b, O3 c( S, N9 \+ R next;9 D) V6 L1 D, J7 Q6 T7 s7 Q
end;8 e" \8 [- M/ v; o
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了 0 ?6 r3 N; W6 Z8 [8 C
% |/ a- R& o% m i& H" W% N' a8 f6 A
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|