|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。: I$ \. b6 |# a* ]. b0 l/ j
语句是这样的
2 L* h h! J8 |0 `5 E0 sis
& x8 \/ Q* m8 z$ }# L2 W i:integer;6 m, \; f$ E$ p0 w3 B4 t
Res:string;" E* h# C4 [5 V" e, e+ S/ c' n% @
obj:object;
' D* ~) l/ ?+ m# d& v$ l5 jdo! R% g' ?7 q! a& ~0 p
if existsObject("Status") then
% t6 }- C1 ^7 f7 x4 o# w: E* t Status.deleteObject;+ F( m# _2 A# q J- X# q4 Y( E
end;
7 p* }" K) ~; Y/ @% G) g6 A for i:=1 to 10 loop e6 t, I; ~6 i( Z
Res:=sprint("Store_",i);
& s7 z; B- _) V" R7 ^8 e if existsObject(Res) then+ j1 f+ q' `3 Y* R/ P* w
Obj:=str_to_obj(Res);
4 l" ?6 j' l9 D w# O% V Obj.deleteObject;
: y& \' h% X5 [ i$ X: C/ ? end;! k2 h# b! X& R% v1 X( C
next;
3 G' ^. x4 W: z9 q% o! C# w --shengcheng Status:zimoxingceng
: n+ y. v _5 j" O+ a# i Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");7 k; z( a7 F# {5 ]$ q- z
Obj.Label:="warehouse status";# L3 y( _0 [! c: I# S
: l8 U" R; Y+ Z* a$ u for i:=1 to WH_nums loop t! r b3 C. S4 w# w. W1 z
Res:=sprint("Store_",i);0 m9 H* y, B, V4 m! ~
Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
' t/ z t" ?1 X8 S6 b- Y) d Obj.Label:=sprint("huojiaceng:",i);) e% T6 f: D% g0 \0 {& Y; V& d# N$ z
Obj.xDim:=WH_x;
1 a& I1 ?; b( z `+ s! B Obj.yDim:=WH_y;
$ _3 ?1 u. O3 c/ X( p1 O Res:=sprint("StoreData_",i);
6 e. H$ x# X, e1 M0 Y( ^% G , O, n2 Y/ X8 k
Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
, R* U6 ?3 R/ x, b, [. o6 r7 T Obj.Label:=sprint("huojiaceng:",i);
5 E2 V; q' z; v' b5 p Obj.inheritFormat:=false;* }) S% x( j _. d. X" }+ ?% N
Obj.maxxDim:=WH_x;* A/ o- j! L* Z4 }& D' C2 }& s
Obj.maxyDim:=WH_y;
! s Y7 ?$ g- S+ H6 a Obj.ColumnWidth:=3;" E) R8 H- x( D+ E
next;
) C5 a9 i& }: U' n5 x3 W, R
( u7 j) T+ D4 w F .Delivery.MUs.Forklift.speed:=2;
% V( w8 Z1 v; o: d9 `: V6 n WH_var.delete({1,Part_Nums+1}..{*,*});
2 N5 m* N: y+ F0 y$ R0 W! m for i:=1 to Part_Nums loop
( A$ d @; |7 r- B5 v3 G+ g WH_var[1,i]:=chr(64+i);
4 @; h5 P% R% h9 v0 {5 a next;1 x; u6 B. J8 K* L: v* g% P4 | v6 S
end;6 J7 r f! y" Q& A; K% b
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了 " q8 P7 R9 f6 x9 o2 c
! Q2 Q4 a. r- i2 i2 c' c# R |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|