易语言批量监视目录源码

系统结构:监视目录线程函数,Unicode转Ansi,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ _按钮2_被单击
           |  |
           |  |------ 监视目录线程函数
           |  |
           |  |------ Unicode转Ansi
           |  |
           |  |------ _标签1_反馈事件
           |  |
           |  |------ _按钮3_被单击
           |  |
           |  |------ _按钮4_被单击
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   _创建线程
           |  |
           |  |---[dll]------   _停止线程
           |  |
           |  |---[dll]------   _关闭句柄
           |  |
           |  |---[dll]------   _打开文件
           |  |
           |  |---[dll]------   _读取目录更改
           |  |
           |  |---[dll]------   _浏览文件夹对话框
           |  |
           |  |---[dll]------   _从列表id取路径
           |  |
           |  |---[dll]------   _发送整数消息
           |  |
           |  |---[dll]------   _发送文本消息
           |  |
           |  |---[dll]------   _宽字符到双字节
           |  |
           |  |---[dll]------   _宽字符到双字节1

调用的DLL命令:

.DLL命令 _创建线程, 整数型, "Kernel32.dll", "CreateThread", , 成功则返回线程句柄，零表示失败。
    .参数 是否继承, 整数型, , 如果让线程使用默认的security属性,可以将此值设为0
    .参数 堆栈大小, 整数型, , 如果为0,那么线程的堆栈大小和主线程使用的大小相同
    .参数 执行函数, 整数型, , 子程序指针
    .参数 执行参数, 整数型, , 该子程序的参数，如果无可设为0
    .参数 线程状态, 整数型, , 设置线程被创建后的状态,如果为0表示,创建后立即运行,
    .参数 线程ID, 整数型, 传址, 指向一个双字节变量,用来接收函数返回的线程ID.线程ID在系统范围内是唯一的.

.DLL命令 _停止线程, 整数型, "Kernel32.dll", "TerminateThread", , 成功则返回非零值，零表示失败。
    .参数 线程句柄, 整数型
    .参数 返回值, 整数型, , 设置一个数值作为线程的返回值

.DLL命令 _关闭句柄, 整数型, "Kernel32.dll", "CloseHandle"
    .参数 对象句柄, 整数型

.DLL命令 _打开文件, 整数型, "kernel32.dll", "CreateFileA", , 如执行成功，则返回文件句柄，否则返回-1
    .参数 打开文件名, 文本型, , lpFileName，要打开的文件的名字
    .参数 访问权限, 整数型, , dwDesiredAccess，访问权限
    .参数 共享方式, 整数型, , dwShareMode，共享方式
    .参数 security特性, 整数型, , lpSecurityAttributes，security特性信息
    .参数 创建方式, 整数型, , dwCreationDisposition，创建方式
    .参数 文件属性, 整数型, , dwFlagsAndAttributes，参见相关帮助
    .参数 从文件复制文件属性, 整数型, , hTemplateFile，参见相关帮助

.DLL命令 _读取目录更改, 逻辑型, "kernel32.dll", "ReadDirectoryChangesW", , 成功则返回非零值，零表示失败。
    .参数 文件句柄, 整数型
    .参数 返回缓冲区, 文件通知信息, 传址
    .参数 缓冲区长度, 整数型
    .参数 监视子目录, 逻辑型
    .参数 监视过滤, 整数型
    .参数 字节返回, 整数型, 传址
    .参数 异步操作, 重叠操作, 传址
    .参数 回调函数, 整数型

.DLL命令 _浏览文件夹对话框, 整数型, "shell32.dll", "SHBrowseForFolderA", , ,
    .参数 浏览文件夹结构, 文件夹信息

.DLL命令 _从列表id取路径, 整数型, "shell32.dll", "SHGetPathFromIDListA"
    .参数 结构指针, 整数型, , pIdl
    .参数 路径, 文本型, 传址, pszPath

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

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

.DLL命令 _宽字符到双字节, , "kernel32.dll", "WideCharToMultiByte", , ,
    .参数 代码页, 整数型, , CodePage
    .参数 标志, 整数型, , dwFlags
    .参数 宽字符文本, 字节集, , lpWideCharStr
    .参数 宽字符文本长度, 整数型, , cchWideChar
    .参数 双字节文本, 字节集, , lpMultiByteStr
    .参数 双字节文本长度, 整数型, , cchMultiByte
    .参数 默认文本, 整数型, , lpDefaultChar
    .参数 使用默认文本, 逻辑型, , lpUsedDefaultChar

.DLL命令 _宽字符到双字节1, 整数型, "kernel32.dll", "WideCharToMultiByte", , ,
    .参数 代码页, 整数型, , CodePage
    .参数 标志, 整数型, , dwFlags
    .参数 宽字符文本, 字节集, , lpWideCharStr
    .参数 宽字符文本长度, 整数型, , cchWideChar
    .参数 双字节文本, 整数型, , lpMultiByteStr
    .参数 双字节文本长度, 整数型, , cchMultiByte
    .参数 默认文本, 整数型, , lpDefaultChar
    .参数 使用默认文本, 逻辑型, , lpUsedDefaultChar