监视文件夹内所有文件是否被改变

主要功能用来帮您随时监控你电脑里修改的任何东西，监视指定文件夹内文件的修改变动情况，例如创建、修改、删除的动作都能帮您记录下来。

句柄 ＝ FindFirstChangeNotification (目录, 选择 (包括子目录, 1, 0), 监视的对象)
.如果真 (句柄 ＝ #ERROR_INVALID_HANDLE)
ExitProcess (GetLastError ())
.如果真结束
输出调试文本 (句柄)
i ＝ 1
.判断循环首 (1 ＝ i)
处理事件 ()
信息 ＝ WaitForSingleObject (句柄, -1)
.如果真 (信息 ＝ 0)
列表框1.加入项目 (“文件夹内有文件被改变”, )
.如果真 (FindNextChangeNotification (句柄) ＝ 0)
ExitProcess (GetLastError ())