|
发表于 2020-9-17 21:11:14
|
显示全部楼层
湖南省邵阳市
.版本 2
' http://ec.125.la/
g_Time = 取现行时间 ()
标签1.标题 = “记录时间:” + 到文本 (g_Time)
.子程序 _按钮1_被单击
.局部变量 ProcessInfo, 精易_进程信息数组, , "0"
.局部变量 ProcessID, 整数型
.局部变量 StartTime, 日期时间型
.局部变量 Interval, 整数型
.局部变量 len, 整数型
.局部变量 i, 整数型
len = 进程_取系统进程列表 (ProcessInfo)
.计次循环首 (len, i)
ProcessID = ProcessInfo .进程标识符
StartTime = 到时间 (进程_取进程启动时间 (ProcessID))
Interval = 取时间间隔 (StartTime, g_Time, #秒)
.如果真 (Interval > -1)
标签2.标题 = “新进程:” + 进程_ID取进程名 (ProcessID) + 取空白文本 (4) + “进程ID:” + 到文本 (ProcessID)
.如果真结束
.计次循环尾 ()
g_Time = 取现行时间 ()
标签1.标题 = “记录时间:” + 到文本 (g_Time)
|
|