|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。" M" b5 k3 M, L5 c* W2 L: D
语句是这样的1 }: y7 H- j9 }5 _
is) ?+ l% `' r Y2 a. g8 m
i:integer;
8 O# K! V5 B+ y/ p" i& }+ N Res:string;4 r! Y. U, z' \: N0 F' T2 B. O
obj:object;
2 Q, {/ r7 ^2 }do
5 {6 K( L3 N; [. s- g if existsObject("Status") then5 @/ R! G% W0 o3 t4 h: r
Status.deleteObject;
3 i/ f9 c$ v m- G5 u/ ?0 _ end;
3 w+ p) M1 W: `2 g: x% Q# @ for i:=1 to 10 loop
* x4 V7 d: I- {) D# y% ^ Res:=sprint("Store_",i);- L8 c1 z* Q6 V$ t! O6 B6 c
if existsObject(Res) then
_7 }: x4 g9 n0 ?: G: W Obj:=str_to_obj(Res);
J8 q! M' C# c9 F( q2 J Obj.deleteObject;
7 R( l0 \5 V- G G* f9 D% i end;/ D6 e% W7 u. I% b: d
next;3 q, N6 e7 T7 m( L# o1 }/ S
--shengcheng Status:zimoxingceng
4 x* f* |( |0 d3 w5 J3 L Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");7 e7 L( F+ [' J% Z4 j5 Q4 ^5 d
Obj.Label:="warehouse status";
: w. n/ \& [' m" k" h' K 2 ~8 R7 i+ h+ b* e. W6 I* B3 Z7 F; L
for i:=1 to WH_nums loop- m, @; c+ w f$ p+ b
Res:=sprint("Store_",i);
& G7 Y4 {; s3 \* x/ X% [% B% x. _ Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);9 h1 w7 A9 }$ f6 }8 T) R6 ^
Obj.Label:=sprint("huojiaceng:",i);
' L5 H( y% {6 e% K/ g5 V+ ~3 Y Obj.xDim:=WH_x;, Y$ N9 i! c4 d& p4 k, i2 [
Obj.yDim:=WH_y;8 i1 \3 Q1 Y+ r% ^3 b7 L5 _/ e
Res:=sprint("StoreData_",i);. D% E% P# Q/ b
7 u" R' \ @% P6 j0 ]0 R% B0 _' k Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
* v: H- _+ k& v, W s6 [: [6 a Obj.Label:=sprint("huojiaceng:",i);4 C$ ~1 ]3 K4 f: M
Obj.inheritFormat:=false;) L+ ^5 [0 S) Y& |$ d
Obj.maxxDim:=WH_x;' b$ B2 w. f7 z" Q
Obj.maxyDim:=WH_y;
+ q8 Z& w2 }9 ]2 G* G N1 G Obj.ColumnWidth:=3;' |! G- B/ _8 @
next;5 u. z/ d8 c4 ~. W, Y
$ Z8 s3 c+ i8 ?0 W6 Y5 Q# F, L
.Delivery.MUs.Forklift.speed:=2;
8 ~' k$ h: v& J' O WH_var.delete({1,Part_Nums+1}..{*,*});6 i8 y: a) F. i- ]# ^" ]' m+ D0 u
for i:=1 to Part_Nums loop
$ i" x( T% u+ |" L. m/ @; a WH_var[1,i]:=chr(64+i);- q- i! V- M* Z/ K* g+ \3 H6 U
next;
, y9 P9 u: o1 H3 R9 z8 z% \end;
, z2 B2 j2 h) W6 a9 k# v出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了 3 J$ m) A$ j0 {" ]; D) ]4 x
" o0 B. E# Q5 v) f8 b- }
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|