易语言注册表监视源码

系统结构:CreateEvent,RegOpenKeyEx,RegCloseKey,CloseHandle,RegNotifyChangeKeyValue,WaitForSingleObject,WaitForMultipleObjects,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ _按钮2_被单击
           |  |
           |  |------ _监视注册表
           |  |
           |  |------ _子程序1
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   CreateEvent
           |  |
           |  |---[dll]------   RegOpenKeyEx
           |  |
           |  |---[dll]------   RegCloseKey
           |  |
           |  |---[dll]------   CloseHandle
           |  |
           |  |---[dll]------   RegNotifyChangeKeyValue
           |  |
           |  |---[dll]------   WaitForSingleObject
           |  |
           |  |---[dll]------   WaitForMultipleObjects

调用的DLL命令:

.DLL命令 CreateEvent, 整数型, , "CreateEventA"
    .参数 lpEventAttributes, , , 0
    .参数 bManualReset, 逻辑型
    .参数 bInitialState, 逻辑型
    .参数 lpName, 文本型

.DLL命令 RegOpenKeyEx, 整数型, , "RegOpenKeyExA"
    .参数 hKey, 整数型
    .参数 lpSubKey, 文本型
    .参数 ulOptions, 整数型
    .参数 samDesired, 整数型
    .参数 phkResult, 整数型, 传址

.DLL命令 RegCloseKey, , , "RegCloseKey"
    .参数 hKey, 整数型

.DLL命令 CloseHandle, , , "CloseHandle"
    .参数 Handle, 整数型

.DLL命令 RegNotifyChangeKeyValue, 整数型, , "RegNotifyChangeKeyValue"
    .参数 hKeyx, 整数型
    .参数 bWatchSubtree, 逻辑型
    .参数 dwNotifyFilter, 整数型
    .参数 hEvent, 整数型
    .参数 fAsynchronus, 逻辑型

.DLL命令 WaitForSingleObject, 整数型, , "WaitForSingleObject"
    .参数 hHandle, 整数型
    .参数 dwMilliseconds, 整数型

.DLL命令 WaitForMultipleObjects, 整数型, , "WaitForMultipleObjects"
    .参数 nCount, 整数型
    .参数 lpHandles, 整数型, 传址 数组
    .参数 bWaitAll, 逻辑型
    .参数 dwMilliseconds, 整数型