易语言十六进制编辑器源码

系统结构:滚动条事件,取老矩形,取得表项矩形区域,插入数据,文本处理,转换到16进制,补位,编辑结束,进制_十六到十,SendMessage,取表项坐标信息,取表项结构信息,GetDC,CreatePen,GetStockObject,SelectObject,DeleteObject,ReleaseDC,Rectangle,执行窗口程序,置窗口特征,

======窗口程序集1
           |  |
           |  |------ _编辑框1_失去焦点
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ _编辑框1_放开某键
           |  |
           |  |------ 滚动条事件
           |  |
           |  |------ _超级列表框1_被双击
           |  |
           |  |------ _超级列表框1_鼠标左键被按下
           |  |
           |  |------ 取老矩形
           |  |
           |  |------ 取得表项矩形区域
           |  |
           |  |------ _编辑框1_获得焦点
           |  |
           |  |------ __启动窗口_将被销毁
           |  |
           |  |------ 插入数据
           |  |
           |  |------ 文本处理
           |  |
           |  |------ 转换到16进制
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ 补位
           |  |
           |  |------ 编辑结束
           |  |
           |  |------ 进制_十六到十
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   SendMessage
           |  |
           |  |---[dll]------   取表项坐标信息
           |  |
           |  |---[dll]------   取表项结构信息
           |  |
           |  |---[dll]------   GetDC
           |  |
           |  |---[dll]------   CreatePen
           |  |
           |  |---[dll]------   GetStockObject
           |  |
           |  |---[dll]------   SelectObject
           |  |
           |  |---[dll]------   DeleteObject
           |  |
           |  |---[dll]------   ReleaseDC
           |  |
           |  |---[dll]------   Rectangle
           |  |
           |  |---[dll]------   执行窗口程序
           |  |
           |  |---[dll]------   置窗口特征

调用的DLL命令:

.DLL命令 SendMessage, 整数型, "user32", "SendMessageA", 公开, 调用一个窗口的窗口函数，将一条消息发给那个窗口。
    .参数 hwnd, 整数型, , 要接收消息的那个窗口的句柄
    .参数 wMsg, 整数型, , 消息的标识符
    .参数 wParam, 整数型, , 具体取决于消息
    .参数 lParam, 整数型, , 具体取决于消息;

.DLL命令 取表项坐标信息, 整数型, "user32", "SendMessageA"
    .参数 hwnd, 整数型
    .参数 wMsg, 整数型
    .参数 wParam, 整数型
    .参数 lParam, 坐标

.DLL命令 取表项结构信息, 整数型, "user32", "SendMessageA"
    .参数 hwnd, 整数型
    .参数 wMsg, 整数型
    .参数 wParam, 整数型
    .参数 lParam, 表项结构信息

.DLL命令 GetDC, 整数型, , "GetDC"
    .参数 设备句柄

.DLL命令 CreatePen, 整数型, , "CreatePen"
    .参数 nPenStyle
    .参数 nWidth
    .参数 ncolor

.DLL命令 GetStockObject, 整数型, , "GetStockObject"
    .参数 nIndex

.DLL命令 SelectObject, 整数型, , "SelectObject"
    .参数 hdc
    .参数 hObject

.DLL命令 DeleteObject, , , "DeleteObject"
    .参数 hObject

.DLL命令 ReleaseDC, 整数型, , "ReleaseDC"
    .参数 hwnd
    .参数 hldc

.DLL命令 Rectangle, 整数型, , "Rectangle"
    .参数 hdc
    .参数 x
    .参数 y
    .参数 xx
    .参数 xy

.DLL命令 执行窗口程序, 整数型, , "CallWindowProcA"
    .参数 程序指针, 子程序指针
    .参数 窗口句柄, 整数型
    .参数 消息, 整数型
    .参数 参数1, 整数型
    .参数 参数2, 整数型

.DLL命令 置窗口特征, 子程序指针, , "SetWindowLongA"
    .参数 窗口句柄, 整数型
    .参数 要置的特征, 整数型
    .参数 新特征, 子程序指针, , 仅易语言3.0支持