易语言修改windows系统OEM信息源码

系统结构:提升进程权限,api_OpenProcessToken,api_AdjustTokenPrivileges,api_LookupPrivilegeValue,api_GetCurrentProcess,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ _按钮_写OEM信息_被单击
           |  |
           |  |------ 提升进程权限
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   api_OpenProcessToken
           |  |
           |  |---[dll]------   api_AdjustTokenPrivileges
           |  |
           |  |---[dll]------   api_LookupPrivilegeValue
           |  |
           |  |---[dll]------   api_GetCurrentProcess

调用的DLL命令:

.DLL命令 api_OpenProcessToken, 整数型, "advapi32.dll", "OpenProcessToken"
    .参数 ProcessHandle, 整数型
    .参数 DesiredAccess, 整数型
    .参数 TokenHandle, 整数型, 传址

.DLL命令 api_AdjustTokenPrivileges, 逻辑型, "advapi32.dll", "AdjustTokenPrivileges"
    .参数 TokenHandle, 整数型
    .参数 DisableAllPrivileges, 整数型
    .参数 NewState, TOKEN_PRIVILEGES, 传址
    .参数 BufferLength, 整数型
    .参数 PreviousState, TOKEN_PRIVILEGES, 传址
    .参数 ReturnLength, 整数型, 传址

.DLL命令 api_LookupPrivilegeValue, 逻辑型, "advapi32.dll", "LookupPrivilegeValueA"
    .参数 lpSystemName, 文本型
    .参数 lpName, 文本型
    .参数 lpLuid, LuID, 传址

.DLL命令 api_GetCurrentProcess, 整数型, "kernel32.dll", "GetCurrentProcess"