Delphi - поиск процесса, который обращается к файлу из моей программы

У меня есть приложение Delphi, которое регулярно записывает данные в файл на локальном диске. Иногда оно не может получить доступ к файлу - при попытке открыть его происходит нарушение совместного доступа. Повторная попытка после небольшой задержки - это все, что требуется, но когда это происходит, я хотел бы сообщить о процессе, который предотвратил доступ.

Возможно ли, чтобы при нарушении совместного доступа моя программа перечислила все используемые файловые дескрипторы, проверила имя файла и, если оно совпадает с именем моего файла данных, получила имя процесса, связанного с этим дескриптором?

Было бы неплохо привести пример кода.