检测文件是否被占用的程序

.如果真 (寻找文本 (到小写 (进程_取程序路径 (进程名 [i].进程标识符)), “system32”, , 真) ＝ -1 且 到小写 (进程_取程序路径 (进程名 [i].进程标识符)) ≠ “” 且 进程名 [i].进程标识符 ≠ 进程_取自进程ID ())
.如果真 (内存.搜索 (进程名 [i].进程标识符, 到字节集 (编辑框1.内容), a) ＞ 1)
列表框1.加入项目 (进程名 [i].进程名称, 进程名 [i].进程标识符)