易语言取硬盘已使用时间源码

系统结构:CreateFileA,DeviceIoControl,SetConsoleTitle,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   CreateFileA
           |  |
           |  |---[dll]------   DeviceIoControl
           |  |
           |  |---[dll]------   SetConsoleTitle

调用的DLL命令:

.DLL命令 CreateFileA, 整数型, "kernel32.dll", "CreateFileA", , 磁盘_读磁盘扇区
    .参数 打开文件名, 文本型
    .参数 访问权限, 整数型
    .参数 共享方式, 整数型
    .参数 security特性, 整数型
    .参数 创建方式, 整数型
    .参数 文件属性, 整数型
    .参数 从文件复制文件属性, 整数型

.DLL命令 DeviceIoControl, 逻辑型, "kernel32", "DeviceIoControl", ,  
    .参数 hDevice, 整数型
    .参数 dwIoControlCode, 整数型
    .参数 lpInBuffer, 整数型
    .参数 nInBufferSize, 整数型
    .参数 lpOutBuffer, 字节集
    .参数 nOutBufferSize, 整数型
    .参数 lpBytesReturned, 整数型
    .参数 lpOverlapped

.DLL命令 SetConsoleTitle, 整数型, "kernel32", "SetConsoleTitleA"
    .参数 lpConsoleTitle, 文本型