доступ к файлу

← →
hooch (2004-09-13 13:58) [0]

День добрый !
Суть проблемы: в директорию копируется файл, пока он копируется он заблокирован, как можно узнать что файл заблокирован ?
FileOpen(.. fmOpenWrite or fmShareExclusive) всёравно возращает хенл файла, получилось через Assign

Assign(..)
try
Rewrite(..)
except
// файл заблокирован
end

но так мне не нравится :-) можно как-нибудь ещё узнать что файл заблокирован ?

← →
Fay © (2004-09-13 14:09) [1]

var h : DWORD; begin CreateFile("c:\anyfile.ext", GENERIC_READ, FILE_SHARE_READ, 0, OPEN_EXISTING, 0, 0); if h = INVALID_HANDLE_VALUE then RaiseLastOSError; try // Супер-код finally CloseHandle(h); end; end;

← →
hooch (2004-09-13 14:19) [2]

спасибо большое ! помогло :-)

Ну ваще 8)

доступ к файлу Найти похожие ветки