Проверить, можно ли заменить/удалить файл...

[Человек_Борща]

Доброго времени суток!

Есть файл, который закачвается на ПК.
Скачаный файл сохраняется с расширением .new
А старый файл нужно заменить новым.

Но перед тем как заменить/удалить нужно проверить, не занят ли он чем-либо.

Вот как я это придумал, пока что:

          If FileExists(FoundFilesList.Strings[FFLCount] + '.new') then
          begin
            Log('Удаляю старый файл...');
            if DeleteFile(FoundFilesList.Strings[FFLCount]) then
              Log('Старый файл удалён!')
            else
              Log('НЕ удалось укалить старый файл!');

            Log('Переименовываю новый файл в старый...');
            if RenameFile(FoundFilesList.Strings[FFLCount] + '.new',
              FoundFilesList.Strings[FFLCount]) then
              Log('Переимновал успешно...')
            else
              Log('Не удалось переименовать файл...');
          end;

может можно проще?

[Пепел Феникса]

поверьте, это итак довольно просто

[Человек_Борща]

т.е. если файл занят то deleteFile или RenameFile вернут false?

[Аватар]

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

[Пепел Феникса]

да.

ну вообще поидее не совсем если занят, а если не удалось переименновать/удалить(а может доступа нет у вас)

[Аватар]

Надежней, но дольше - открыть монопольно старый на запись, новый на чтение и переписать из нового в старый и только после этого новый удалить

[Пепел Феникса]

ну там можно одной строчкой тогда уж и через:
MoveFileEx
http://msdn.microsoft.com/en-us/libr...(v=vs.85).aspx