|
使用Plant Simultation 9运行周老师的生产系统仿真教程第一章的P5的程序时,总是报错(勘误之后的),显示。5 p% a, H _/ \$ U# B
is$ w! y$ w" s A5 ]+ V: o
m,n:integer; --zhengshu bianliang
- F8 g; A% l: C, T7 W; t7 R Name:string; --zifuchuan bianliang
5 e: v& I, X; i obj:Object; --dui xiang lei xing bianliang& w' ]% o0 B' [7 ~- g) t# H
do4 y2 q) M0 d3 V& z9 G* L
m:=str_to_num(omit(?.Name,1,5));
3 d7 l8 }; L- l; o Name:=sprint("Output_Line",m); --sheng chan xian mingcheng" Q4 A9 t3 {9 C% s
Obj:=str_to_obj(Name);- w& L2 e! L1 k! ]9 X* w% ]: g
n:=?.StatNumIn;
0 Z& K8 r& h8 g: U1 Q& |; S9 q4 V( N Obj.val:=n;
7 D y2 `( s9 l( K) O if m>1 then
; Q1 k5 O% B) `1 f' E7 R5 F, ? Name:=sprint("OutRate_Line",m);
9 B8 ~# p# J$ ~7 [ a9 Q Obj:=str_to_obj(Name);
. `# J7 y' ^* Y4 Z% k% w- M Obj.val:=n*100/Output_Line1;
Q5 g/ x8 X: e5 H7 W2 @+ ?: @ end;- }# {2 d. |+ N. |3 f: p) `5 m
end;" }0 m: y. K7 p h1 ^- Z! {
行 6 中的方法 '.DOE_sim.SingleLine.CalOutPut' 出错:'VOID' 无法接受方法 'Name'。是怎么回事啊? |
|