|
使用Plant Simultation 9运行周老师的生产系统仿真教程第一章的P5的程序时,总是报错(勘误之后的),显示。
* h% C, c# d" a6 o8 Gis
) Q# ~6 x8 h3 P m,n:integer; --zhengshu bianliang
, |( P' D* ^6 ?; z5 A& V, [$ Q I( S Name:string; --zifuchuan bianliang
0 w* I! ?" I4 L0 O% F+ e obj:Object; --dui xiang lei xing bianliang4 |& h2 L2 ^2 }+ ^. Q
do
. T: u% Y" S J, u4 r8 e- C m:=str_to_num(omit(?.Name,1,5)); 6 n. T( }4 @5 v" o6 k" {4 F* a2 r
Name:=sprint("Output_Line",m); --sheng chan xian mingcheng
" W! K8 k& X$ P! |- h# ~4 t$ F; c# ^ Obj:=str_to_obj(Name);
4 g2 y; d5 K% |4 [! [; F0 c n:=?.StatNumIn; 1 f8 O' K9 B( r0 K7 [
Obj.val:=n;2 Z0 l# @! s( c) B" R, X( y/ ^' _: X
if m>1 then Y L1 \) Q# A6 Z
Name:=sprint("OutRate_Line",m);, ]: [( ~1 ^5 j( @1 c1 s4 K6 ?
Obj:=str_to_obj(Name);, i/ b' G" c2 a) F0 V; k
Obj.val:=n*100/Output_Line1; 5 }" H" R( i/ @, a
end;! A! k% d& D1 E7 ~1 i
end;: y2 d6 n$ G5 U" Z
行 6 中的方法 '.DOE_sim.SingleLine.CalOutPut' 出错:'VOID' 无法接受方法 'Name'。是怎么回事啊? |
|