易语言检测文件被哪个进程占用的代码

今天小编就为大家分享一篇关于易语言检测文件被哪个进程占用的代码，小编觉得内容挺不错的，现在分享给大家，具有很好的参考价值，需要的朋友一起跟随小编来看看吧

检测文件占用的代码

此功能需要加载贝贝吧模块6.6

				?

									.版本 2

									.支持库 eAPI

									.程序集 窗口程序集_启动窗口

									.子程序 _查询按钮_被单击

									.局部变量 进程名, 进程信息, , "0"

									.局部变量 进程id, 整数型, , "0"

									.局部变量 a, 整数型, , "0"

									.局部变量 i, 整数型

									进程名 ＝ 取系统进程列表 ()

									显示占用列表框.清空 ()

									.计次循环首 (取数组成员数 (进程名), i)

									  .如果真 (寻找文本 (到小写 (进程_取程序路径 (进程名 [i].进程标识符)), “system32”, , 真) ＝ -1 且 到小写 (进程_取程序路径 (进程名 [i].进程标识符)) ≠ “” 且 进程名 [i].进程标识符 ≠ 进程_取自进程ID ())

									    .如果真 (内存.搜索 (进程名 [i].进程标识符, 到字节集 (文件路径编辑框.内容), a) ＞ 1)

									      显示占用列表框.加入项目 (进程名 [i].进程名称, 进程名 [i].进程标识符)

									    .如果真结束

									  .如果真结束

									  标题 ＝ 到文本 (i)

									.计次循环尾 ()

									标题 ＝ “结束”

									.子程序 _选择程序按钮_被单击

									.如果真 (通用对话框1.打开 ())

									  文件路径编辑框.内容 ＝ 通用对话框1.文件名

									.如果真结束