|
|
使用Plant Simultation 9运行周老师的生产系统仿真教程第一章的P5的程序时,总是报错(勘误之后的),显示。3 G1 _9 _4 C3 L9 j7 t' m" b
is
+ i- r, T8 T/ k+ c `. k; |, q m,n:integer; --zhengshu bianliang
' ~8 P" j- V/ i, j Name:string; --zifuchuan bianliang
9 n0 k) f: l# g3 Z/ ] obj:Object; --dui xiang lei xing bianliang
k& z0 K- J" \7 \, tdo5 `5 N# K# \" X5 L
m:=str_to_num(omit(?.Name,1,5)); 3 P1 U; J) f4 P# N" o
Name:=sprint("Output_Line",m); --sheng chan xian mingcheng
8 F* m2 s6 d: t3 V) D# E7 m0 K+ ` Obj:=str_to_obj(Name);
* l% O$ N. D$ W1 \+ e n:=?.StatNumIn;
; J) f' D, B% }. Q# X Obj.val:=n;
, Q- J( j; n* K( }' V8 J3 B: J if m>1 then
) `- g" N: k. k; `2 W$ W* N Name:=sprint("OutRate_Line",m);
/ q4 R7 F8 y6 P$ f! R' g, P Obj:=str_to_obj(Name);
) l5 K3 r+ ^8 p- Z5 |1 U Obj.val:=n*100/Output_Line1;
1 D+ h! y, y9 D/ R end;5 q7 J" t% b* _0 q
end;
# G# T% f5 C- d9 ?- F行 6 中的方法 '.DOE_sim.SingleLine.CalOutPut' 出错:'VOID' 无法接受方法 'Name'。是怎么回事啊? |
|