Модуль: SysUtils

Описание
Функция удаляет файл с диска. При успешном выполнении возвращает True, а если файл не существует, или не может быть удален, то - False.

Пример
var
   FileName: string
begin
...
if DeleteFile(FileName) then
   MessageDlg('Файла успешно удален', mtInformation, [mbOk], 0)
else
  MessageDlg('Ошибка удаления файла', mtInformation, [mbOk], 0);
...
end;