|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。/ {. T. b2 `: G( S* A% S3 F
语句是这样的% l) s$ M8 D( P$ O( x* s
is a/ O, Z& p; c( |; P9 M# \
i:integer;- F. P0 h) q0 x" {$ k/ \5 r" W* W
Res:string;
/ A& W) L) T; P, m( E, b7 I! X obj:object;; G, t. \; t& r, a1 h& G) ?1 W
do: s7 K" J! `4 l' x! O
if existsObject("Status") then) U+ E! u) w4 I& |$ v0 }3 h# v* W
Status.deleteObject;; t$ S- q& D n2 G0 H. Y
end;& m6 ?. e! l% z" J
for i:=1 to 10 loop: F( k' H+ j: C3 S
Res:=sprint("Store_",i);5 v6 L# Y. A! Y4 A
if existsObject(Res) then
7 X5 W% p: L2 o( x Obj:=str_to_obj(Res);' r/ j8 ]9 S, n) C$ `/ ~
Obj.deleteObject;
( H8 X# T, `- X3 Y& \- n# z, w end;
7 w, f9 _4 l5 \. ] next;
% H1 _+ l/ u; @9 |" N; C+ k --shengcheng Status:zimoxingceng
; C6 }4 ~, G( O Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");* H* ?+ [" A4 T, g: E9 N" [
Obj.Label:="warehouse status";/ B6 E* }1 x' i1 U/ I" F2 w ^7 I
! C; }& h s6 ^0 n for i:=1 to WH_nums loop$ h0 R8 L2 c, ~% A
Res:=sprint("Store_",i);* ~( p& ]2 ~$ R" B
Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);' D" [7 p u# O( z6 x9 F
Obj.Label:=sprint("huojiaceng:",i);
, j; e) T1 p/ |- @4 s- Q Obj.xDim:=WH_x;; y5 y7 t! B, l: j: M' h, ?" n
Obj.yDim:=WH_y;( v% d3 f) U6 d7 z6 b; J d0 `9 P
Res:=sprint("StoreData_",i);0 g( U2 T* M: T6 {0 E q
: c) {) X# c3 b- p8 g/ h0 {( v( F Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);8 v% V: n0 i7 _1 Z8 t% p; n
Obj.Label:=sprint("huojiaceng:",i);9 f- l- K/ h Y2 C3 t: k9 L
Obj.inheritFormat:=false;6 |" q) `6 O! _) _- v" N
Obj.maxxDim:=WH_x;+ v' Y# g9 v4 ]! m+ ?2 A
Obj.maxyDim:=WH_y;! P: g. |( H# W( T" b- B; K
Obj.ColumnWidth:=3;
" Z9 J N; M8 M6 P. t b: N% M6 m7 g' V8 U next;
! X5 j6 _8 F3 Q! \' M# }0 @1 H1 t' \
" y) U/ |. M, k; C& M3 c( F; @ .Delivery.MUs.Forklift.speed:=2;
* E6 V" I, Q; A7 l& ]+ ~2 e+ O WH_var.delete({1,Part_Nums+1}..{*,*});
) B4 S' X: S' z; ~% ? h for i:=1 to Part_Nums loop T$ H+ o9 y! r
WH_var[1,i]:=chr(64+i);
, I% i& E- P) Z+ P0 z next;" O: y U; a: E6 Y, B6 x
end;
$ e# r: I: [" _. g0 {" J出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了 a1 s0 N" W4 ~9 I e
5 S) U$ Z& y/ |: K! |! N
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|