设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 2426|回复: 3

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

  [复制链接]
发表于 2014-4-20 19:54:43 | 显示全部楼层 |阅读模式
is- ~8 s9 B: c* l9 H. j$ y- {
        m,n:integer;
2 @, b0 H! s3 v4 T3 b7 U        Name:string;
# ^% d/ ~- ?+ u* N" W/ c3 {+ O        obj:object;4 B" Y% d2 O+ ~3 @9 j
do, H! f- n7 [" X; S8 p8 r/ r) w
        m:=str_to_num(omit(?.Name,1,5));) s5 E6 V  g! U3 x8 J( y
        Name:=sprint("Output_Line",m);
" x  y) U- K/ m$ l1 }! w' g% L        obj:=str_to_obj(Name);6 }; y( ?" D6 `* J- i
        obj.val:=?.StatNumIn;
9 h8 z* I" z1 u, M& M) M" a! I        if m>1 then' ?* n" R6 s! [  x' u
                Name:=sprint("OutRate_Line",m);3 f: u5 z5 T6 C  Q4 Z  w* N
                obj:=str_to_obj(Name);  \% j0 k8 r5 S( n! S
                obj.val:=n*100/OutPut_Line1;
; T1 e7 |: R8 S+ s        end;
3 o' a+ }$ F9 t. wend;
发表于 2014-4-20 20:55:13 | 显示全部楼层
不知道你的问题是什么?问题可能是最后一句吧,整除可能有问题吧。, z0 K6 N! B/ j. ?2 O* B: n
obj.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:45 , Processed in 0.014829 second(s), 16 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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