[_Антон_]

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

Столкнулся с проблемой при удалении файла с помощью DeleteFile.
В одной папке лежат 2 файла с разными расширениями, причем первый файл удаляется нормально, как и должно быть:

Код:

if FileExists (katalog + '\out\F.u'+IntToStr(i1)) then
  DeleteFile(katalog + '\out\F.u'+IntToStr(i1));

Но второй файл, падла, почему-то не удаляется, делаю точно также:

Код:

      
if FileExists (katalog + '\out\F.p'+IntToStr(i1)) then
  if DeleteFile(katalog + '\out\F.p'+IntToStr(i1)) then
    showmessage ('Удален!');

подскажите пожалуйста в чем проблема, я уже голову себе сломал(