求高手点拨

sunnyzhao

is
        m,n:integer;
        Name:string;
2 g' y/ X$ E4 Y1 s" Q' d7 Z        Obj:Object;
! E. ^3 z- s# i8 _5 o0 I6 ?do
        m:= str_to_num(omit(?.Name,1,5));
7 I  {' u5 y3 V$ ?: A       
* f$ |. t# K+ O- U( y+ W3 M. j        Name:=sprint("Output_Line1",m);
8 x6 y3 G7 k$ B) I0 r( }        Obj:=str_to_obj(Name);
  Z! Y3 z/ f) X- t1 ]2 v: k        Obj.val:=?.StatNumIn;
0 f. G7 V" ?  E5 r; h0 \        if m>1 then
6 |4 r' |5 P2 n$ w# H' j                Name:=sprint("OutRate_Line",m);
; d' h  o/ }: n4 a. I/ V                Obj:=str_to_obj(Name);
                Obj.val:=n*100/OutPut_Line1;
        end;
end;
这个编程有错误吗？

老马多拉

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

老马多拉

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

sunnyzhao

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

; p# K7 N0 O- G% E8 n谢谢您的回复！

小、虞姬

老马多拉 发表于 2012-8-3 19:32
$ E/ e/ S1 T- y. y* V另外注意，这个method是不能单独运行的。

) t& X. @2 H) [3 s您好，按勘误表改了method，但是还是运行时还是出现了问题。请问这是怎么回事？我刚刚开始学习，关于如何调试也不是很清楚，请多指点~

爱不会累

我也遇到这个问题了