求高手点拨

sunnyzhao

is
        m,n:integer;
% _+ }" @2 E! l  K        Name:string;
        Obj:Object;
8 @; g  D; A1 W6 E" W1 L% D9 ?+ Kdo
        m:= str_to_num(omit(?.Name,1,5));
       
        Name:=sprint("Output_Line1",m);
2 i8 U* w5 l7 [6 f$ w2 i" j        Obj:=str_to_obj(Name);
        Obj.val:=?.StatNumIn;
7 A% s! v9 j- ~+ l3 N! Z        if m>1 then
: B+ i; m+ q0 f                Name:=sprint("OutRate_Line",m);
+ ?: @' |7 v" u; E# z) C& j) V                Obj:=str_to_obj(Name);
8 w( P3 }- Q- h5 ^9 x* D, ~  R- x9 t                Obj.val:=n*100/OutPut_Line1;
        end;
& j' `. L9 J' {end;
: `# J$ M1 j/ }8 @/ O+ }这个编程有错误吗？

老马多拉

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

老马多拉

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

sunnyzhao

老马多拉 发表于 2012-8-3 19:32
9 X& S/ j( d/ K' O0 \另外注意，这个method是不能单独运行的。

谢谢您的回复！

小、虞姬

老马多拉 发表于 2012-8-3 19:32
' s1 r- N, S7 w3 D9 u5 `另外注意，这个method是不能单独运行的。

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

爱不会累

我也遇到这个问题了