|
使用Plant Simultation 9运行周老师的生产系统仿真教程第一章的P5的程序时,总是报错(勘误之后的),显示。 H, `5 K: a* T( ]; l) n v0 E9 u
is0 s2 N9 [3 G) I+ T- d+ v
m,n:integer; --zhengshu bianliang
# M6 Q" F0 S7 Y+ f Name:string; --zifuchuan bianliang6 `3 K Z7 x- @0 V, D
obj:Object; --dui xiang lei xing bianliang
& G* G% I4 {1 Y/ s5 odo/ Q$ I, K8 a1 m+ S5 |3 o# K
m:=str_to_num(omit(?.Name,1,5)); & W: ^' ~( m5 W( ?& _- ~2 ^
Name:=sprint("Output_Line",m); --sheng chan xian mingcheng1 B: b5 L- L; q# ]' j+ A
Obj:=str_to_obj(Name);- `+ O x1 e. E
n:=?.StatNumIn;
$ [$ W- `) b/ }- r" m; H* Q Obj.val:=n;
0 S. D' }4 V) p3 Y0 z; W if m>1 then
0 _2 o1 R' r/ [" O" c+ v Name:=sprint("OutRate_Line",m);
! j, x$ V5 L8 [- N Obj:=str_to_obj(Name);6 W; E0 y+ ?0 R1 |! C) R/ }5 |
Obj.val:=n*100/Output_Line1;
: M$ G+ E; V e4 U: U% V$ N$ a; X end;$ l) Y4 H! D+ l3 e# c7 J8 s
end;
, _1 y: W; r, D. F6 {( {* Z* m行 6 中的方法 '.DOE_sim.SingleLine.CalOutPut' 出错:'VOID' 无法接受方法 'Name'。是怎么回事啊? |
|