易语言超级编辑框查找选择源码

系统结构:子程序_消息循环,打开查找文本窗口,处理FindText,NewWndLong,IsDialogMessage,RtlMoveMemory_FINDREPLACE2Ptr,RtlMoveMemory_FINDTEXTEX2Ptr,RtlMoveMemory_Ptr2FINDTEXTEX,FindText,RtlMoveMemory_Ptr2FINDREPLACE,RegisterWindowMessage,SetWindowLong,GetMessage,IsWindow,TranslateMessage,DispatchMessage,HeapAlloc,GetProcessHeap,GetModuleHandle,SetForegroundWindow,HeapFree,CallWindowProc,GetForegroundWindow,lstrlen,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 子程序_消息循环
           |  |
           |  |------ 打开查找文本窗口
           |  |
           |  |------ 处理FindText
           |  |
           |  |------ _查找_被选择
           |  |
           |  |------ NewWndLong
           |  |
           |  |------ _查找下一个_被选择
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   IsDialogMessage
           |  |
           |  |---[dll]------   RtlMoveMemory_FINDREPLACE2Ptr
           |  |
           |  |---[dll]------   RtlMoveMemory_FINDTEXTEX2Ptr
           |  |
           |  |---[dll]------   RtlMoveMemory_Ptr2FINDTEXTEX
           |  |
           |  |---[dll]------   FindText
           |  |
           |  |---[dll]------   RtlMoveMemory_Ptr2FINDREPLACE
           |  |
           |  |---[dll]------   RegisterWindowMessage
           |  |
           |  |---[dll]------   SetWindowLong
           |  |
           |  |---[dll]------   GetMessage
           |  |
           |  |---[dll]------   IsWindow
           |  |
           |  |---[dll]------   TranslateMessage
           |  |
           |  |---[dll]------   DispatchMessage
           |  |
           |  |---[dll]------   HeapAlloc
           |  |
           |  |---[dll]------   GetProcessHeap
           |  |
           |  |---[dll]------   GetModuleHandle
           |  |
           |  |---[dll]------   SetForegroundWindow
           |  |
           |  |---[dll]------   HeapFree
           |  |
           |  |---[dll]------   CallWindowProc
           |  |
           |  |---[dll]------   GetForegroundWindow
           |  |
           |  |---[dll]------   _FINDTEXT
           |  |
           |  |---[dll]------   lstrlen

调用的DLL命令:

.DLL命令 IsDialogMessage, 整数型, "user32", "IsDialogMessageA"
    .参数 hDlg, 整数型
    .参数 lpMsg, MSG

.DLL命令 RtlMoveMemory_FINDREPLACE2Ptr, , "kernel32.dll", "RtlMoveMemory"
    .参数 pTo, 整数型, , pTo
    .参数 uFrom, FINDREPLACE, , uFrom
    .参数 lSize, 整数型, , lSize

.DLL命令 RtlMoveMemory_FINDTEXTEX2Ptr, , "kernel32.dll", "RtlMoveMemory"
    .参数 pTo, 整数型, , pTo
    .参数 uFrom, FINDTEXTEX, , uFrom
    .参数 lSize, 整数型, , lSize

.DLL命令 RtlMoveMemory_Ptr2FINDTEXTEX, , "kernel32.dll", "RtlMoveMemory"
    .参数 pTo, FINDTEXTEX, , pTo
    .参数 uFrom, 整数型, , uFrom
    .参数 lSize, 整数型, , lSize

.DLL命令 FindText, 整数型, "comdlg32.dll", "FindTextA"
    .参数 pFindreplace, 整数型

.DLL命令 RtlMoveMemory_Ptr2FINDREPLACE, , "kernel32.dll", "RtlMoveMemory"
    .参数 pTo, FINDREPLACE, , pTo
    .参数 uFrom, 整数型, , uFrom
    .参数 lSize, 整数型, , lSize

.DLL命令 RegisterWindowMessage, 整数型, , "RegisterWindowMessageA", 公开
    .参数 lpString, 文本型

.DLL命令 SetWindowLong, 整数型, "user32.dll", "SetWindowLongA", 公开
    .参数 hwnd, 整数型
    .参数 nIndex, 整数型
    .参数 dwNewLong, 整数型

.DLL命令 GetMessage, 整数型, "user32.dll", "GetMessageA", 公开
    .参数 lpMsg, MSG, 传址
    .参数 hwnd, 整数型
    .参数 wMsgFilterMin, 整数型
    .参数 wMsgFilterMax, 整数型

.DLL命令 IsWindow, 逻辑型, "user32.dll", , 公开
    .参数 hwnd, 整数型

.DLL命令 TranslateMessage, 整数型, "user32.dll", , 公开
    .参数 lpMsg, MSG, 传址

.DLL命令 DispatchMessage, 整数型, "user32.dll", "DispatchMessageA", 公开
    .参数 lpMsg, MSG, 传址

.DLL命令 HeapAlloc, 整数型, "kernel32.dll", , 公开, 在进程堆中分配内存,返回内存指针.
    .参数 hHeap, 整数型, , 堆句柄
    .参数 dwFlags, 整数型
    .参数 dwBytes, 整数型

.DLL命令 GetProcessHeap, 整数型, "kernel32.dll", , 公开, 返回当前进程堆的句柄

.DLL命令 GetModuleHandle, 整数型, "kernel32", "GetModuleHandleA"
    .参数 lpModuleName, 整数型

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

.DLL命令 HeapFree, 整数型, "kernel32.dll", , 公开
    .参数 hHeap, 整数型
    .参数 dwFlags, 整数型
    .参数 lpMem, 整数型

.DLL命令 CallWindowProc, 整数型, "user32.dll", "CallWindowProcA", 公开
    .参数 lpPrevWndFunc, 整数型
    .参数 hwnd, 整数型
    .参数 msg, 整数型
    .参数 wParam, 整数型
    .参数 lParam, 整数型

.DLL命令 GetForegroundWindow, 整数型, "user32", "GetForegroundWindow"

.DLL命令 _FINDTEXT, 整数型, "kernel32", "SetHandleCount"
    .参数 wNumber, FINDTEXTEX

.DLL命令 lstrlen, 整数型, "kernel32", "lstrlenA"
    .参数 lpString, 整数型