易语言获取RAR文件内容源码

系统结构:读rar文件,子程序1,处理路径,遍历目录,PathIsDirectory,PathCompactPathEx,

======窗口程序集1
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ 读rar文件
           |  |
           |  |------ 子程序1
           |  |
           |  |------ 处理路径
           |  |
           |  |------ 遍历目录
           |  |
           |  |------ __启动窗口_可否被关闭
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   PathIsDirectory
           |  |
           |  |---[dll]------   PathCompactPathEx

调用的DLL命令:

.DLL命令 PathIsDirectory, 整数型, "shlwapi.dll", "PathIsDirectoryA"
    .参数 lpszPath, 文本型

.DLL命令 PathCompactPathEx, , "shlwapi.dll", "PathCompactPathExA"
    .参数 pszOut, 文本型, 传址
    .参数 pszSrc, 文本型
    .参数 cchMax, 整数型
    .参数 dwFlags, 整数型