|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
! D/ R( s( _' U9 ?语句是这样的
: o( F# t! W4 U6 F. Lis/ @& e0 x0 q! i6 |7 N
i:integer;/ G0 f( p, u' g! h; [3 R3 j" h
Res:string;9 a: F3 T- V* i: o
obj:object;
) \8 u; n9 r! {6 G+ o! w2 i! |/ jdo
- k0 u1 p5 N& b/ c& m9 M! m if existsObject("Status") then
3 ^' l1 R$ X6 p! x" g$ ? Status.deleteObject;2 Y! ~4 `0 w$ R- _4 k7 Y
end;
2 h6 ]6 H% ` L; U% A. @; G& B a for i:=1 to 10 loop
9 K) R9 @" L8 |7 d1 }% C; ? Res:=sprint("Store_",i);4 H g: |1 f2 h( F. o
if existsObject(Res) then
$ |5 G) J- ^( F' e+ Y/ ?9 ? n Obj:=str_to_obj(Res);
/ g# V+ G, S: o! g( E( s0 z Obj.deleteObject;
5 h. ^' z2 @! o5 D end;, ^5 m* |, u" Y ]) o! E" S
next;: x2 J" t( C* z& O7 {2 \9 ^4 E
--shengcheng Status:zimoxingceng1 |8 ~) F6 Q% N1 p! u# K: Z
Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");1 Z: E+ Z% t. J9 V, O
Obj.Label:="warehouse status";
4 c# W; a" |/ C" h
7 R. I6 A/ @' j3 U4 u for i:=1 to WH_nums loop
) T, R' L0 n- U Res:=sprint("Store_",i);; [+ [7 U) e% C" }" {+ _/ V U6 r
Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
b& I4 o1 h: A# u" { Obj.Label:=sprint("huojiaceng:",i);
; G7 e7 H1 C2 w$ T$ s! L+ z% L- A Obj.xDim:=WH_x;' z/ {1 p1 W2 D& t8 q F0 r
Obj.yDim:=WH_y;
+ \! ~9 }$ f& z. j3 l Res:=sprint("StoreData_",i);1 N' Y) n( B6 e) y& c! j# {
- X5 f- v; k3 g0 B$ _ Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
3 m0 C. F8 i$ c( m2 o0 A: ?: W$ a Obj.Label:=sprint("huojiaceng:",i);3 g% J6 O0 c; F5 P3 i$ N) R
Obj.inheritFormat:=false;( F5 c. ~# z) G
Obj.maxxDim:=WH_x;6 ?- e' t5 t2 f* L: x8 p' h
Obj.maxyDim:=WH_y;- A0 B0 P. m' h; B/ ^) c
Obj.ColumnWidth:=3;4 [% P! L4 W1 B& T7 e: h I6 M7 f2 b
next;
+ n J+ G9 V* `: R8 X2 h2 } ( |* T# L% c, N7 r; ]
.Delivery.MUs.Forklift.speed:=2;+ {" Q+ b! H% F5 d! N5 @. P% ]# M3 v
WH_var.delete({1,Part_Nums+1}..{*,*});0 s/ L) V) g. U$ ?+ q
for i:=1 to Part_Nums loop" X) [$ I' y& N1 ^
WH_var[1,i]:=chr(64+i);; j% O! f+ N6 K8 k5 W" K; L
next;
: W; i, G) n. e* D0 jend;
; v* G1 o3 n E( h7 S7 _& ]出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了 9 f+ }0 O# P! ?
6 ]7 Z! K- o' {5 H0 I2 K
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|