Как проверить занят ли файл другим процессом? - PascalABC.NET
Формулировка задачи:
Собсна вопрос описан в топике)
Нужно узнать как можно осуществить проверку доступа к файлу, занял ли он другим процессом или нет.
Если не занят то производить с ним операции.
Опыт не очень большой, один курс, младшая компьютерная академия и немного сам)
Upd
Или же подскажите как можно несколькими процессами использовать один файл одновременно.
Решение задачи: «Как проверить занят ли файл другим процессом?»
textual
Листинг программы
var
f: text;
begin
Assign(f,'File.txt');
try
Rename(f,'File2.txt');
Writeln('Fajl ne zanjt');
except
Writeln('Fajl zanjat');
end;
Readln;
end.
Объяснение кода листинга программы
- Объявлена переменная f типа text.
- Присвоено значение 'File.txt'.
- Выполняется попытка переименования файла.
- Если переименование прошло успешно, выводится сообщение 'Fajl ne zanjt'.
- Если переименование не удалось, выводится сообщение 'Fajl zanjat'.
- Программа ожидает ввода пользователя.