易语言封包解包类模块源码

系统结构:初始化,关闭,取资源数,取文件名_文件索引信息,取文件开始位置_文件索引信息,取文件尺寸_文件索引信息,索引读取,文件名读取,封包,lopen,CloseHandle,GetFileSizeEx,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ _临时子程序
           |  |
           |  |------ _取文件目录
           |  |
           |  |------ _取文件名
           |  |
           |  |------ _取文件尺寸
           |  |
           |  |
======封包解包类
           |  |
           |  |------ _初始化
           |  |
           |  |------ _销毁
           |  |
           |  |------ 初始化
           |  |
           |  |------ 关闭
           |  |
           |  |------ 取资源数
           |  |
           |  |------ 取文件名_文件索引信息
           |  |
           |  |------ 取文件开始位置_文件索引信息
           |  |
           |  |------ 取文件尺寸_文件索引信息
           |  |
           |  |------ 索引读取
           |  |
           |  |------ 文件名读取
           |  |
           |  |------ 封包
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   lopen
           |  |
           |  |---[dll]------   CloseHandle
           |  |
           |  |---[dll]------   GetFileSizeEx

调用的DLL命令:

.DLL命令 lopen, 整数型, "kernel32", "_lopen"
    .参数 lpPathName, 文本型
    .参数 iReadWrite, 整数型

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

.DLL命令 GetFileSizeEx, 整数型, "kernel32.dll", "GetFileSizeEx"
    .参数 hFile, 整数型
    .参数 lpFileSize, 整数型, 传址