|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。, J( z: I6 u8 b
语句是这样的
0 R2 } w; m: ^" J5 X- Pis
* E/ ^" j8 a* ?- x i:integer;
9 |4 E, i: |( k- K4 `5 \6 c Res:string;
4 V, h2 A- v s2 f d# k5 k obj:object;
2 B/ B4 L! F* T- N7 O wdo
, Q% S% u; X( X+ m0 ^ if existsObject("Status") then! m: t# Q- t: E3 g( v6 P v
Status.deleteObject;) E2 Z" t" [/ U/ H
end;" `' R7 K8 d4 V5 O3 I6 Y3 n
for i:=1 to 10 loop# z B. U6 K ` j y$ ]& n. G. j
Res:=sprint("Store_",i);* ~' i& `4 ^" d3 i
if existsObject(Res) then
1 ?# K$ M, W1 Z$ }. W0 F Obj:=str_to_obj(Res);
8 h! A. g; L4 p' a( x" H J7 z Obj.deleteObject;
/ [ k7 b% r# U9 P end;
3 L: k) Y" m7 w# Z next;3 h B- _7 h) N9 {5 u
--shengcheng Status:zimoxingceng
" F: }! C! M7 n$ J* A/ ] Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");, n% t1 S) B$ L% f- H3 o
Obj.Label:="warehouse status";
# s3 v! j) g }& Z6 S
$ V# U2 O- ]- l$ j) O* \ for i:=1 to WH_nums loop
/ V' S) C. w4 i Res:=sprint("Store_",i);6 T8 G$ h' o w* n9 e2 s
Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);3 n2 N Q- V. e
Obj.Label:=sprint("huojiaceng:",i);
; `+ M! n# \+ M1 m Obj.xDim:=WH_x;) f% Y% `; `# c- V
Obj.yDim:=WH_y;0 u4 L! f0 a6 s( w
Res:=sprint("StoreData_",i);5 H$ ~6 |# E% X+ C6 _2 d4 F2 D5 t
9 [1 P! n* Y# l8 l' Y Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
/ @& ^: V; H$ T3 f* @ Obj.Label:=sprint("huojiaceng:",i);
. a; B: `) S6 z6 J$ v Obj.inheritFormat:=false;% @2 I" V9 Y5 Y4 G
Obj.maxxDim:=WH_x;' P9 q* H/ I8 h- } j- N9 K
Obj.maxyDim:=WH_y;$ Z, ]6 ^( U' m/ N1 ]) n9 O: @3 S2 {
Obj.ColumnWidth:=3;
' [2 C8 t) m; i" o next;
/ j$ v& e6 z; F# m. U! r
3 Y( L: m7 O7 j- O) X' c. ~* d .Delivery.MUs.Forklift.speed:=2;% v3 W. I# @" h2 f9 p
WH_var.delete({1,Part_Nums+1}..{*,*});" J7 G* r" F, C
for i:=1 to Part_Nums loop7 f$ y7 ~. k& o( q- {4 G" P [
WH_var[1,i]:=chr(64+i);1 ^- k$ p+ W! b7 x0 X* `) ]
next;% a Y, R7 |) R1 I, B) O
end;
& ^3 I% U1 N( e2 i出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了 9 |- X% @4 L' K! T6 ^
: e/ j) M( h, d5 H |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|