求高手点拨

sunnyzhao

is
        m,n:integer;
7 a/ e: w" ?+ |, r        Name:string;
  b+ r" W0 c1 B0 k, v        Obj:Object;
do
# u$ \  E5 }5 {0 d9 h        m:= str_to_num(omit(?.Name,1,5));
$ Q' _+ E6 K6 x9 U! |       
9 ~$ S% w6 l. |# e5 P& D, F4 j  ^        Name:=sprint("Output_Line1",m);
8 ^* T* s) Q6 J$ I; W$ V+ q8 v        Obj:=str_to_obj(Name);
        Obj.val:=?.StatNumIn;
" ]1 l, ^+ Y" ]! a  z. E        if m>1 then
: y- I0 K' S* }                Name:=sprint("OutRate_Line",m);
                Obj:=str_to_obj(Name);
% `! e7 `) x! W; A) n1 c7 }                Obj.val:=n*100/OutPut_Line1;
        end;
5 |. H- }: Y# d2 B5 yend;
这个编程有错误吗？

老马多拉

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

老马多拉

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

sunnyzhao

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

$ @* C! D& w( h0 p) N, t谢谢您的回复！

小、虞姬

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

; `5 @2 x: w( V您好，按勘误表改了method，但是还是运行时还是出现了问题。请问这是怎么回事？我刚刚开始学习，关于如何调试也不是很清楚，请多指点~

爱不会累

我也遇到这个问题了