·
Устройства LРT1, LРT2 и LРT3
·
Устройства, предназначенные для
текстовых файлов
·
Ввод
и вывод с помощью модуля Crt
·
Окна
CRT
·
Процедуры и функции модуля Crt
·
Константы и переменные модуля Crt
В данной Главе кратко описываются стандартные (или встроенные) функции
и процедуры ввода-вывода Borland Pascal. Эти процедуры и функции можно найти в
модуле System.
Процедуры и функции ввода-вывода
Функция |
Описание |
Append |
Открывает
существующий файл для добавления. |
Assign |
Присваивает
имя внешнего файла файловой переменной. |
BlockRead |
Считывает из
нетипизированного файла одну или более записей. |
BlockWrite |
Записывает
в нетипизированный файл одну или более записей. |
ChDir |
Выполняет
смену текущего каталога. |
Close |
Закрывает
открытый файл. |
Erase |
Стирает
внешний файл. |
Eоf |
Возвращает
для файла состояние end-of-file (конец файла). |
FilePos |
Возвращает
текущую позицию в файле. Для текстовых файлов не используется. |
FileSize |
Возвращает
текущий размер файла. Для текстовых
файлов не используется. |
Flush |
Сбрасывает буфер
текстового файла вывода. |
Getdir |
Возвращает
текущий каталог на заданном диске. |
IОResult |
Возвращает
целое значение, являющееся состоянием последней выполненной операции ввода-вывода. |
MkDir |
Создает
подкаталог. |
Read |
Считывает одно
или более значений из файла в одну или более переменных. |
Readln |
Делает то
же, что и Read, и выполняет пропуск до начала следующей строки текстового
файла. |
Rеnаме |
Переименовывает
внешний файл. |
Rеset |
Открывает
существующий файл. |
Rewritе |
Создает и
открывает новый файл. |
RмDir |
Удаляет
пустой подкаталог. |
Seek |
Перемещает
текущую позицию в файле на заданный элемент. Для текстовых файлов не
используется. |
SeekEof |
Возвращает
для текстового файла состояние "конец файла". |
SeekEoln |
Возвращает
для текстового файла состояние "конец строки". |
SetTextBuf |
Назначает
для текстового файла буфер вводавывода. |
Truncate |
Усекает размер файла до текущей
позиции. Для текстовых файлов не используется. |
Write |
Записывает в
файл одно или более значений. |
Writeln |
Делает то
же, что Write, но затем записывает в текстовый файл символ конца строки. |
Файловая переменная в Паскале - это любая переменная файлового типа. В
Паскале имеются три класса файлов: типизированный файл, текстовый файл и
нетипизированный файл.
Примечание: Синтаксис записи типов файлов
представлен в Главе 4, в разделе "Структурные
типы".
Перед использованием файловой переменной она должна быть связана с внешним файлом с помощью вызова процедуры Assign. Внешним файлом обычно является поименованный файл на диске, но он также может представлять собой устройство, например, клавиатуру или дисплей. Во внешних файлах сохраняется записанная в файл информация, или они служат источниками информации, которая считывается из файла.
Когда связь с внешним файлом установлена, для
подготовки ее к операции ввода или вывода файловая переменная должна быть
"открыта". Существующий файл можно открыть с помощью процедуры
Reset, а новый файл можно создать и открыть с помощью процедуры Rewrite.
Текстовые файлы, открытые с помощью процедуры Reset доступны только по чтению,
а текстовые файлы, открытые с помощью процедуры Rewrite, доступны только по записи.
Типизированные и нетипизированные файлы всегда допускают как чтение, так и
запись, независимо от того были они открыты с помощью процедуры Reset или с помощью
процедуры Rewrite.
Любой файл, представляет собой линейную
последовательность элементов, каждый из которых имеет тип элемента (или тип
записи) файла. Каждый элемент файла имеет номер. Первый элемент файла считается
нулевым элементом.
Обычно доступ к файлам организуется
последовательно, то есть, когда элемент считывается с помощью стандартной
процедуры Read или записывается с помощью стандартной процедуры Write, текущая
позиция файла перемещается к следующему по порядку элементу файла. Однако к
типизированным и нетипизированным файлам можно организовать прямой доступ с
помощью стандартной процедуры Sееk, которая перемещает текущую позицию файла к
заданному элементу. Для определения текущей позиции в файле и текущего размера
файла можно использовать стандартные функции FilePоs и Filesize.
Когда программа завершает обработку файла, он
должен закрываться с помощью стандартной процедуры Close. После полного закрытия
файла связанный с ним внешний файл обновляется. Затем файловая переменная
может быть связана с другим внешним файлом.
По умолчанию при всех обращениях к
стандартным функциям и процедурам ввода-вывода автоматически производится
проверка на наличие ошибок. При обнаружении ошибки программа прекращает работу
и выводит на экран сообщение об ошибке. С помощью директив компилятора $I+ и
$I- эту автоматическую проверку можно включить или выключить. Когда
автоматическая проверка отключена, то есть когда процедура или функция была
скомпилирована с директивой $I-, ошибки ввода-вывода, возникающие при работе
программы, не приводят к ее останову. При этом, чтобы проверить результат выполнения
операции ввода-вывода, нужно использовать стандартную функцию IОResult.
Для очистки ошибки, которая может произойти,
вы можете вызвать функцию IOResult. Если вы этого не сделаете, и текущим состоянием
является $I+, то из-за оставшейся ошибки IOResult следующая операция
ввода-вывода завершится с ошибкой.
Примечание: Если вы пишете программу дл Windows и не хотите, чтобы
Windows обрабатывала за вас ошибки ввода-вывода на диск или другие ошибки
ввода-вывода, вызовите SetErrorMode(1).
В данном разделе описываются операции ввода и вывода, использующие
файловую переменную стандартного текстового типа. Заметим, что в Borland
Pascal текстовый тип (тип Text) отличается от символьного типа Char.
При открытии текстового файла внешний файл
интерпретируется особым образом: считается, что он представляет собой последовательность
символов, сгруппированных в строки, где каждая строка заканчивается символом
конца строки (end-of-line), который представляет собой символ перевода
каретки, за которым возможно следует символ перевода строки.
Для текстовых файлов существует специальный
вид операций чтения и записи (read и write), который позволяют вам считывать и
записывать значения, тип которых отличается от символьного типа Char. Такие
значения автоматически переводятся в символьное представление и обратно.
Например, Read(f,i), где i - переменная целого типа, приведет к считыванию
последовательности цифр, интерпретации этой последовательности, как
десятичного числа, и сохранению его в i.
Как было отмечено ранее, имеются две
стандартных переменных текстового типа - это Input и Оutput. Стандартная
файловая переменная Input - это доступный только по чтению файл, связанный со
стандартным файлом ввода операционной системы (обычно это клавиатура), а
стандартная файловая переменная Оutput - это доступный только по записи файл,
связанный со стандартным файлом вывода операционной системы (обычно это
дисплей). Перед началом выполнения программы DOS файлы Input и Оutput автоматически
открываются, как если бы были выполнены следующие операторы:
Assign(Input,'');
Reset(Input);
Assign(Output,'');
Rewrite(Output);
Так как Windows не поддерживает непосредственно ориентированный на текст
ввод и вывод, файлы Input и Output по умолчанию в прикладной программе Windows
не присваиваются, и любая попытка чтения из этих файлов или записи в них
приведет к ошибке ввода-вывода. Однако, если прикладная программа использует
модуль WinCrt, то Input и Output будут ссылаться на прокручиваемое текстовое
окно. Модуль WinCrt содержит всю логику управления, необходимую для эмуляции
текстового экрана в операционной среде Windows, поэтому в прикладной программе,
использующей модуль WinCrt, не требуется никаких приемов программирования,
специфических для Windows.
Для некоторых из стандартных процедур и
функций, список которых приведен в данном разделе, не требуется явно указывать
в качестве параметра файловую переменную. Если этот параметр опущен, то по
умолчанию будут рассматриваться переменные Input или Output, в зависимости от
того, будет ли процедура или функция ориентирована на ввод или на вывод.
Например, Read(х) соответствует Read(Input,х) и Write(х) соответствует
Write(Output,х).
Если при вызове одной из процедур или функций из этого раздела вы
задаете файл, этот файл должен быть связан с внешним файлов с помощью
процедуры Assign и открыт с помощью процедуры Reset, Rewritе или Append. Если
для ориентированной на вывод процедуры или функции вы указываете файл, который
был открыт с помощью процедуры Reset, то выведется сообщение об ошибке. Аналогично,
будет ошибкой задавать для ориентированной на ввод процедуры или функции файл,
открытый с помощью процедур Rewrite или Append.
Нетипизированные файлы представляют собой каналы ввода-вывода нижнего
уровня, используемые в основном для прямого доступа к любому файлу на диске,
независимо от его типа и структуры. Любой нетипизированный файл описывается
словом file без атрибутов. Например:
var
DataFile:
file;
Для нетипизированных файлов в процедурах Reset и Rewrite допускается
указывать дополнительный параметр, чтобы задать размер записи, использующийся
при передаче файла.
По историческим причинам принимаемая по
умолчанию длина записи равна 128 байтам. Предпочтительной длиной записи
является длина записи, равная 1, поскольку это единственное значение, которое
позволяет точно отразить размер любого файла (когда длина записи равна 1, то в
файле не могут присутствовать неполные записи, то есть записи с меньшей
длиной).
За исключением процедур Read и Write для всех
нетипизированных файлов допускается использование любой стандартной процедуры,
которые допускается использовать с типизированными файлами. Вместо процедур
Read и Write здесь используются соответственно процедуры Blockrеаd и
BlockWrite позволяющие пересылать данные с высокой скоростью.
Переменная FileMode, определенная в модуле System, задает код доступа,
передаваемый в DOS для типизированных и нетипизированных файлов (не для
текстовых файлов), когда они открываются с помощью процедуры Reset.
По умолчанию значение FileMode = 2. При этом
допускается чтение и запись файла. Присваивание FileMode другого значения
приводит к использованию этого режима при всех последующих вызовах Reset.
Примечание: Новые файлы, открываемые с
помощью Rewrite, всегда открываются в режиме чтения/записи, что соответствует
Filemode = 2.
Диапазон допустимых значений FileMode зависит
от используемой версии DOS. Однако во всех версиях определены следующие режимы:
0:
доступ только по чтению
1: Только запись
2:
Чтение/запись
В DOS версии 3.х определены дополнительные режимы, которые касаются в
основном совместного использования файлов при работе в сети (более подробно это
описывается в "Руководстве программиста по DOS").
В Borland Pascal и в операционной системе DOS
внешняя аппаратура, как, например, клавиатура, устройство печати, дисплей,
рассматривается, как устройства. С точки зрения программиста устройство можно
рассматривать, как файл, и с ним можно работать с помощью того же набора
стандартных процедур и функций, что и с файлом. В Турбо Паскале поддерживается
два типа устройств - устройства DOS и устройства для текстовых файлов.
Устройства DOS реализованы с помощью зарезервированных имен устройств,
которые имеют специальный смысл. Устройства DOS полностью
"прозрачны": в Турбо Паскале неизвестно даже, когда файловая
переменная связана с устройством, а когда с файлом на диске. Например, программа:
var
Lst: Text; begin
Assign(Lst,'LPT1');
Rewrite(Lst);
Writeln(Lst,'Привет...');
Close(Lst);
end;
выведет строку "Привет..." на
устройство печати, хотя синтаксис
точно
такой же, как если бы она
выводилась в файл.
Устройства, реализованные в операционной
системе DOS, используются для однозначного ввода или вывода. Таким образом,
устройства в DOS используются обычно для текстовых файлов. В редких случаях
для работы с устройствами DOS может оказаться полезным использование также
нетипизированного файла.
Устройство CОN означает консоль, посредством которой выводимая
информация пересылается на экран дисплея, а вводимая информация воспринимается
с клавиатуры. Если не было изменено направление ввода или вывода, стандартные
файлы Input и Оutput и все файлы, которым присвоено пустое имя, ссылаются на
устройство CОN.
Вводимая с устройства CОN информация является строчно-ориентированной
и используется средствами редактирования строки, которые описаны в руководстве
по DOS. Символы считываются из буфера строки, а когда буфер становится пустым,
вводится новая строка.
При нажатии клавиш Ctrl+Z генерируется символ
конца файла (end-of-file), после которого функция Eоf возвращает значение Truе.
В качестве возможного устройства построчной печати допускается
использование до трех устройств печати. Если присоединено только одно устройство
печати, на него обычно ссылаются, как на устройство LРT1. Для этого устройства
можно также использовать синоним РRN.
Построчное устройство печати - это
устройство, предназначенное только для вывода. При любой попытке использовать
процедуру Reset для открытия файла, связанного с одним из этих устройств,
немедленно генерируется признак конца файла.
Стандартный модуль Рrinter описывает
текстовую файловую переменную с именем Lst и устанавливает ее связь с
устройством LРT1. Чтобы облегчить вывод какой-либо информации из вашей программы
на устройство печати, включите в оператор uses вашей программы модуль Рrinter,
а для вывода используйте процедуры Writе(Lst,...) и Writеln(Lst,...).
Примечание: О печати из программы Windows рассказывается ниже.
Коммуникационными портами (CОМ1 и CОМ2)
являются устройства, представляющие собой два последовательных коммуникационных
порта. Вместо CОМ1 можно использовать синоним AUХ.
Нулевое устройство (NUL) игнорирует любую попытку записи на него и
немедленно генерирует признак конца файла при попытки считывания с этого
устройства. Его следует использовать, если вы не хотите создавать отдельный
файл, а в программе требуется указать имя входного или выходного файла.
В общем случае следует избегать использования устройств DOS под Windows
и применять функции ввода-вывода API Windows. Некоторые устройства, такие как
CON, не будут правильно работать. Другие устройства могут работать, но
результаты могут оказаться не теми, что вы ожидаете. Например, если вы
используете LPT1, ваша распечатка может выводиться, прерывая другое задание
печати. Поэтому надежнее использовать функции API Windows.
Устройства, предназначенные для текстовых файлов, используются для
реализации устройств, не поддерживаемых в DOS, или для того, чтобы сделать
доступным набор средств, отличающийся от того, который предусмотрен для
аналогичного устройства DOS. Хорошим примером устройства, предназначенного для
текстового файла, является окно CRT, реализованное с помощью стандартного
модуля Crt. Оно обеспечивает аналогичный терминалу текстовый экран и позволяет
вам создавать прикладные программы со "стандартным вводом-выводом" с
минимальными усилиями, используя такие средства, как цвета и окна.
В отличие от устройств DOS, устройства,
предназначенные для вывода текстовых файлов, не имеют зарезервированных имен.
Фактически, у них вообще отсутствуют имена. Вместо этого файл связывается в
устройством с помощью обычной процедуры Assign. Например, стандартный модуль
Crt реализует процедуру AssignCrt, которая связывает текстовые файлы с
устройством CRT.
Устройства, предназначенные для текстовых
файлов, используются для реализации устройств, не поддерживаемых в DOS, или
для того, чтобы сделать доступным набор средств, отличающийся от того, который
предусмотрен для аналогичного устройства DOS. Хорошим примером устройства,
предназначенного для текстового файла, является устройство CRT, реализованное
с помощью стандартного модуля Crt. Его основной функцией является обеспечение
интерфейса с дисплеем и клавиатурой, аналогично устройству CОN в модуле Dos.
В отличие от устройств DOS, устройства, предназначенные для вывода
текстовых файлов, не имеют зарезервированных имен. Фактически, у них вообще
отсутствуют имена. Вместо этого файл связывается с устройством с помощью
обычной процедуры Assign. Например, стандартный модуль Crt реализует процедуру
AssignCrt, которая связывает текстовые файлы с устройством CRT.
Примечание: Этот раздел относится только к программам реального и
защищенного режима DOS.
Модуль Crt позволяет использовать все
возможности дисплея и клавиатуры персонального компьютера РС, включая
управление режимом экрана, расширенные коды клавиатуры, цвет, окна и звуковые
сигналы.
Модуль Crt реализует ряд мощных программ,
предоставляющих вам полную возможность управления средствами компьютера РС,
такими, как управление режимом экрана, расширенные коды клавиатуры, цвета,
окна, и звуковые сигналы. Модуль Crt может использоваться только в программах,
работающих на персональных компьютерах IBM РС, РС AT, РS/2 фирмы IBM и
полностью совместимых с ними.
Одним из основных преимуществ использования модуля Crt является
большая скорость и гибкость при выполнении операций работы с экраном.
Программы, не работающие с модулем Crt, выводят на экран информацию с помощью
средств операционной системы DOS, что связано с дополнительными
непроизводительными затратами. При использовании модуля Crt выводимая
информация посылается непосредственно в базовую систему ввода-вывода (ВIОS),
или, для еще более быстрых операций, непосредственно в видеопамять.
Чтобы использовать модуль Crt, его нужно указать в операторе uses вашей
программы:
uses Crt;
При инициализации модуля Crt для того, чтобы можно было обращаться к
CRТ, вместо стандартных файлов ввода и вывода DOS назначаются стандартные
входные и выходные текстовые файлы. Это соответствует выполнению в начале
программы следующих операторов:
AssignCrt(Input);
Reset(Input);
AssignCrt(Output);
Rewrite(Output);
Это означает, что переопределение входных и выходных файлов далее не
допускается до тех пор, пока для данных файлов не будет выполнено обратного
переназначения и не произойдет переход к стандартному вводу и выводу с помощью
выполнения операторов:
Assing(Input,'');
Reset(Input);
Assing(Output,'');
RewriteOutput);
Модуль Crt поддерживает простую, но, тем не менее, мощную форму
использования окон. Процедура Window позволяет вам определить в каком-либо
месте экрана окно. При записи в это окно оно ведет себя точно также, как целый
экран. При этом остальная часть экрана остается нетронутой. Другими словами,
доступ к экрану вне окна отсутствует. Внутри окна можно добавлять и удалять
строки, при этом курсор возвращается к правому краю и при достижении курсором
нижней строки текст продвигается вверх.
Все координаты экрана, кроме тех, которые
используются для определения окна, относятся к текущему окну. Координата экрана
(1,1) соответствует левому верхнему углу экрана.
По умолчанию окном считается весь экран.
При записи в выходной файл или в файл, который назначен для модуля Crt,
специальное значение имеют следующие управляющие символы:
Символ |
Название |
Описание |
#7 |
Звонок BELL |
Вызывает
звуковой сигнал, издаваемый с помощью внутреннего динамика. |
#8 |
Обратный
пробел BS |
Возврат на одну
позицию. Вызывает перемещение курсора влево на одну позицию. Если курсор уже
находится у левого края текущего окна, то никаких действий не производится. |
#10 |
Перевод
строки LF |
Перемещает курсор на одну строку вниз. Если курсор уже находится на нижней строке окна, то окно
пролистывается вверх на одну строку. |
#13 |
Возврат
каретки CR |
Возвращает
курсор с левому краю текущего окна. |
При чтении из входного файла (Input) или из текстового файла, который назначен для модуля Crt, текст вводится по одной строке. Строка запоминается во внутреннем буфере текстового файла и когда переменные считываются, то в качестве источника используется этот буфер. Каждый раз когда буфер становится пустым, вводится новая строка. При вводе строк можно использовать следующие клавиши редактирования:
Клавиша редактирования |
Описание |
Backsрасе |
Удаляет
последний введенный символ. |
Esс |
Удаляет всю
вводимую строку. |
Enter |
Прекращает
ввод строки и записывает метку конца строки (возврат каретки/перевод строки)
в буфере. |
Ctrl+S |
Действует
также, как Backspace. |
Ctrl+D |
Извлекает один
символ из последней вводимой строки и выводит его на экран. |
Ctrl+F |
Восстанавливает
на экране последнюю вводимую строку. |
Ctrl+Z |
Завершает
ввод строки и генерирует символ конца файла. |
Сtrl-Z |
Генерирует
символ конца файла и завершает строку ввода. |
Ctrl+Z будет генерировать конец файла в том
случае, если переменная CheckEOF установлена в True (по умолчанию False).
Для проверки состояния клавиатуры и ввода отдельных символов под управлением
программы используйте функции KeyРressed и RеаdKey.
Функция процедура |
Описание |
AssignCrt |
Назначает текстовый файл для
устройства CRT |
ClrEоl |
Очищает все
символы, начиная от позиции курсора до конца строки, без перемещения курсора. |
ClrScr |
Очищает
экран и помещает курсор в верхнем левом углу. |
Dеlау |
Выполняет
задержку на указанное число миллисекунд. |
DelLine |
Удаляет строку,
на которой находится курсор и перемещает все следующие строки на одну строку
вверх. Нижняя строка очищается. |
GоtоХY |
Выполняет
позиционирование курсора. Х – это горизонтальная позиция, Y – вертикальная
позиция. |
НightVideo |
Выбирает символы
с подсветкой. |
InsLine |
Вставляет
пустую строку в месте расположения курсора. |
KeyРrеssеd |
Возвращает
значение Truе, если клавиша на клавиатуре нажата и Falsе - в противном
случае. |
LowVidе |
Выбирает
символы с пониженной яркостью. |
NormVideo |
Выбирает
символы с нормальной яркостью. |
NoSound |
Выключает
внутренний динамик. |
Sound |
Включает
внутренний динамик. |
TextВаckground |
Выбирает
фоновый цвет. |
TextColor |
Выбирает
цвет самого символа. |
TextМоdе |
Выбирает конкретный
текстовый режим. |
Window |
Определяет
на экране текстовое окно. |
Rеаdкеу |
Считывает
символ с клавиатуры. |
WherеХ |
Возвращает
координату Х для текущей позиции курсора, относящуюся к текущему окну. Х представляет
собой горизонтальную позицию. |
WhereY |
Возвращает
координату Y для текущей позиции курсора, относящуюся к текущему окну. Y
представляет собой вертикальную позицию. |
В модуле Crt содержится рад констант, облегчающих программирование.
Подробно они описываются в Главе 1 "Справочного руководства
программиста". Опишем группы этих констант:
Группа констант |
Описание |
Константы режима
Crt |
Графические
константы, используемые в качестве параметров процедуры TextMode. |
Константы
цветов |
Константы,
используемые для установки цветов с помощью процедур TextColor и
TextBackGround. |
Например, чтобы найти значение константы,
которая позволит вам выводить текст в программе красным цветом, просмотрите
константы цветов текста и найдите константу Red со значением 4.
В модуле Crt содержатся следующие переменные:
Переменная |
Тип |
Описание |
CheckBreak |
Boolean |
Разрешает или
запрещает проверку на Ctrl+Break. |
CheckEof |
Boolean |
Разрешает
или запрещает символ конца файла. |
CheckSnow |
Boolean |
Разрешает
или запрещает проверку на помехи. |
DirectVideo |
Boolean |
Разрешает или
запрещает прямой доступ к памяти для процедур WriteLn и Write. |
LastMode |
Word |
При каждом
вызове TextMode сохраняет текущий видеорежим. |
TextAttr |
Byte |
Содержит
атрибуты текущего выбранного текста. |
WindMin |
word |
Содержит координаты
верхнего левого угла текущего окна. |
WindMax |
word |
Содержит
координаты нижнего правого угла текущего окна. |
Функция Open вызывается стандартными процедурами Rеset, Rеwritе и
Appеnd для открытия текстового файла, связанного с устройством. Чтобы отметить
была ли функция Open вызвана из процедуры Rеset, Rеwritе или Appеnd, на входе
поле Моdе содержит значение fmInput, fmOutput или fmInOut.
В соответствии со значением Моdе функция Open
подготавливает файл для ввода или вывода.
Если в Моdе указывается FmInOut (указывая, что функция Оpеn была
вызвана из Appеnd), то перед возвратом управления функцией Оpеn это значение
должно быть изменено на fmOutput.
Функция Opеn всегда вызывается перед любой другой функцией, реализующей
интерфейс с устройством. По этой причине функция Assign инициализирует только
поле OpеnFunc, откладывая инициализацию оставшихся векторов до завершения
выполнения функции Opеn. Основываясь на значении поля Моdе функция Opеn может
установить указатели как для функций, ориентированных на ввод, так и для
функций, ориентированных на вывод. Это позволяет избежать определения текущего
режима в функциях InOut, Flush и Close.
Всякий раз, когда требуется ввод с устройства или вывод на него,
функциями Readln, Read, Write, Writeln, Page, Eof, SeekEof, SeekEoln и Close
вызывается функция InOut.
Когда в поле Моdе установлено значение fnInput,
функция InOut считывает символы (объем ввода задается переменной BufSize) в
BufPtr^ и возвращает число считанных символов в BufEnd, а также записывает 0 в
BufPos. Если функция InOut в результате запроса на ввод возвращает в BufEnd
значение 0, то переменная Eоf для файла принимает значение Truе.
Когда в поле Моdе установлено значение fnOutput, функция InOut
записывает символы, количество которых определяется переменной BufРоs, из
BufPtr^ и возвращает в BufРоs значение 0.
Функция Flush вызывается в конце выполнения каждой функции Rеаd, Write,
Rеаdln или Writeln. Она может также сбрасывать буфер текстового файла.
Если в поле Моdе находится fmInput, функция
Flush для того, чтобы отбросить оставшиеся (несчитанные) символы в буфере,
может записать 0 в BufPos и BufEnd. Это средство используется редко.
Если в поле Моdе находится fnOutput, то функция Flush может записать
содержимое буфера, в точности таким же образом, как функция InOut. Этим
обеспечивается, что выведенный на устройство текст появится на устройстве
немедленно. Если функция Flush не выполняет никаких действий, текст не будет
выведен на устройство, пока буфер не станет полным, или файл не будет закрыт.
Функция Clоsе вызывается стандартной процедурой Clоsе для закрытия
связанного с устройством текстового файла. (Процедуры Rеsеt, Rеwritе, Appеnd
также вызывают функцию Clоsе, если файл, который они открывают, уже был
открыт.) Если в поле Моdе находится fmOut, то перед вызовом функции Clоsе
файловая система Турбо Паскаля обращается к функции InOut. Это гарантирует
вывод на устройство всех символов.