Mail

В этот день много лет назад...
20 апреля. В 1932 году (92 года назад) - В Ленинграде завод "Промет" освоил выпуск первых отечественных бензино-раздаточных колонок.

Turbo Pascal Documentation

Процедура Truncate

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