|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。, V: W/ ? f" o' @0 J- o
语句是这样的
0 \5 ^5 y' C5 Z' L7 r) F5 @4 Sis
+ B# J* C# s+ e- S: { i:integer;
6 }6 p& V2 c! U9 k# F Res:string;. t# @3 Q: b! t" ~
obj:object;8 j! `( _! w* |3 [4 p( t
do
- u7 k" ^) x2 I! V; v if existsObject("Status") then
' L7 x J! `" x8 n Status.deleteObject;
/ m& G8 A, q; n) P end;
2 E) A8 M" ^+ e1 _: l; v for i:=1 to 10 loop |6 U! e2 n5 f' C3 R
Res:=sprint("Store_",i);* t* e, V2 h3 _8 m7 P
if existsObject(Res) then4 d4 {7 G7 [) c- b3 I$ V4 D \
Obj:=str_to_obj(Res);
( E% o4 \6 @# z B& ` Obj.deleteObject;
1 r3 e% Q7 L% _# C( b2 _5 j end;
3 E3 e* p2 W. H* t3 X next;3 I1 ^1 U; u1 Y
--shengcheng Status:zimoxingceng$ G$ K3 M" W ]8 J U
Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");8 ^* ]! \4 V! z' T) |5 E3 N9 ^
Obj.Label:="warehouse status";
& ]& u5 U# L o! ?( i$ h8 N& |
4 E: r! J0 M% ?& t4 w) Z/ q for i:=1 to WH_nums loop- S' d- k* [/ ^, F0 M9 Z7 {( N
Res:=sprint("Store_",i);
( h3 n# B* f1 I# q, V" M/ ^ Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);( X, E) K- Z: l$ _5 J
Obj.Label:=sprint("huojiaceng:",i);9 p7 l" S8 g# C
Obj.xDim:=WH_x;
2 @; A0 z+ ?7 c% Q4 s9 \( C Obj.yDim:=WH_y;
. I1 h, \9 ~7 {1 o& w) R Res:=sprint("StoreData_",i);
4 |5 Z* a- f% C- [5 r6 h ' Q( `' m8 C- ]# _/ }4 p0 e
Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
" |6 P* E1 q/ ~7 K1 t) N0 { Obj.Label:=sprint("huojiaceng:",i);" j1 q( _3 G, v$ A n B
Obj.inheritFormat:=false;
; m! i& G& |4 ^ K Obj.maxxDim:=WH_x;8 @: \) Y9 m4 G8 \2 i3 M! n3 Q# h9 `
Obj.maxyDim:=WH_y;
" |4 j6 a) W9 }5 \4 k& o Obj.ColumnWidth:=3;
, X1 H J; M( |( q& U" A% O; O next;3 @1 F* j" f* T; `, r) R
- K" G1 f2 Z1 N I* Q' b .Delivery.MUs.Forklift.speed:=2;
* C. _9 n* c2 y! G. G) o/ c# \ WH_var.delete({1,Part_Nums+1}..{*,*});
! e2 u7 F% u# [( N! Q. D) V; w for i:=1 to Part_Nums loop6 y1 a' v8 N8 z6 ^
WH_var[1,i]:=chr(64+i);. K3 ~! V8 [0 S4 b; R* j) s4 j4 _+ @
next; I1 K: D: w. u* I8 E( Y: _6 k' I
end;- w. [4 F! B1 K
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了 ! ~& j( d( B: v
, V- I/ T2 |9 N, l b5 g/ q! B |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|