求高手点拨

sunnyzhao

is
        m,n:integer;
5 ~$ s+ r2 e& b" O$ Z+ Y        Name:string;
8 Q$ ^! d/ A/ |/ r5 P        Obj:Object;
. Q' J6 n7 p8 |( ~2 Edo
+ j3 H: L" y9 e5 j8 o) l2 A        m:= str_to_num(omit(?.Name,1,5));
6 L/ T0 j* g; {$ D# @/ w8 J       
& n- {5 D( B4 N5 p" x: B$ F0 G        Name:=sprint("Output_Line1",m);
6 t4 K7 I9 X8 b) |' o        Obj:=str_to_obj(Name);
        Obj.val:=?.StatNumIn;
4 l9 K6 ]4 W0 h: `2 f- ?        if m>1 then
                Name:=sprint("OutRate_Line",m);
4 p7 h7 l' D% I4 V. M; K  A7 A/ W                Obj:=str_to_obj(Name);
                Obj.val:=n*100/OutPut_Line1;
        end;
end;
这个编程有错误吗？

老马多拉

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

老马多拉

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

sunnyzhao

老马多拉 发表于 2012-8-3 19:32
7 H2 {0 |  y- K8 u. |另外注意，这个method是不能单独运行的。

谢谢您的回复！

小、虞姬

老马多拉 发表于 2012-8-3 19:32
: J( O! O# i) N" [! Q另外注意，这个method是不能单独运行的。

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

爱不会累

我也遇到这个问题了