易语言图片压缩包合成器源码

系统结构:对话框窗体消息处理子程序,编辑框_内容,取低十六位,打开文件,保存文件,多选文件,DialogBoxParam,EndDialog,GetModuleHandle,SendMessage,LoadIcon,InitCommonControls,GetDlgItem,GetWindowTextA,SetWindowTextA,GetActiveWindow,lstrcpy_bin,GetOpenFileNamePreview,GetSaveFileNamePreview,GetOpenFileNameA,GetSaveFileNameA,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ 对话框窗体消息处理子程序
           |  |
           |  |------ 编辑框_内容
           |  |
           |  |------ 取低十六位
           |  |
           |  |
======类_通用对话框
           |  |
           |  |------ _初始化
           |  |
           |  |------ _销毁
           |  |
           |  |------ 打开文件
           |  |
           |  |------ 保存文件
           |  |
           |  |------ 多选文件
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   DialogBoxParam
           |  |
           |  |---[dll]------   EndDialog
           |  |
           |  |---[dll]------   GetModuleHandle
           |  |
           |  |---[dll]------   SendMessage
           |  |
           |  |---[dll]------   LoadIcon
           |  |
           |  |---[dll]------   InitCommonControls
           |  |
           |  |---[dll]------   GetDlgItem
           |  |
           |  |---[dll]------   GetWindowTextA
           |  |
           |  |---[dll]------   SetWindowTextA
           |  |
           |  |---[dll]------   GetActiveWindow
           |  |
           |  |---[dll]------   lstrcpy_bin
           |  |
           |  |---[dll]------   GetOpenFileNamePreview
           |  |
           |  |---[dll]------   GetSaveFileNamePreview
           |  |
           |  |---[dll]------   GetOpenFileNameA
           |  |
           |  |---[dll]------   GetSaveFileNameA

调用的DLL命令:

.DLL命令 DialogBoxParam, 整数型, , "DialogBoxParamA"
    .参数 hInstance, 整数型
    .参数 lpName, 整数型
    .参数 hWndParent, 整数型
    .参数 lpDialogFunc, 子程序指针
    .参数 dwInitParam, 整数型

.DLL命令 EndDialog, 整数型, , "EndDialog"
    .参数 hwnd, 整数型
    .参数 nResult, 整数型

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

.DLL命令 SendMessage, 整数型, "user32.dll", "SendMessageA", 公开, 调用一个窗口的窗口函数，将一条消息发给那个窗口。除非消息处理完毕，否则该函数不会返回。SendMessageBynum， ;    SendMessageByString是该函数的“类型security”声明形式  由具体的消息决定
    .参数 窗口句柄, 整数型, , 要接收消息的那个窗口的句柄
    .参数 信息值, 整数型, , 消息的标识符
    .参数 参数一, 整数型, , 具体取决于消息
    .参数 参数二, 整数型, , 具体取决于消息;

.DLL命令 LoadIcon, 整数型, "user32.dll", "LoadIconA", 公开, 从指定的模块或应用程序实例中载入一个图标。其中，LoadIconBynum是LoadIcon函数的类型security声明　执行成功则返回已载入的图标的句柄；零表示失败。会设置GetLastError
    .参数 实例句柄, 整数型
    .参数 图标标识, 整数型

.DLL命令 InitCommonControls, , "comctl32.dll", "InitCommonControls"

.DLL命令 GetDlgItem, 整数型, "user32", "GetDlgItem", , 返回对话框控件句柄
    .参数 hDlg, 整数型
    .参数 nIDDlgItem, 整数型

.DLL命令 GetWindowTextA, 整数型, "user32", "GetWindowTextA", , 取得一个窗体的标题（caption）文字，或者一个控件的内容（在vb里使用：使用vb窗体或控件的caption或text属性）  复制到lpString的字串长度；不包括空中止字符。会设置GetLastError
    .参数 hwnd, 整数型, , 欲获取文字的那个窗口的句柄
    .参数 lpString, 文本型, , 预定义的一个缓冲区，至少有cch+1个字符大小；随同窗口文字载入
    .参数 cch, 整数型, , lp缓冲区的长度;

.DLL命令 SetWindowTextA, 文本型, "user32", "SetWindowTextA", , 设置窗口的标题文字或控件的内容（在vb里使用：针对vb窗体，应使用caption或text属性）  非零表示成功，零表示失败。会设置GetLastError
    .参数 hwnd, 整数型
    .参数 lpString, 文本型

.DLL命令 GetActiveWindow, 整数型, "user32", "GetActiveWindow", , 获得活动窗口的句柄  活动窗口的句柄，如没有窗口处于活动状态，则返回零值

.DLL命令 lstrcpy_bin, 整数型, "kernel32", "lstrcpyA", , 复制字符串
    .参数 lpString1, 字节集, 传址, 传址
    .参数 lpString2, 字节集, 传址, 传址

.DLL命令 GetOpenFileNamePreview, 逻辑型, "msvfw32.dll", "GetOpenFileNamePreview"
    .参数 lpofn, OPENFILENAME

.DLL命令 GetSaveFileNamePreview, 逻辑型, "msvfw32.dll", "GetSaveFileNamePreviewW"
    .参数 lpofn, OPENFILENAME

.DLL命令 GetOpenFileNameA, 逻辑型, "comdlg32.dll", "GetOpenFileNameA", , 建立文件名对话框
    .参数 pOpenfilename, OPENFILENAME

.DLL命令 GetSaveFileNameA, 逻辑型, "comdlg32.dll", "GetSaveFileNameA", , 建立文件名保存对话框
    .参数 pOpenfilename, OPENFILENAME