易语言添加UAC信息模块源码

系统结构:添加UAC信息,开始更新资源,更新资源,结束更新资源,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ 添加UAC信息
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   开始更新资源
           |  |
           |  |---[dll]------   更新资源
           |  |
           |  |---[dll]------   结束更新资源
  ======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ _按钮2_被单击
           |  |
           |  |------ _编辑框1_鼠标左键被按下

调用的DLL命令:

.DLL命令 开始更新资源, 整数型, , "BeginUpdateResourceA"
    .参数 pFileName, 文本型
    .参数 bDeleteExistingResources, 逻辑型

.DLL命令 更新资源, 逻辑型, , "UpdateResourceA"
    .参数 hUpdate, 整数型
    .参数 lpType, 整数型
    .参数 lpName, 整数型
    .参数 wLanguage, 整数型
    .参数 lpData, 字节集
    .参数 cbData, 整数型

.DLL命令 结束更新资源, 逻辑型, , "EndUpdateResourceA"
    .参数 hUpdate, 整数型
    .参数 fDiscard, 逻辑型