|
|
使用Plant Simultation 9运行周老师的生产系统仿真教程第一章的P5的程序时，总是报错（勘误之后的），显示。* M5 H9 W4 P# ^; z
is/ @3 p9 n7 n4 H/ }& S+ H2 t* L
m,n:integer; --zhengshu bianliang
0 Q9 g8 t. R& n5 \$ A7 x5 P% x9 l' n Name:string; --zifuchuan bianliang
- ?) ?, X+ ]1 e8 t& Z3 u/ A obj:Object; --dui xiang lei xing bianliang
3 Q0 x- w1 O: | Ydo
# g9 i+ O. O) Z0 G5 u m:=str_to_num(omit(?.Name,1,5));
. f- v; [6 k! M1 X8 c Name:=sprint("Output_Line",m); --sheng chan xian mingcheng% i4 A, Z# m+ K& I0 h
Obj:=str_to_obj(Name);% ~: e/ V! K- U8 @* V3 V, N# j* c& g
n:=?.StatNumIn; + f) U3 K8 Y. e' [# ?8 h/ N7 X
Obj.val:=n;. q3 r1 C5 B# d5 ^4 v. u
if m>1 then5 g/ y2 D! }% Q) U! X7 J$ J
Name:=sprint("OutRate_Line",m);
: a7 {2 c8 v+ L4 @ Obj:=str_to_obj(Name);! Y! K: D1 s. ~9 ?# Z8 q% w
Obj.val:=n*100/Output_Line1;
Q" k( w. o# y. j1 E end;
2 K+ a5 L6 r6 f' }; E% P8 x* |end;
! s; g) {7 @9 V: N行 6 中的方法 '.DOE_sim.SingleLine.CalOutPut' 出错：'VOID' 无法接受方法 'Name'。是怎么回事啊？ |
|
发表于 2016-6-14 16:17:06
