易语言API取操作系统信息源码

系统结构:GetOsVersion,GetCpuInfo,GetMemInfo,GetDriverInfo,GetInfo,GetModuleHandle,DialogBoxParam,EndDialog,GetVersion,ExitProcess,SetDlgItemText,GetDlgItemText,GlobalMemoryStatus,GetDriveType,GetDiskFreeSpaceEx,GetWindow,FindWindow,IsDlgButtonChecked,SendMessage,GetLastError,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ GetOsVersion
           |  |
           |  |------ GetCpuInfo
           |  |
           |  |------ GetMemInfo
           |  |
           |  |------ GetDriverInfo
           |  |
           |  |------ GetInfo
           |  |
           |  |------ _选择框_大小_被单击
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ _选择框_总在最前_被单击
           |  |
           |  |------ _按钮2_被单击
           |  |
           |  |------ _选择框_自动刷新_被单击
           |  |
           |  |------ _时钟1_周期事件
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   GetModuleHandle
           |  |
           |  |---[dll]------   DialogBoxParam
           |  |
           |  |---[dll]------   EndDialog
           |  |
           |  |---[dll]------   GetVersion
           |  |
           |  |---[dll]------   ExitProcess
           |  |
           |  |---[dll]------   SetDlgItemText
           |  |
           |  |---[dll]------   GetDlgItemText
           |  |
           |  |---[dll]------   GlobalMemoryStatus
           |  |
           |  |---[dll]------   GetDriveType
           |  |
           |  |---[dll]------   GetDiskFreeSpaceEx
           |  |
           |  |---[dll]------   GetWindow
           |  |
           |  |---[dll]------   FindWindow
           |  |
           |  |---[dll]------   IsDlgButtonChecked
           |  |
           |  |---[dll]------   SendMessage
           |  |
           |  |---[dll]------   GetLastError

调用的DLL命令:

.DLL命令 GetModuleHandle, 整数型, , "GetModuleHandleA"
    .参数 lpHandleName, 整数型

.DLL命令 DialogBoxParam, 整数型, , "DialogBoxParamA"
    .参数 hInstance, 整数型
    .参数 lpTempLateName, 整数型
    .参数 hWndParent, 整数型
    .参数 lpDialogFunc, 整数型
    .参数 dwInitParam, 整数型

.DLL命令 EndDialog, 整数型, , "EndDialog"
    .参数 hwnd, 整数型
    .参数 nResult, 整数型

.DLL命令 GetVersion, 整数型, "kernel32.dll", "GetVersion", , ,

.DLL命令 ExitProcess, 整数型, , "ExitProcess"
    .参数 uExitCode, 整数型

.DLL命令 SetDlgItemText, 整数型, "user32", "SetDlgItemTextA", , 设置对话框标题或文本
    .参数 hDlg, 整数型
    .参数 nIDDlgItem, 整数型
    .参数 lpString, 文本型

.DLL命令 GetDlgItemText, 整数型, "user32", "GetDlgItemTextA", , 返回对话框控件文本
    .参数 hDlg, 整数型
    .参数 nIDDlgItem, 整数型
    .参数 lpString, 文本型, 传址
    .参数 nMaxCount, 整数型

.DLL命令 GlobalMemoryStatus, 整数型, , "GlobalMemoryStatusEx"
    .参数 Buffer, MEMORYSTATUS, 传址

.DLL命令 GetDriveType, 整数型, , "GetDriveTypeA"
    .参数 lpRootPathName, 文本型, 传址

.DLL命令 GetDiskFreeSpaceEx, 整数型, , "GetDiskFreeSpaceExA"
    .参数 DirectoryName, 文本型
    .参数 pFreeBytesAvailableToCaller, 长整数型, 传址
    .参数 pTotalNumberOfBytes, 长整数型, 传址
    .参数 pTotalNumberOfFreeBytes, 长整数型, 传址

.DLL命令 GetWindow, 整数型, "user32", "GetWindow", , , 获得一个窗口的句柄，该窗口与某源窗口有特定的关系
    .参数 hwnd, 整数型, , 源窗口
    .参数 wCmd, 整数型, , 指定结果窗口与源窗口的关系

.DLL命令 FindWindow, 整数型, "user32", "FindWindowA", , , 寻找窗口列表中第一个符合指定条件的顶级窗口
    .参数 lpClassName, 文本型, , 窗口类名
    .参数 lpWindowName, 文本型, , 窗口文本（标题）

.DLL命令 IsDlgButtonChecked, 逻辑型, , "IsDlgButtonChecked"
    .参数 hDlg, 整数型
    .参数 nkDButtom, 整数型

.DLL命令 SendMessage, 整数型, , "SendMessageA"
    .参数 hWnd, 整数型
    .参数 wMsg, 整数型
    .参数 wParam, 整数型
    .参数 lParam, 文本型

.DLL命令 GetLastError, 整数型, , "GetLastError"