求高手点拨

sunnyzhao

is
        m,n:integer;
        Name:string;
- ]; M, Q7 P: L. y: C, E/ u        Obj:Object;
do
  H% D& \. T! G5 j3 z9 D# [' m        m:= str_to_num(omit(?.Name,1,5));
: C3 {* r$ S! X* G+ n- t0 K: J       
' Q# {$ |' i9 g) J8 w        Name:=sprint("Output_Line1",m);
        Obj:=str_to_obj(Name);
        Obj.val:=?.StatNumIn;
        if m>1 then
: q, K7 v' D9 }# I5 I  s0 r                Name:=sprint("OutRate_Line",m);
                Obj:=str_to_obj(Name);
1 G1 x& z# {; ]" v8 A; A- D                Obj.val:=n*100/OutPut_Line1;
        end;
7 M4 \7 U8 g2 @6 w* e% E; j) aend;
这个编程有错误吗？

老马多拉

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

老马多拉

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

sunnyzhao

老马多拉 发表于 2012-8-3 19:32
0 @9 i. [; j5 J0 _% e$ B7 z, n另外注意，这个method是不能单独运行的。

谢谢您的回复！

小、虞姬

老马多拉 发表于 2012-8-3 19:32
& `0 B- @6 C$ P$ Z/ C另外注意，这个method是不能单独运行的。

; n' I) J! {! f; ]9 i* o, x6 Y" d您好，按勘误表改了method，但是还是运行时还是出现了问题。请问这是怎么回事？我刚刚开始学习，关于如何调试也不是很清楚，请多指点~

爱不会累

我也遇到这个问题了