易语言定位注册表文件模块源码

系统结构:定位注册表,定位文件,查看文件属性,属性对话框,ShellExecuteEx,FindWindow,FindWindowEx,SetForegroundWindow,ShowWindow,SetFocus,SendMessage,GetWindowThreadProcessId,OpenProcess,CloseHandle,WaitForInputIdle,设定执行文件_,Sleep,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ 定位注册表
           |  |
           |  |------ 定位文件
           |  |
           |  |------ 查看文件属性
           |  |
           |  |------ 属性对话框
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   ShellExecuteEx
           |  |
           |  |---[dll]------   FindWindow
           |  |
           |  |---[dll]------   FindWindowEx
           |  |
           |  |---[dll]------   SetForegroundWindow
           |  |
           |  |---[dll]------   ShowWindow
           |  |
           |  |---[dll]------   SetFocus
           |  |
           |  |---[dll]------   SendMessage
           |  |
           |  |---[dll]------   GetWindowThreadProcessId
           |  |
           |  |---[dll]------   OpenProcess
           |  |
           |  |---[dll]------   CloseHandle
           |  |
           |  |---[dll]------   WaitForInputIdle
           |  |
           |  |---[dll]------   设定执行文件_
           |  |
           |  |---[dll]------   Sleep

调用的DLL命令:

.DLL命令 ShellExecuteEx, 整数型, "shell32.dll"
    .参数 lpExecInfo, SHELLEXECUTEINFO, 传址

.DLL命令 FindWindow, 整数型, "user32.dll", "FindWindowA"
    .参数 lpClassName, 文本型
    .参数 lpWindowName, 整数型, , 呵呵

.DLL命令 FindWindowEx, 整数型, "user32.dll", "FindWindowExA"
    .参数 hWnd1, 整数型
    .参数 hWnd2, 整数型
    .参数 lpsz1, 文本型
    .参数 lpsz2, 整数型

.DLL命令 SetForegroundWindow, 整数型, "user32.dll"
    .参数 hwnd, 整数型

.DLL命令 ShowWindow, 整数型, "user32.dll"
    .参数 hwnd, 整数型
    .参数 nCmdShow, 整数型

.DLL命令 SetFocus, 整数型, "user32.dll"
    .参数 hwnd, 整数型

.DLL命令 SendMessage, 整数型, "user32.dll", "SendMessageA"
    .参数 hwnd, 整数型
    .参数 wMsg, 整数型
    .参数 wParam, 整数型
    .参数 lParam, 整数型, 传址

.DLL命令 GetWindowThreadProcessId, 整数型, "user32.dll"
    .参数 hwnd, 整数型
    .参数 lpdwProcessId, 整数型, 传址

.DLL命令 OpenProcess, 整数型, "kernel32.dll"
    .参数 dwDesiredAccess, 整数型
    .参数 bInheritHandle, 整数型
    .参数 dwProcessId, 整数型

.DLL命令 CloseHandle, 整数型, "kernel32.dll"
    .参数 hObject, 整数型

.DLL命令 WaitForInputIdle, 整数型, "user32.dll"
    .参数 hProcess, 整数型
    .参数 dwMilliseconds, 整数型

.DLL命令 设定执行文件_, 整数型, "shell32.dll", "ShellExecuteEx"
    .参数 设定执行文件信息结构, 设定执行文件信息_

.DLL命令 Sleep, , "kernel32.dll"
    .参数 dwMilliseconds, 整数型