|
|
使用Plant Simultation 9运行周老师的生产系统仿真教程第一章的P5的程序时,总是报错(勘误之后的),显示。4 I% d" j8 H0 w g, p1 C% S) R4 M5 Z
is1 L3 \8 \- D# E1 W
m,n:integer; --zhengshu bianliang. c% @9 R2 H6 i$ E
Name:string; --zifuchuan bianliang- a. \4 {, k5 {
obj:Object; --dui xiang lei xing bianliang
" ~! F' M/ ~. w3 N6 Udo) |0 y8 a, ^2 b' Y/ |
m:=str_to_num(omit(?.Name,1,5));
+ N, E" f4 q/ q; v! N% d Name:=sprint("Output_Line",m); --sheng chan xian mingcheng
/ [ N1 q; Q1 L% L1 J& m+ P) W Obj:=str_to_obj(Name);- t- y+ M) Q" m! M, L8 ?
n:=?.StatNumIn; & y& {7 L0 j% u! a( s( u) V
Obj.val:=n;0 f# f9 t9 }* ]- w/ I* u0 z. z- T
if m>1 then
$ X% K; S0 J3 d* n2 z7 x Name:=sprint("OutRate_Line",m);
5 D! g. C. ~2 R' y- N# ` Obj:=str_to_obj(Name);
( g( ?2 c5 o! T Obj.val:=n*100/Output_Line1; 9 e! u# D; y8 ?# Y
end;
: s( p# a# q$ Z' R7 mend;
! ]! p* |& _, n! q* o6 b: {& f行 6 中的方法 '.DOE_sim.SingleLine.CalOutPut' 出错:'VOID' 无法接受方法 'Name'。是怎么回事啊? |
|