procedure Erase(var F:  File);
procedure Erase(var F:  TextFile);

Процедура Erase удаляет файл, назначенный переменной F. Файл должен быть закрыт, но ему должно быть присвоено имя процедурой AssignFile или Assign. He является настоящей процедурой.

• Если AssignFile не была вызвана, Erase генерирует ошибку ввода/ вывода 102.
  
• Если файл не может быть удален, выполнение процедуры Erase вызовет ошибку ввода/вывода с кодом ошибки Windows. В частности, если файл уже открыт, код ошибки Windows будет равен 32 (файл используется), если файл доступен только для чтения, код ошибки Windows равен 5 (доступ запрещен).