设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 3904|回复: 3

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

  [复制链接]
发表于 2014-4-20 19:54:43 | 显示全部楼层 |阅读模式
is+ U6 y- O8 a1 j3 U
        m,n:integer;- c% [) E/ {$ D* h) _# [! q
        Name:string;0 l6 r) t+ T  |; }4 R9 I* ~
        obj:object;
; ]: `! |4 i" Z/ ?, _5 h3 a+ xdo
1 d0 u- T0 R% F- b2 L        m:=str_to_num(omit(?.Name,1,5));
8 ~1 f1 H+ u% L: r        Name:=sprint("Output_Line",m);, `# q" I) I: b0 ]! w
        obj:=str_to_obj(Name);
+ I4 ?& _5 q' @4 h; |        obj.val:=?.StatNumIn;
) g) m+ I0 U0 |/ H        if m>1 then' ~4 X  Q5 z0 U6 U' j! d0 G) ]
                Name:=sprint("OutRate_Line",m);! v# ]1 e( s9 p& e" B* T
                obj:=str_to_obj(Name);
1 `, l8 [3 e! Y! ]$ ?# B: u                obj.val:=n*100/OutPut_Line1;8 z4 k$ v5 V$ w
        end;
. X* B$ P) T! o& {, Y3 O5 X3 R. |) |end;
发表于 2014-4-20 20:55:13 | 显示全部楼层
不知道你的问题是什么?问题可能是最后一句吧,整除可能有问题吧。, a: r3 F& A% w- ?; g6 b: p+ u) U: W
obj.val:=n*100/OutPut_Line1;
发表于 2014-9-5 09:28:02 | 显示全部楼层
这是教程实例   不知道怎么就是出错
发表于 2014-9-5 09:28:17 | 显示全部楼层
求大神指点
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2026-6-14 19:06 , Processed in 0.015678 second(s), 16 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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