is1 T' o- _" U) p- V3 C
m,n:integer;
- d7 d& @& m5 G% h. O8 H3 e! T name:string;, h- Y9 ~+ A- P3 Z
obj:object;( C7 Q* t' j3 r( t; M
do
" F7 d. v4 g: e f9 e# ~: a m:=str_to_num(omit(?.name,1,5));
- i6 ^5 Q( L' M# L) [% u# C) Y name:=sprint("output_line",m);
( K; H4 d* `% k2 R" S i0 k4 @6 t obj:=str_to_obj(name);
0 M Q+ @8 k- b8 u obj.val:=?.statnumin;
% [4 c$ E3 ]3 E! O7 s: G if m>1 then
. k. E2 c2 T1 x8 } name:=sprint("outrate_line",m);
1 o4 K9 |1 C( j obj:=str_to_obj(name);
' @8 R1 u9 l* X# Z; k obj.val:=n*100/output_line1;! b/ m0 x1 ]. N- r7 H
end;
; J( t/ g. z! \! send;6 T; d9 z+ e Q t$ R4 F* A, m
我是抄书上的源代码,但是在我的软件上运行错误,提示的是
; m( [7 m! [5 PError in method '.DOE_Sim.SingleLine.CalOutPut' in line 8: 'output_line1' is not a valid path.
; o' V& f6 r7 p& E 实在不知道怎么办了,新手求助 |