|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。
( ~! m- ?" T5 m6 B3 d& b: {语句是这样的
' Z0 {4 J% N4 T# F/ ]8 u$ @( d% Wis; S8 @9 X6 z+ x2 \6 E" x
i:integer;0 `( ~6 N8 A/ |5 O( d5 V
Res:string;9 { L. j# @8 A) [, U" d
obj:object;! [1 a" ?) a9 }0 G" }
do
3 f& B% q4 {1 m( I if existsObject("Status") then
" p% |! T- ?! _' Q: q Status.deleteObject;2 G& l, P) |! w; ?5 i7 I% Z" l y# M% ?
end;
! i, Q8 z* G4 q for i:=1 to 10 loop, _& [% F/ J& ^1 ]% t6 C+ u' l6 o
Res:=sprint("Store_",i);
# p) e6 n b! A if existsObject(Res) then
9 Z6 I0 Q1 l6 m4 o) X0 C Obj:=str_to_obj(Res);
3 Z6 O, F1 ?+ \4 W4 J3 K; T8 ~4 | Obj.deleteObject;
4 _. ~6 G4 b- {( F% K3 w+ c* H! f end;* k$ f7 B* |9 O$ X/ d5 Z) }; }2 R
next;) O+ O* F, ]( _" b
--shengcheng Status:zimoxingceng5 q2 H6 E) N6 {1 I
Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
8 u# F0 @2 u2 ^' Q# S' H( G Obj.Label:="warehouse status";
- L |8 w% [1 j2 d1 a1 J' y) w/ C2 `3 I l h- L( x+ M# o0 c3 Q Q
for i:=1 to WH_nums loop
) }- f( S" x. \1 v Res:=sprint("Store_",i);5 S7 [/ ^- E7 [0 Q {) x$ P
Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);. } g: T5 r6 ?. K9 S5 J( p2 ?
Obj.Label:=sprint("huojiaceng:",i);; I* V* |* v1 F. |, h
Obj.xDim:=WH_x;
; O" k, o8 f9 I9 F Obj.yDim:=WH_y;
* u* e/ q, s& Q- A4 b Res:=sprint("StoreData_",i);
) x3 f7 A6 t j1 z4 x5 O # A" p1 O6 `$ M8 [# p; C5 ^
Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);/ _' @. f2 A8 ?5 z0 z
Obj.Label:=sprint("huojiaceng:",i);+ O( s$ m! h4 J1 s- K$ y
Obj.inheritFormat:=false;1 |% J9 W s7 H8 Q3 k2 `8 T
Obj.maxxDim:=WH_x;
* ~$ g7 U3 S4 `+ ~+ X Obj.maxyDim:=WH_y; X0 [% t, n5 i6 v+ [" i
Obj.ColumnWidth:=3;2 X. x) B U4 U8 ^. d; h
next;2 h, x3 C3 M" d7 A
! L) M8 ~ N! n2 q5 q
.Delivery.MUs.Forklift.speed:=2; A% y) m9 V6 k6 V" x' ^
WH_var.delete({1,Part_Nums+1}..{*,*});/ s8 o5 }8 M) a U2 K$ h/ {
for i:=1 to Part_Nums loop: {; a& `5 \ x6 z# K, B
WH_var[1,i]:=chr(64+i);
; v$ X9 l$ z$ I6 I0 X6 e" q" M+ l. x next;
+ z T% f7 v+ _" Wend;
1 i7 A* T* T, l) l p: }* ?- ^出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了
$ x0 Q( J- M" s( t! D0 D0 W4 I$ p, O0 W
: |7 m8 E( U+ J& e |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|