TC官方合作论坛

标题: 如何统计程序或者某功能的运行时间 [打印本页]

作者: lx0113    时间: 2014-10-21 12:25
标题: 如何统计程序或者某功能的运行时间
比如我用定时器,注册1秒一次显示

如何显示把程序运行时间 显示为 1时1分1秒


  1. 功能 开始()
  2. 定时器.注册("定时器0",1000)
  3. 功能结束
  4. 功能 定时器0_时钟()
  5.     运行时间++
  6.         if(运行时间<60)
  7.         时间="0分"&运行时间&"秒"
  8.     endif
  9.     窗口.设置标题(窗口.自身句柄(),时间)
  10. 功能结束
复制代码




作者: lx0113    时间: 2014-10-21 12:43
自己写了个 貌似可以运行了
  1. 运行时间++
  2.    
  3.     分=类型.取整(运行时间/60)
  4.     时= 类型.取整(分/60)
  5.     if(运行时间<60)
  6.         时间="0分"&运行时间&"秒"
  7.     else
  8.         时间=分&"分"&(运行时间-分*60)&"秒"
  9.         if(分>60)
  10.             时间=时&"时"&(分-时*60)&"分"&(运行时间-分*60)&"秒"
  11.         endif
  12.         
  13.     endif
复制代码

作者: sam7894604    时间: 2014-10-21 18:52
本帖最后由 sam7894604 于 2014-10-21 18:53 编辑

无聊写个...
  1. 变量 运行时间
  2. 功能 按钮0_点击()
  3.     定时器.注册("定时器0",1000)
  4. 功能结束

  5. 功能 定时器0_时钟()
  6.     运行时间++
  7.     时间 = 日期时间.指定日期("s",运行时间,"2000/01/01 00:00:00")
  8.     时 = 日期时间.时(时间)
  9.     如果(时 < 10)
  10.         时 = "0"&时
  11.     如果结束
  12.     分 = 日期时间.分(时间)
  13.     如果(分 < 10)
  14.         分 = "0"&分
  15.     如果结束
  16.     秒 = 日期时间.秒(时间)
  17.     如果(秒 < 10)
  18.         秒 = "0"&秒
  19.     如果结束
  20.     时间 = 字符串.格式化("%s 时 %s 分 %s 秒",时,分,秒)
  21.     调试输出(时间)
  22. 功能结束
复制代码

作者: q273814    时间: 2014-10-23 09:16
程序启动的时候获取下系统毫秒
然后定时器里获取系统毫秒并计算启动时间的差
接着格式化成时间格式
然后显示
作者: lx0113    时间: 2014-10-23 14:45
lx0113 发表于 2014-10-21 12:43
自己写了个 貌似可以运行了

谢谢帮助,请问
  1. 如果(时 < 10)
  2.         时 = "0"&时
  3.     如果结束
复制代码

的意思是什么呢?时间怎么有10?




欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/) Powered by Discuz! X3.1