Процедура Close

Основы программирования
Каждый профессионал когда-то был чайником. Наверняка вам знакомо состояние, когда “не знаешь как начать думать, чтобы до такого додуматься”. Наверняка вы сталкивались с ситуацией, когда вы просто не знаете, с чего начать. Эта книга ориентирована как раз на таких людей, кто хотел бы стать программистом, но совершенно не знает, как начать этот путь. Подробнее...

Процедура Close в Паскале закрывает файл. Синтаксис:

 
procedure Close(var F: File);

procedure Close(var F: Text);

Рассказывая о работе с файлами, я как-то всё забывал говорить о том, как закрыть файл (то есть о том, какая процедура закрытия файла используется в Паскале). Хотя в примерах программ я, конечно же, не только открывал, но и закрывал файлы. И вы уже наверняка знаете, как это делается.

Однако буду последователен, и приведу справочные данные о процедуре Close, как я это делал для других подпрограмм для работы с файлами.

Процедура Close сбрасывает буфер файла F и закрывает файл F. После вызова Close данные больше не могут быть прочитаны или записаны в F. Чтобы снова открыть файл, закрытый процедурой Close, не нужно снова связывать файловую переменную с файлом. Достаточно вызова одной из подпрограмм Reset или Rewrite.

В зависимости от состояния переключателя {$I} при наличии ошибки ввода-вывода может возникнуть ошибка времени выполнения. В состоянии {$I-} используйте функцию IOResult для проверки ошибок (подробнее о директивах компилятора см. здесь).

Пример программы:

 
program closeproc;

var F : Text;

//****************************************************************
// ОСНОВНАЯ ПРОГРАММА
//****************************************************************
begin
  Assign(F, 'test.txt');
  Rewrite(F);
  Write(F, 'Some text written to Test.txt');
  Close(F);

  WriteLn('The END! Press ENTER...');
  ReadLn;
end.

Ну вот, пожалуй, и всё. Процедура простая, и добавить к сказанному больше нечего.

Вступить в группу "Основы программирования"

Подписаться на канал в РУТУБ

Подписаться на Дзен-канал

Подписаться на рассылки по программированию

Как стать программистом 2.0

Эта книга для тех, кто хочет стать программистом. На самом деле хочет, а не просто мечтает. И хочет именно стать программистом с большой буквы, а не просто научиться кулебякать какие-то примитивные программки… Подробнее...

Помощь в технических вопросах

Помощь студентам. Курсовые, дипломы, чертежи (КОМПАС), задачи по программированию: Pascal/Delphi/Lazarus; С/С++; Ассемблер; языки программирования ПЛК; JavaScript; VBScript; Fortran; Python и др. Разработка (доработка) ПО ПЛК (предпочтение - ОВЕН, CoDeSys 2 и 3), а также программирование панелей оператора, программируемых реле и других приборов систем автоматизации. Подробнее...

Главная
Контакты