首页 相关文章 利用Api函数计算Windows从启动后所运行的总

利用Api函数计算Windows从启动后所运行的总

PrivateDeclareFunctionGetTickCountLib"kernel32"()AsLong
  
  PrivateSubTimer1_Timer()
  DimhourAsInteger
  DimminuteAsInteger
  DimsecondAsInteger
  hour=GetTickCount10006060
  Label1.Caption=Str(hour) "小时"
  
  minute=(GetTickCount-hour*60*60*1000)100060
  Label2.Caption=Str(minute) "分钟"
  
  second=(GetTickCount-Val(Label1.Caption)*60*60*1000-Val(Label2.Caption)*60*1000)1000
  Label3.Caption=Str(second) "秒钟"
  EndSub->

[ 查看全文 ]

2016-02-19 标签:

利用Api函数计算Windows从启动后所运行的总的相关文章

手机页面
收藏网站 回到头部