求高手点拨

sunnyzhao

is
        m,n:integer;
8 M9 I& O1 @$ F        Name:string;
: J. f* g0 |8 K- q% Y% B& l        Obj:Object;
do
        m:= str_to_num(omit(?.Name,1,5));
       
# J4 s4 [9 Z+ d/ y( ^2 u2 o        Name:=sprint("Output_Line1",m);
- @( ~: Q8 @" U% q& p; n        Obj:=str_to_obj(Name);
" X* g1 t5 ~- O% Q- J5 J        Obj.val:=?.StatNumIn;
        if m>1 then
                Name:=sprint("OutRate_Line",m);
, d$ \) D+ y5 T: n                Obj:=str_to_obj(Name);
8 x; p% D8 T3 m1 Y) H                Obj.val:=n*100/OutPut_Line1;
, U* E" w% S8 r1 s2 M        end;
end;
这个编程有错误吗？

老马多拉

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

老马多拉

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

sunnyzhao

老马多拉 发表于 2012-8-3 19:32
7 `  J$ @7 \# T) Y2 [) f5 X9 A另外注意，这个method是不能单独运行的。

谢谢您的回复！

小、虞姬

老马多拉 发表于 2012-8-3 19:32
, N2 L- c& J9 O1 P& `) m另外注意，这个method是不能单独运行的。

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

爱不会累

我也遇到这个问题了