设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 2424|回复: 3

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

  [复制链接]
发表于 2014-4-20 19:54:43 | 显示全部楼层 |阅读模式
is+ \, ^4 c5 c$ ^6 `1 p) @
        m,n:integer;- I$ G8 O9 k. _" h8 P! R' t# C
        Name:string;- `4 L2 J0 n1 h6 V
        obj:object;
" E( L. A1 @4 k9 b; }. u: i: d& Q8 |do
$ o) W$ W& O) i        m:=str_to_num(omit(?.Name,1,5));
: H% ]7 D9 J# m. e9 w/ D& p- n5 X        Name:=sprint("Output_Line",m);( I0 B; ^. `4 ?- u1 r
        obj:=str_to_obj(Name);% L) G7 [" V0 h+ B2 U% ^0 o
        obj.val:=?.StatNumIn;
& c  T4 y) @9 q8 B/ J3 |        if m>1 then, R, E3 @' |/ F- T7 C8 R3 `
                Name:=sprint("OutRate_Line",m);$ B7 J* f+ w; w0 j! i& v
                obj:=str_to_obj(Name);& L$ W8 p8 j, v+ K
                obj.val:=n*100/OutPut_Line1;
6 x$ z) {& I+ B" t: i# _! @        end;( o( t+ D) L! j( T9 X9 s
end;
发表于 2014-4-20 20:55:13 | 显示全部楼层
不知道你的问题是什么?问题可能是最后一句吧,整除可能有问题吧。
0 U" J; ~4 x  V- ]  Eobj.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:42 , Processed in 0.013564 second(s), 16 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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