|
|
使用Plant Simultation 9运行周老师的生产系统仿真教程第一章的P5的程序时,总是报错(勘误之后的),显示。
4 O2 H/ n L+ ?2 n3 Z+ \is9 g% p1 f+ p& M( I+ |* N$ ~$ i
m,n:integer; --zhengshu bianliang8 X: P \9 V" u7 x: c8 L
Name:string; --zifuchuan bianliang
& T- E. N& x/ f9 p- X obj:Object; --dui xiang lei xing bianliang
0 g* w, }4 @, e. L# q4 K$ Ndo: d" H( V' N. k+ H1 @* d5 D
m:=str_to_num(omit(?.Name,1,5)); ) |7 o8 W: ]( A/ [
Name:=sprint("Output_Line",m); --sheng chan xian mingcheng! ~9 e; q. ^) ~' ^; U0 U5 L
Obj:=str_to_obj(Name);
. e0 Y, G, T: p/ o4 H1 P y n:=?.StatNumIn;
5 I; }3 A6 t% m- E3 R# j Obj.val:=n;
9 b B& k1 q' n. Y- q, ]: @ if m>1 then
3 z" @: W, r, }( s1 z6 B Name:=sprint("OutRate_Line",m);. X5 h; N4 n( b& [* A) Q0 a4 V
Obj:=str_to_obj(Name);: ~7 d9 @0 m. \- D4 I" p Z% G
Obj.val:=n*100/Output_Line1; ) M7 V+ u. ^7 K* K/ w
end;
) h3 E- f8 \: x8 Vend;
; g) { D& I6 [! | Y# }0 \* @ ?行 6 中的方法 '.DOE_sim.SingleLine.CalOutPut' 出错:'VOID' 无法接受方法 'Name'。是怎么回事啊? |
|