[hasherfrog]

Обязательно самому писать? Если нет, советую:
http://www.sysinternals.com/ntw2k/freeware/handle.shtml
Ну и это можно посмотреть:
http://www.sysinternals.com/ntw2k/source/filemon.shtml

[Raistlin]

Handle выдаёт неполные данные. Возьмём, к примеру, nnCron. У него в составе библиотека есть, которая, очевидно, отвечает за отображение контекстного меню, — nnhook.dll. Если в сеансе работы вызвать контекстное меню, то до перезагрузки этот файл удалить невозможно. Но Handle никаких данных о хендлах к нему не выдаёт. Или я что-то недопонимаю здесь просто?

[DillerInc]

Raistlin

Или я что-то недопонимаю здесь просто?

...вот я тоже сейчас возможно чего-то недопонимаю,но почему бы не воспользоваться API-функцией EnumProcessModules ?
Ведь насколько я понял,под "открытым файлом" ты подразумеваешь некоторый запущенный исполняемый файл (.exe)...

[Raistlin]

подразумеваешь некоторый запущенный исполняемый файл (.exe)

Нет, как раз не exe, "запущенность" exe проверить-то легко. А меня интересует "залоченность" файла, а именно dll. Такую информацию возможно получить с помощью этой функции? Если да, не мог бы ты объяснить на примере — как должна вызываться функция и как проинтерпретировать результат? А то сер я совсем в этом, тыкаюсь, как слепой котёнок… Заранее спасибо!

[SergeCpp]

А попробуй его открыть — Exclusive... (for r/w and w/o sharing flags)

Я так проверяю в аналогичной ситуации.

[DillerInc]

Raistlin
Теперь я вроде понял,что ты имеешь в виду (невозможность удаления библиотеки пока не перезагрузишь систему).
Значит,функция EnumProcessModules лишь перечисляет все модули,загруженные в адресное пространство конкретного процесса.
В твоём же случае необходимо,на мой взгляд,смотреть атрибуты файла, т.е. возможно,что у этой библиотеки выставлен атрибут FILE_ATTRIBUTE_READONLY ,который означает,что приложения не могут ни писать в этот файл,ни удалять его.
К примеру:

Код:

var
 fAttrs : DWORD;
 fName : LPCTSTR;
begin
 fAttrs := GetFileAttributes('nnhook.dll');
if fAttrs = FILE_ATTRIBUTE_READONLY then
begin
 SetFileAttributes('nnhook.dll', FILE_ATTRIBUTE_NORMAL); 
end;
end;

...попробуй,может это поможет.

P.S. Если тебе всё-таки понадобится пример кода функции EnumProcessModules,напиши - приведём .

[Raistlin]

Я воспользовался советом SergeCpp, вроде получилось:

Код:

CreateFile(filename, GENERIC_WRITE, 1, 0, OPEN_EXISTING, 0, 0)

Возвращает -1, если файл заблокирован или с ним что-то не так, или хендл к нему, если можно открыть эксклюзивно на запись. Само собой, в последнем случае вызываем CloseHandle.

[SergeCpp]

А спасибо...

Ладно уж, я так, к слову...

[Raistlin]

Прощу прощения! Конечно, большое спасибо. Я долго раздумывал, писать такое неинформативное сообщение или нет , решил — не буду, так как в предыдущем посте я поблагодарил заранее. Надеюсь, ты меня простишь .
А вот и кое-что по теме. Похоже, проверить каталог на залоченность таким образом нельзя:

Код:

CreateFile(dirname, GENERIC_WRITE, 1, 0, OPEN_EXISTING, FILE_FLAG_BACKUP_SEMANTICS, 0)

возвращает хендл к каталогу, который открыт, скажем, в Far и удалён быть не может. Есть идеи?