[Freeman]

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

Код:

          if not DeleteFile(SearchRec.name) then
          begin
            ShowMessage('Не могу удалить файл: ' + SearchRec.name+'!');
            exit;
          end;

Если файл удалить не удалось, вызываем RaiseLastOSError, не не тупое сообщение, по которому фиг что поймешь. Отучаемся быдлокодить!