求高手点拨

sunnyzhao

is
        m,n:integer;
        Name:string;
2 H  k# o( X7 U/ D2 D/ }0 L/ J        Obj:Object;
do
        m:= str_to_num(omit(?.Name,1,5));
  r. W; I4 e* O       
- L8 S. t* q( i2 O. v; b+ m        Name:=sprint("Output_Line1",m);
/ I* H) r& a/ o8 P- q( f        Obj:=str_to_obj(Name);
8 A) H  \/ R2 H) X, \1 f" \  c        Obj.val:=?.StatNumIn;
        if m>1 then
                Name:=sprint("OutRate_Line",m);
  x; x) _( M6 T1 R5 ~                Obj:=str_to_obj(Name);
# F( j+ n9 ~! J0 o9 _% f2 L                Obj.val:=n*100/OutPut_Line1;
4 l- C: h0 {. d        end;
  y: `2 J5 ]2 B: j& G4 lend;
这个编程有错误吗？

老马多拉

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

老马多拉

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

sunnyzhao

老马多拉 发表于 2012-8-3 19:32
& ~8 E' i$ C* x. W3 ?& N另外注意，这个method是不能单独运行的。

谢谢您的回复！

小、虞姬

老马多拉 发表于 2012-8-3 19:32
) I7 _; e# K7 V8 Q  m- L) |) H' v另外注意，这个method是不能单独运行的。

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

爱不会累

我也遇到这个问题了