求高手点拨

sunnyzhao

is
7 C& u, C- D* ^& l- Z        m,n:integer;
        Name:string;
        Obj:Object;
* O# S0 \& y2 O% G  l0 N+ ?0 N$ I- cdo
8 i3 U1 I8 \  O) S% E+ ]        m:= str_to_num(omit(?.Name,1,5));
) m- ]: U/ k  w" b! J       
+ Y, S; j3 _& |( u        Name:=sprint("Output_Line1",m);
        Obj:=str_to_obj(Name);
& `/ _% o: e7 c$ ?2 z        Obj.val:=?.StatNumIn;
        if m>1 then
                Name:=sprint("OutRate_Line",m);
                Obj:=str_to_obj(Name);
( @8 C9 h6 u2 r; i2 J# ?                Obj.val:=n*100/OutPut_Line1;
- ~) D6 Y9 B* m4 c0 X1 f        end;
end;
1 |- Q5 y; u: F5 k& B6 c2 `5 a# U这个编程有错误吗？

老马多拉

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

老马多拉

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

sunnyzhao

老马多拉 发表于 2012-8-3 19:32
5 r- E& _0 d. g# U# x# n# Q) P, _6 S另外注意，这个method是不能单独运行的。

% V# y4 U6 @! Q8 t: o2 [谢谢您的回复！

小、虞姬

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

6 S+ U# l' j" w2 X# w: p6 V$ c您好，按勘误表改了method，但是还是运行时还是出现了问题。请问这是怎么回事？我刚刚开始学习，关于如何调试也不是很清楚，请多指点~

爱不会累

我也遇到这个问题了