文件名称：Delphi 创建线程监视目录是否改变.rar
文件大小：8KB
文件格式：RAR
更新时间：2022-07-30 06:25:41
Delphi源码-系统相关
Delphi 目录监视，指定需要监视的目录，创建监视线程，然后可以监控目标文件夹内文件变动的情况，会弹出提示告诉用户文件夹内容已改变，这个用途比较广了，这个例子也是很基础的类型，适合Delphi初学者参考学习。程序分别创建了监视线程、激活监视线程、弹出监视结果，创建监视线程代码如下： constructor TFileSysNotifyThread.Create (const AWatchPath: String; AWatchMask: Integer; var Myself: TFileSysNotifyThread); begin Inherited Create (True); WatchPath := AWatchPath; WatchMask := AWatchMask; KillAddress := Addr (Myself); Priority := tpLower; FreeOnTerminate := True; Suspended := False; end;
【文件预览】：
codesc.net
----目录监视()
--------Test.dfm(684B)
--------NotifyTest.dof(1KB)
--------Test.pas(1KB)
--------Test.ddp(51B)
--------FileSysThread.pas(2KB)
--------NotifyTest.dpr(229B)
--------Test.dcu(4KB)
--------FileSysThread.dcu(2KB)
--------NotifyTest.res(876B)