设为首页收藏本站

最大的系统仿真与系统优化公益交流社区

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 2422|回复: 3

[求助] 请大神帮忙看看这段程序。求修改

  [复制链接]
发表于 2014-4-20 19:54:43 | 显示全部楼层 |阅读模式
is
0 [/ t" H* D" Q  G/ z        m,n:integer;
$ m5 m! `' r0 V6 d5 j+ m0 @        Name:string;
4 }% O8 }8 |2 H+ T7 @        obj:object;2 e+ u# w5 D% o: W! a1 M0 k4 B  ]
do
" g4 z; r3 E1 w( B% n( M        m:=str_to_num(omit(?.Name,1,5));
2 Y. w6 W% V$ P- P        Name:=sprint("Output_Line",m);, ?* X! \( A4 z7 n6 V8 q: d7 L
        obj:=str_to_obj(Name);7 q& y1 P- x/ d- W4 Z/ S$ y
        obj.val:=?.StatNumIn;% V: [3 ^' N$ m' }  x8 R
        if m>1 then/ A$ N$ P& z# I0 |7 ]4 S
                Name:=sprint("OutRate_Line",m);
5 n. Q$ e1 q  B8 i! D                obj:=str_to_obj(Name);4 E6 e! t6 B5 H& l7 f
                obj.val:=n*100/OutPut_Line1;9 S9 ^, L, g$ Z' O' ~% M
        end;
1 ~7 M1 c3 u# [# o& M# g% N1 B, Aend;
发表于 2014-4-20 20:55:13 | 显示全部楼层
不知道你的问题是什么?问题可能是最后一句吧,整除可能有问题吧。
) j1 w: h0 _: @" robj.val:=n*100/OutPut_Line1;
发表于 2014-9-5 09:28:02 | 显示全部楼层
这是教程实例   不知道怎么就是出错
发表于 2014-9-5 09:28:17 | 显示全部楼层
求大神指点
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|Archiver|手机版|SimulWay 道于仿真   

GMT+8, 2025-2-19 06:31 , Processed in 0.019573 second(s), 17 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表