파일이 사용되고 있는지 확인하는 JS 코드_javascript 기술

코드 복사 코드는 다음과 같습니다.

//파일 사용 여부 확인

function FileINUse(filename:String):boolean;
var
usein:file;
begin
result:=false;
할당 파일(usein,FileName);
시도
재설정(사용);
제외
E:EInOutError do
시작
if e.ErrorCode=32 then
시작
결과:=true;
종료 ;
end;
end;
end;
closefile(usein);
end;

TForm1.Button1Click(Sender: TObject);
if OpenDialog1.Execute then
start
if fileInuse(OpenDialog1.filename) then
ShowMessage('파일이 사용 중입니다')
else
ShowMessage('사용되지 않음');
end;