易语言枚举窗口自定义属性源码

系统结构:PropEnumProcEx,指针到文本_,W2A,EnumPropsEx,EnumProps,SetProp,IsBadReadPtr,WideCharToMultiByte,

======窗口程序集_启动窗口
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ PropEnumProcEx
           |  |
           |  |------ 指针到文本_
           |  |
           |  |------ W2A
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   EnumPropsEx
           |  |
           |  |---[dll]------   EnumProps
           |  |
           |  |---[dll]------   SetProp
           |  |
           |  |---[dll]------   IsBadReadPtr
           |  |
           |  |---[dll]------   WideCharToMultiByte

调用的DLL命令:

.DLL命令 EnumPropsEx, 整数型, "user32.dll", "EnumPropsExW", , 返回窗口属性表列
    .参数 hWnd, 整数型
    .参数 lpEnumFunc, 整数型
    .参数 lParam, 整数型, 传址

.DLL命令 EnumProps, 整数型, "user32", "EnumPropsA", , 返回窗口属性表列
    .参数 hWnd, 整数型
    .参数 lpEnumFunc, 整数型

.DLL命令 SetProp, 整数型, "user32", "SetPropA", , 增加或修改属性列项
    .参数 hwnd, 整数型
    .参数 lpString, 文本型
    .参数 hData, 整数型

.DLL命令 IsBadReadPtr, 整数型, "kernel32", "IsBadReadPtr", , 确定进程是否有读动作
    .参数 lp, 整数型
    .参数 ucb, 整数型

.DLL命令 WideCharToMultiByte, 整数型, , "WideCharToMultiByte"
    .参数 CodePage, 整数型
    .参数 dwFlags, 整数型
    .参数 lpWideCharStr, 字节集
    .参数 cchWideChar, 整数型
    .参数 lpMultiByteStr, 文本型
    .参数 cchMultiByte, 整数型
    .参数 lpDefaultChar, 文本型
    .参数 lpUsedDefaultChar, 整数型