Работа с текстовыми файлами
В переменную типа string помещается количество символов, равное длине строки, но только в том случае, если раньше не встретились символы конца строки или конца файла. Процедура Readln по окончании чтения обеспечивает переход к новой строке файла CHF (Readln без параметров обеспечивает только переход на новую строку файла). При чтении из текстового файла CHF данных, их значения присваиваются… Читать ещё >
Работа с текстовыми файлами (реферат, курсовая, диплом, контрольная)
Текстовый файл — это совокупность строк, разделенных метками конца строки. Сам файл заканчивается меткой конца файла. Доступ к каждой строке возможен лишь последовательно, начиная с первой. Одновременная запись и чтение запрещены.
Чтение из текстового файла:
Read (f, список переменных);
ReadLn (f, список переменных);
Процедуры читают информацию из файла f в переменные. Способ чтения зависит от типа переменных, стоящих в списке. В переменную char помещаются символы из файла. В числовую переменную: пропускаются символы-разделители, начальные пробелы и считывается значение числа до появления следующего разделителя.
В переменную типа string помещается количество символов, равное длине строки, но только в том случае, если раньше не встретились символы конца строки или конца файла.
Отличие ReadLn от Read в том, что в нем после прочтения данных пропускаются все оставшиеся символы в данной строке, включая метку конца строки. Если список переменных отсутствует, то процедура ReadLn (f) пропускает строку при чтении текстового файла.
Для чтения данных из файла он должен быть предварительно открыт для чтения с помощью процедуры Reset (CHF).
Чтение осуществляется с помощью процедур:
Read (CHF,);
или.
Readln (CHF,);
Процедура Readln по окончании чтения обеспечивает переход к новой строке файла CHF (Readln без параметров обеспечивает только переход на новую строку файла).
При чтении из текстового файла CHF данных, их значения присваиваются переменным, указанным в списке переменных в соответствии с их типом:
- — целые читаются с текущего символа, пропуская начальные пробелы, до первого символа отличного от цифры (или конца строки/файла);
- — вещественные читаются с текущего символа, пропуская начальные пробелы, до символа синтаксически несовместимого с представлением вещественного числа (или конца строки/файла);
- — символьные принимают значение текущего символа файла;
- — строки читаются с текущего символа до конца строки (файла).
Пример:
Путь к исходному файлу: A: File1.Dat.
Содержимое файла: 36 25+PASCAL.
16.5.
Var CHF: Text;
S: real:
I, J: integer;
ST: string;
C: char;
Assign (CHF, `A:File1.Dat');
Reset (CHF);
Readln (CHF, I, J, C, ST);{I:=36; J:=25; C:='+'; ST:='PASCAL'}.
Read (CHF, S); (S:=16.5}.