|
|
我在做《生产系统仿真——plant simulation应用教程》第八章的仓储案例,在8.2.2里需要生成仓储货架层,我按照书上的语句输进去之后结果在22行出错了。5 Y7 `# n$ Y9 w1 ]2 z
语句是这样的8 M; o+ f# h' Z1 }$ R9 Y" Y" T
is
5 d0 H m$ l9 {0 M T i:integer;
2 H; ^8 `: F% r Res:string;
9 G4 B9 S/ X% i% W) ?3 D! R obj:object; `& o7 y( }) g0 D
do
5 _$ O' P/ {. ?( R4 F if existsObject("Status") then+ x7 g& P: p, j+ B
Status.deleteObject;
, {& |) ^1 Q$ |! \ S4 n end;1 v+ }3 S6 Y( n' q
for i:=1 to 10 loop1 W9 P5 o3 s+ n; q% `0 U
Res:=sprint("Store_",i);; z9 _+ F0 e9 G) k5 Z1 \! l& A
if existsObject(Res) then; ^* [5 T" L- a7 a4 A
Obj:=str_to_obj(Res);) K9 f1 C8 j$ D
Obj.deleteObject;$ U- {4 B; v& E+ {# u
end;/ b2 s: }6 }2 g( W i+ f
next;
7 q1 Z) N4 o4 ~ --shengcheng Status:zimoxingceng$ Z2 H/ H& a9 c
Obj:=.MaterialFlow.Frame.createObject(current,160,140,"Status");
) z, A# t" b6 E( _' C$ |" k Obj.Label:="warehouse status";$ N0 {9 @' S9 ?& D. ?2 U* M1 y; M
( x) u+ k# s6 r* o6 ` for i:=1 to WH_nums loop5 p; W- l6 F" g$ o4 n
Res:=sprint("Store_",i);/ y) P5 G: B0 H" x
Obj:=.Delivery.Res.store.createObject(current,400,i*80,Res);
8 C: g X, m1 [( {! O0 u# W Obj.Label:=sprint("huojiaceng:",i);
* L! T' b8 k1 g# ^; T Obj.xDim:=WH_x;
" u+ s Y A( ~2 L3 } Obj.yDim:=WH_y;$ J0 E6 u' |, k" B8 w
Res:=sprint("StoreData_",i);
' a( g9 @9 i7 M1 l8 |
- F! U$ G# S/ E) R Obj:=.InformationFlow.TableFile.createObject(current.Status,i*120-60,40,Res);
: r: D* F# h/ E) c. q: Z q- h Obj.Label:=sprint("huojiaceng:",i);* G8 s, K- a9 ^+ Q% Q+ b
Obj.inheritFormat:=false;
, _( k% z! w: R0 O |, N( p) j Obj.maxxDim:=WH_x;+ n3 ?: g6 z- z3 D& Q
Obj.maxyDim:=WH_y;
4 }- ]7 T: Z6 l1 q7 c Obj.ColumnWidth:=3;
! ` C3 e/ C! W% ]+ X; V7 C$ T next;# _* N9 P. Q# D: N
6 L, n) b% x4 R" C- B7 l
.Delivery.MUs.Forklift.speed:=2;
/ ~' h- Q+ O E" L8 h" Q7 u5 H WH_var.delete({1,Part_Nums+1}..{*,*});5 y$ R3 ]. _1 v: g+ \; S
for i:=1 to Part_Nums loop
7 L+ E# b( B# T/ y) w WH_var[1,i]:=chr(64+i);) R7 T) B# ~, x
next;
$ ]6 I2 ~+ ?1 P, b2 C5 |% t8 Cend;- p" u. J# T# k3 s$ L, B
出错的截图在这里。这些语句可以生成出来子模型层Status,但是生成不了货架层,错误显示说是unknown identifer res.求大神帮忙看看!!!多谢了 / C. s8 Z! S) o5 w5 ?
$ Z4 s. z& B b6 H J- ^( O& b
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|