易语言资源查看器源码

系统结构:是否存在子目录,回调函数,树型框即将被扩展,列举目录,树型框项目被选择,列举文件,创建,取窗口句柄,添加项目,取项目文本,取子项目,删除项目,取路径,取现行选中项,创建,取窗口句柄,添加项目,取位图句柄,API_CreateWindowEx,API_GetModuleHandle,API_ImageList_Create,API_ImageList_Add,API_SendMessage,API_lstrcpyn_TVINSERTSTRUCT,API_SetWindowLong,API_RtlMoveMemory,API_lstrcpyn_NM_TREEVIEW,API_lstrcpyn_NMHDR,API_lstrcpyn_TVITEM,API_CallWindowProc,API_lstrcpyn_TVITEM2,API_lstrcpyn_LVITEM,取结构尺寸,SHGetFileInfo,API_ImageList_AddIcon,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 是否存在子目录
           |  |
           |  |------ 回调函数
           |  |
           |  |------ 树型框即将被扩展
           |  |
           |  |------ 列举目录
           |  |
           |  |------ 树型框项目被选择
           |  |
           |  |------ 列举文件
           |  |
           |  |
======我的树型框
           |  |
           |  |------ _初始化
           |  |
           |  |------ _销毁
           |  |
           |  |------ 创建
           |  |
           |  |------ 取窗口句柄
           |  |
           |  |------ 添加项目
           |  |
           |  |------ 取项目文本
           |  |
           |  |------ 取子项目
           |  |
           |  |------ 删除项目
           |  |
           |  |------ 取路径
           |  |
           |  |------ 取现行选中项
           |  |
           |  |
======我的列表框
           |  |
           |  |------ _初始化
           |  |
           |  |------ _销毁
           |  |
           |  |------ 创建
           |  |
           |  |------ 取窗口句柄
           |  |
           |  |------ 添加项目
           |  |
           |  |------ 取位图句柄
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   API_CreateWindowEx
           |  |
           |  |---[dll]------   API_GetModuleHandle
           |  |
           |  |---[dll]------   API_ImageList_Create
           |  |
           |  |---[dll]------   API_ImageList_Add
           |  |
           |  |---[dll]------   API_SendMessage
           |  |
           |  |---[dll]------   API_lstrcpyn_TVINSERTSTRUCT
           |  |
           |  |---[dll]------   API_SetWindowLong
           |  |
           |  |---[dll]------   API_RtlMoveMemory
           |  |
           |  |---[dll]------   API_lstrcpyn_NM_TREEVIEW
           |  |
           |  |---[dll]------   API_lstrcpyn_NMHDR
           |  |
           |  |---[dll]------   API_lstrcpyn_TVITEM
           |  |
           |  |---[dll]------   API_CallWindowProc
           |  |
           |  |---[dll]------   API_lstrcpyn_TVITEM2
           |  |
           |  |---[dll]------   API_lstrcpyn_LVITEM
           |  |
           |  |---[dll]------   取结构尺寸
           |  |
           |  |---[dll]------   SHGetFileInfo
           |  |
           |  |---[dll]------   API_ImageList_AddIcon

调用的DLL命令:

.DLL命令 API_CreateWindowEx, 整数型, "user32", "CreateWindowExA", , 建立窗口
    .参数 dwExStyle, 整数型
    .参数 lpClassName, 文本型
    .参数 lpWindowName, 文本型
    .参数 dwStyle, 整数型
    .参数 x, 整数型
    .参数 y, 整数型
    .参数 nWidth, 整数型
    .参数 nHeight, 整数型
    .参数 hWndParent, 整数型
    .参数 hMenu, 整数型
    .参数 hInstance, 整数型
    .参数 lpParam, 整数型

.DLL命令 API_GetModuleHandle, 整数型, "kernel32", "GetModuleHandleA", , 获取一个应用程序或动态链接库的模块句柄  如执行成功成功，则返回模块句柄。零表示失败。会设置GetLastError
    .参数 lpModuleName, 整数型, , 指定模块名，这通常是与模块的文件名相同的一个名字。例如，NOTEPAD.EXE程序的模块文件名就叫作NOTEPAD;

.DLL命令 API_ImageList_Create, 整数型, "comctl32.dll", "ImageList_Create"
    .参数 cx, 整数型
    .参数 cy, 整数型
    .参数 flags, 整数型
    .参数 cInitial, 整数型
    .参数 cGrow, 整数型

.DLL命令 API_ImageList_Add, 整数型, "comctl32.dll", "ImageList_Add"
    .参数 himl, 整数型
    .参数 hbmImage, 整数型
    .参数 hbmMask, 整数型

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

.DLL命令 API_lstrcpyn_TVINSERTSTRUCT, 整数型, "kernel32.dll", "lstrcpyn"
    .参数 目标, TVINSERTSTRUCT, 传址
    .参数 源, TVINSERTSTRUCT, 传址
    .参数 长度, 整数型

.DLL命令 API_SetWindowLong, 整数型, "user32", "SetWindowLongA", , 在窗口结构中为指定的窗口设置信息  指定数据的前一个值
    .参数 hwnd, 整数型, , 欲为其取得信息的窗口的句柄
    .参数 nIndex, 整数型, , 请参考GetWindowLong函数的nIndex参数的说明
    .参数 dwNewLong, 整数型, , 由nIndex指定的窗口信息的新值;

.DLL命令 API_RtlMoveMemory, 整数型, "kernel32.dll", "RtlMoveMemory"
    .参数 目标地址, 整数型, , Any
    .参数 源地址, 字节集, , Any
    .参数 数据长度, 整数型

.DLL命令 API_lstrcpyn_NM_TREEVIEW, 整数型, "kernel32.dll", "lstrcpyn"
    .参数 目标, NM_TREEVIEW, 传址
    .参数 源, NM_TREEVIEW, 传址
    .参数 长度, 整数型

.DLL命令 API_lstrcpyn_NMHDR, 整数型, "kernel32.dll", "lstrcpyn"
    .参数 目标, NMHDR, 传址
    .参数 源, NMHDR, 传址
    .参数 长度, 整数型

.DLL命令 API_lstrcpyn_TVITEM, 整数型, "kernel32.dll", "lstrcpyn"
    .参数 目标, TVITEM, 传址
    .参数 源, TVITEM, 传址
    .参数 长度, 整数型

.DLL命令 API_CallWindowProc, 整数型, "user32", "CallWindowProcA", , 将消息传答窗口函数
    .参数 lpPrevWndFunc, 整数型
    .参数 hwnd, 整数型
    .参数 msg, 整数型
    .参数 wParam, 整数型
    .参数 lParam, 整数型

.DLL命令 API_lstrcpyn_TVITEM2, 整数型, "kernel32.dll", "lstrcpyn"
    .参数 目标, TVITEM2, 传址
    .参数 源, TVITEM2, 传址
    .参数 长度, 整数型

.DLL命令 API_lstrcpyn_LVITEM, 整数型, "kernel32.dll", "lstrcpyn"
    .参数 目标, LVITEM, 传址
    .参数 源, LVITEM, 传址
    .参数 长度, 整数型

.DLL命令 取结构尺寸, 整数型, "ComCtl32.dll", "#74"
    .参数 参数一, NM_TREEVIEW, 传址

.DLL命令 SHGetFileInfo, 整数型, , "SHGetFileInfo"
    .参数 pszPath, 文本型
    .参数 dwFileAttributes, 整数型
    .参数 psfi, SHFILEINFO, 传址
    .参数 cbFileInfo, 整数型
    .参数 uFlags, 整数型

.DLL命令 API_ImageList_AddIcon, 整数型, "comctl32.dll", "ImageList_AddIcon"
    .参数 HIMAGELIST, 整数型
    .参数 hicon, 整数型