|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。" Q: u6 g' X* S, v. ~
语句是这样的! D3 _, w% a/ ~* I3 H
is
4 H6 s3 D6 w7 q- [7 y7 P6 i1 d" X0 N i:integer;
6 e# U G( z+ e8 \, i- [# P$ i+ Q Res:string;/ q; V. L2 E5 m& e
obj:object;- s5 f, `+ u+ G; K# z* g
do- H( a( \: ^; l7 m
if existsObject("Status") then; \5 V5 ?( }$ g) C9 A; Q# z
Status.deleteObject;9 c9 T Y* x# P
end;
8 y0 A( f% l& b+ ? for i:=1 to 10 loop# [1 I& p6 v) T, ]
Res:=sprint("Store_",i);$ ~4 D0 U; k" }, q: O1 _& O' d7 C
if existsObject(Res) then
; j9 O, z* |% y Obj:=str_to_obj(Res);; C6 |. P2 o3 o
Obj.deleteObject;
6 J" U2 g3 \& y- L4 t; y, B! h; `9 U end;
" {$ ~$ @! }1 S, f/ {+ j4 P next;
* Y6 {2 F* S: P% w; h --shengcheng Status:zimoxingceng8 K6 Q8 Z0 l2 f. w
Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");3 r& h: i0 O+ C- G6 y4 v9 l+ D
Obj.Label:="warehouse status";
, L. g, w! P8 ^+ p- C
! e' |+ W% e9 t7 W% s for i:=1 to WH_nums loop
, ]. ?0 G5 a+ p, j; ~ H2 S Res:=sprint("Store_",i);
& N2 M- j3 ^8 @# ^ Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
+ v& {5 f# `" U" c Obj.Label:=sprint("huojiaceng:",i);
7 Y' J0 ?' Y0 B0 l) M- D Obj.xDim:=WH_x;5 O$ O+ X9 j( I L0 L- {' p
Obj.yDim:=WH_y;6 u: ^0 `1 G* A/ u3 t" w0 G
Res:=sprint("StoreData_",i);) J, J) S8 ~) t v
- s3 H3 r9 J7 W Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);+ Z: L. _# q0 c
Obj.Label:=sprint("huojiaceng:",i);8 Q& q4 x, n* d. }
Obj.inheritFormat:=false;' p& R( v- L A4 P1 m+ ]# @# @* _
Obj.maxxDim:=WH_x;6 J: K0 B0 i/ k7 ?2 G9 W$ w
Obj.maxyDim:=WH_y;
, [0 h% P4 s+ ~5 m$ T1 w* ^! j Obj.ColumnWidth:=3;/ O4 A& A3 O% \) u2 z2 v
next;
! ]8 H( p/ o! M6 ~" {% C2 l% I
9 C/ O; U; T) Z, K) Z# P$ \, `$ M .Delivery.MUs.Forklift.speed:=2;
# O- ?0 {4 Z i g WH_var.delete({1,Part_Nums+1}..{*,*});
2 Z% X' q/ K: p% r for i:=1 to Part_Nums loop! Z2 [6 C* F2 t& R" z( d
WH_var[1,i]:=chr(64+i);
) ~, t2 j% v7 g+ ]* o6 [' D next;
- N: U5 e% B/ \% y2 g+ jend;
' f# I7 e0 x2 k( \' Z* {; S出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
]: c) b* l: J, j2 |( v& j4 z4 p0 L
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|