判斷文件是否正在被使用的JS代碼

 這篇文章主要介紹了判斷文件是否正在被使用的JS代碼，有需要的朋友可以參考一下

代碼如下: //判斷文件是否正在被使用    function FileINUse(filename:String):boolean; var   usein:file; begin   result:=false;   assignfile(usein,FileName);   try     reset(Usein);   except     on E:EInOutError do     begin       if e.ErrorCode=32 then       begin         result:=true;         exit;       end;     end;   end;   closefile(usein); end;   procedure TForm1.Button1Click(Sender: TObject);   if OpenDialog1.Execute then   begin     if fileInuse(OpenDialog1.filename) then       ShowMessage('文件正在使用中')     else       ShowMessage('沒有使用');   end;