Mail

В этот день много лет назад...
26 ноября. В 1724 году (300 лет назад) - По приказу Пктра I за взятки и любовную связь с Екатериной казнят камергера императорского двора Виллима Монса.

Turbo Pascal Documentation

Процедура Truncate

     Функция: Усекает размер файла до текущей позиции в фай-
ле.
     Описание: Тruncate(f)
     Примечания: Параметр f является файловой переменной лю-
бого типа. Все записи после текущей позиции в файле f удаля-
ются и текущая  позиция  в  файле  становится  концом  файла
(функция Еоf(f) принимает значение Тrue).
     При  указании  директивы  компилятора   {I-}   функция
IORеsult будет возвращать значение 0 в том случае, если опе-
рация завершилась успешно, и ненулевой код ошибки в  против-
ном случае.
     Ограничения: Файл f должен быть открыт.
     См. также процедуры Seek, Reset.