求高手点拨

sunnyzhao

is
, ~8 E$ y! U% W4 J        m,n:integer;
) c( h0 O* D) V. e# o1 v! P        Name:string;
        Obj:Object;
do
        m:= str_to_num(omit(?.Name,1,5));
$ F6 t5 X* g5 n4 i8 R       
. a8 ~5 q+ F* f7 }8 j        Name:=sprint("Output_Line1",m);
; v0 s6 E5 W' Z/ q& a& ^' a- `        Obj:=str_to_obj(Name);
: A; b: j; s9 o0 o- p        Obj.val:=?.StatNumIn;
        if m>1 then
+ b5 H! s9 Q7 Y. }0 X                Name:=sprint("OutRate_Line",m);
, H7 S6 H/ S8 E5 |- A                Obj:=str_to_obj(Name);
  Q( |+ o3 f1 ]                Obj.val:=n*100/OutPut_Line1;
$ @/ x$ J( n8 H( ?6 I, j+ c        end;
" E/ k2 T' l7 U" f. V: N# i. Xend;
1 H- h9 Q0 k8 I8 K% a( _/ e这个编程有错误吗？

老马多拉

抱歉，这是教材的失误，请参见附件《勘误表》

老马多拉

另外注意，这个method是不能单独运行的。

sunnyzhao

老马多拉 发表于 2012-8-3 19:32
另外注意，这个method是不能单独运行的。

谢谢您的回复！

小、虞姬

老马多拉 发表于 2012-8-3 19:32
6 M8 b4 j) Y& P另外注意，这个method是不能单独运行的。

2 K7 N$ H6 Z1 U! V您好，按勘误表改了method，但是还是运行时还是出现了问题。请问这是怎么回事？我刚刚开始学习，关于如何调试也不是很清楚，请多指点~

爱不会累

我也遇到这个问题了