|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
2 l' I# u& ^" R0 R" P/ }/ Y9 [语句是这样的" H# j J4 e$ R- ^( J; B
is8 W# W L }# Y7 T$ U8 ^
i:integer;
. e: ]7 ]; V$ |1 ] Res:string;" F) d/ D% v& K% k1 M) j
obj:object;
0 e( o8 N( G" L: x) \1 v7 Rdo- r# j% f3 _" s5 @, ?' G- {
if existsObject("Status") then. _6 a" A/ c& X) b
Status.deleteObject;
, r9 Q0 O% K; p% M4 @' G) |. Z end;
( u4 w/ @* Y! b+ x. O3 T9 A4 d0 o for i:=1 to 10 loop
. h) \9 `* b# O3 ], Y Res:=sprint("Store_",i);
: C4 l: Y) z; i* a if existsObject(Res) then
0 R; C1 q% N. c! _5 M* y Obj:=str_to_obj(Res);* t$ p; M0 x/ l* S2 P1 B) D
Obj.deleteObject;0 m/ \) c. t4 ]! N3 z4 q
end;
# v# d: C- {* W6 O q' R( S5 l) @ next;2 ?! n3 }" ^% }6 T7 M: t! J
--shengcheng Status:zimoxingceng
& f8 \5 W/ ]5 X: g4 H# {9 F7 L- z Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
- m& i0 F/ r2 {0 T* B7 V Obj.Label:="warehouse status";* y3 Y9 D) C5 g, ^7 T8 S! e4 n
- J' F4 D) D/ Q- D' K# Z for i:=1 to WH_nums loop
1 S$ @, o+ @. ^/ t) P, l5 ~+ | Res:=sprint("Store_",i);
$ \7 x6 \$ E1 j Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);; y; s: ^* {* s) m$ B( p1 X2 `
Obj.Label:=sprint("huojiaceng:",i);4 M% @# b7 u4 z) t: f0 a) S
Obj.xDim:=WH_x;# ^7 O# I5 v2 n+ K: J$ q) i, A
Obj.yDim:=WH_y;
* N6 ?$ j4 F' p7 C, d$ i5 s( r Res:=sprint("StoreData_",i);& t& F# z3 j8 ?* m4 e7 }2 R5 I& x. c/ Q
_( Q/ q6 v4 `
Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
. T0 S+ j; \2 F; m/ F: ^ Obj.Label:=sprint("huojiaceng:",i);! ^5 h1 ?- v2 U2 a; ], E# |& y
Obj.inheritFormat:=false;
; |8 ~$ T! I* ~6 R Obj.maxxDim:=WH_x;. _, ?% e. ]4 h$ b0 N
Obj.maxyDim:=WH_y; |' B1 M( ?4 F' m* v
Obj.ColumnWidth:=3;
+ m6 `( M f3 N4 ]; Y6 q" s next;, S1 f' A8 d0 K* j. d# R8 v: x7 \
' l! x; f; @' E& o5 ?# D* g. O .Delivery.MUs.Forklift.speed:=2;# I) A- D a2 X
WH_var.delete({1,Part_Nums+1}..{*,*});) y8 \- ^- |# n) o$ x
for i:=1 to Part_Nums loop
0 z) U# ]7 M3 n WH_var[1,i]:=chr(64+i);
2 s+ K; O' _6 R& r: e5 D next;( ]* I5 \( {& L3 H N K# |) o
end;
( ]! o9 Y# \% I8 I& K- s" r, W7 Y9 h出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了 8 t* b# a3 [+ D- H- N7 u, p9 @
. E, u. h+ A6 j; d7 L' A; d: {
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|