Как определить закрыт или открыт текстовый файл

[ZvEr_HaCkEr]

Всем привет.Необходимо определить закрыт или открыт текстовый файл для последующих действий.За ранние спасибо

[Stilet]

Попытайся открыть его с правами писания, и тут же закрыть.
если он не откроется - значит кем-то занят.

 h:=OpenFile(pchar('File.txt'),os,OF_SHARE_EXCLUSIVE);
 if h= HFILE_ERROR then занят
 Else  свободен;
 CloseHandle(h);

Здесь h - THandle; os - OFSTRUCT;

[ZvEr_HaCkEr]

Сообщение от Stilet

Попытайся открыть его с правами писания, и тут же закрыть.
если он не откроется - значит кем-то занят.

 h:=OpenFile(pchar('File.txt'),os,OF_SHARE_EXCLUSIVE);
 if h= HFILE_ERROR then занят
 Else  свободен;
 CloseHandle(h);

Здесь h - THandle; os - OFSTRUCT;

неа так не работает нужно как-то по другому идей нет вобще

[BOBAH13]

неа так не работает нужно как-то по другому

Обычно сообщают по какой причине / факторам не вышло / не подошло предложенное решение?! Мы должны угадать?