易语言取进程启动时间源码

系统结构:枚举进程_,获取进程经过时间_,API_Process32First,API_Process32Next,sizeof,取创建32位帮助工具快照_,关闭句柄_,打开进程_,API_到本地时间,API_GetDateFormat,API_GetTimeFormat,API_时间结构转换,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ 枚举进程_
           |  |
           |  |
======窗口程序集1
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ _窗口1_创建完毕
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   获取进程经过时间_
           |  |
           |  |---[dll]------   API_Process32First
           |  |
           |  |---[dll]------   API_Process32Next
           |  |
           |  |---[dll]------   sizeof
           |  |
           |  |---[dll]------   取创建32位帮助工具快照_
           |  |
           |  |---[dll]------   关闭句柄_
           |  |
           |  |---[dll]------   打开进程_
           |  |
           |  |---[dll]------   API_到本地时间
           |  |
           |  |---[dll]------   API_GetDateFormat
           |  |
           |  |---[dll]------   API_GetTimeFormat
           |  |
           |  |---[dll]------   API_时间结构转换

调用的DLL命令:

.DLL命令 获取进程经过时间_, 整数型, "kernel32", "GetProcessTimes", , ,
    .参数 进程句柄, 整数型
    .参数 创建时间, 文件时间_
    .参数 中止时间, 文件时间_
    .参数 系统经过时间, 文件时间_
    .参数 用户经过时间, 文件时间_

.DLL命令 API_Process32First, 整数型, "KERNEL32.DLL", "Process32First"
    .参数 hSnapshot, 整数型
    .参数 lppe, LPPROCESSENTRY32

.DLL命令 API_Process32Next, 整数型, , "Process32Next"
    .参数 h, 整数型
    .参数 p, LPPROCESSENTRY32

.DLL命令 sizeof, 整数型, "ComCtl32.dll", "#74", , sizeof_数据类型1
    .参数 参数一, LPPROCESSENTRY32, 传址

.DLL命令 取创建32位帮助工具快照_, 整数型, "kernel32.dll", "CreateToolhelp32Snapshot", , , 取进程信息
    .参数 标志, 整数型, , lFlags
    .参数 进程标识符, 整数型, , lProcessID

.DLL命令 关闭句柄_, 整数型, , "CloseHandle"
    .参数 hObject, 整数型

.DLL命令 打开进程_, 整数型, "kernel32.dll", "OpenProcess", , , 将句柄返回给过程对象
    .参数 进程对象, 整数型, , dwDesiredAccess
    .参数 继承句柄, 整数型, , bInheritHandle
    .参数 进程标识符, 整数型, , dwProcessId

.DLL命令 API_到本地时间, 整数型, "kernel32", "FileTimeToLocalFileTime", , 将一个FILETIME结构转换成本地时间  非零表示成功，零表示失败。会设置GetLastError
    .参数 文件时间, 文件时间_, , FILETIME，包含了UTC时间信息的一个结构
    .参数 所在文件时间, 文件时间_, , FILETIME，用于装载转换过后的本地时间的结构;

.DLL命令 API_GetDateFormat, 整数型, "kernel32", "GetDateFormatA", , 针对指定的“当地”格式，对一个系统日期进行格式化  格式化过后的字串的长度。零表示出错，会将GetLastError设置为下述值之一：ERROR_INSUFFICIENT_BUFFER，ERROR_INVALID_FLAGS，ERROR_INVALID_PARAMETER
    .参数 Locale, 整数型, , 用于决定格式的地方ID。lpFormat参数中指定的任何信息（倘若不是NULL）都优先于特定于地方的信息
    .参数 dwFlags, 整数型, , 如指定了lpFormat，那么该参数应该为零。否则，可设为LOCALE_NOUSEROVERRIDE，强制使用系统地方参数——即使它们已由用户取代。用DATE_SHORTDATE 或 DATE_LONGDATE选择不同的日期格式
    .参数 lpDate, SYSTEMTIME, , SYSTEMTIME，包含了一个系统日期的结构
    .参数 lpFormat, 文本型, , 可设为NULL，使用特定于不同地方的值（用vbNull传递一个NULL）。否则包含一个日期格式字串。对d,dd,ddd,dddd,m,mm,mmm,mmmm,y,yy,yyyy这样的代码，它们的用法与在vb格式命令中的用法是相同的。注意用gg指定一个“纪元”
    .参数 lpDateStr, 文本型, , 指定一个缓冲区，用于容纳格式化过后的字串。注意事先对字串进行初始化
    .参数 cchDate, 整数型, , lpDateStr缓冲区的长度。如为零，表示函数会返回需要缓冲区的大小;

.DLL命令 API_GetTimeFormat, 整数型, "kernel32.dll", "GetTimeFormatA", , 针对指定的“当地”格式，对一个系统时间进行格式化。
    .参数 地方ID, 整数型, , Locale，用于决定格式的地方ID。lpFormat参数中指定的任何信息（倘若不是NULL）都优先于特定于地方的信息
    .参数 标志, 整数型, , dwFlags，如指定了lpFormat，那么该参数应该为零。否则，可设为LOCALE_NOUSEROVERRIDE，强制使用系统地方参数
    .参数 时间结构, SYSTEMTIME, 传址, lpDate，SYSTEMTIME，用于包容系统时间的一个结构
    .参数 格式化, 文本型, 传址, lpFormat，String，可设为NULL，使用特定于不同地方的值（用vbNullString传递一个NULL）。
    .参数 缓冲区文本, 文本型, , lpDateStr，指定一个缓冲区，用于容纳格式化过后的字串。注意事先对字串进行初始化
    .参数 缓冲区文本长度, 整数型, , cchDate，缓冲区的长度。如为零，表示函数会返回需要缓冲区的大小;

.DLL命令 API_时间结构转换, 整数型, "kernel32", "FileTimeToSystemTime", , 根据一个FILETIME结构的内容，装载一个SYSTEMTIME结构  非零表示成功，零表示失败。会设置GetLastError
    .参数 文件时间结构, 文件时间_, 传址, FILETIME，包含了文件时间的一个结构
    .参数 系统时间结构, SYSTEMTIME, 传址, SYSTEMTIME，用于装载系统时间信息的一个结构;