Процедура ReadLn в Delphi – позволяет прочитать полную строку данных из текстового файла.
System unit
- procedure ReadLn (var Variable1 {,var Variable2...});
- procedure ReadLn (var FileHandle : TextFile; var Variable1 {,var Variable2...});
Процедура ReadLn читает полную строку данных из текстового файла или до консоли (console).
Вариант 1.
Используется, чтобы читать из консоли (console).
Вариант 2.
Используется, чтобы читать строку текста из текстового файла с данными. Вы должны использовать AssignFile, чтобы назначать файл для операций - чтения/записи и открыть файл до процедуры чтения.
ReadLn прочтёт только одну строку, а так как указатель чтения из файла мы не передвигали, то эта строка будет первой строкой текстового файла.
Для прочтения всего текстового файла удобно использовать цикл.
Примечание.
Процедура ReadLn не буферизует записи, так что её выполнение ухудшено. BlockRead более эффективна, но приспособлена для записи в двоичные файлы.
Процедура ReadLn: Чтение каждой текстовой строки как набор 4 чисел
var
myFile : TextFile;
n1, n2, n3 : Integer;
begin
// Попытка открыть файл Test.txt для записи
AssignFile(myFile, 'Test.txt');
ReWrite(myFile);
// Запись чисел в строку
WriteLn(myFile, '1 2 3 4'); // Обратите внимание, что 4 будут проигнорирована
// Запись чисел как отдельные параметры
WriteLn(myFile, 5, ' ', 6, ' ', 7);
// Запись чисел как отдельные параметры
WriteLn(myFile, '8 9'); // Отсутствие чисел будет замечено 0
// Закрытие фала
CloseFile(myFile);
// Переоткрытие фала для чтения
Reset(myFile);
// Показ содержимого фала
while not Eof(myFile) do
begin
ReadLn(myFile, n1, n2, n3);
ShowMessage(IntToStr(n1)+' '+
IntToStr(n2)+' '+
IntToStr(n3));
end;
// Закрытие фала в последний раз
CloseFile(myFile);
end;
Результат
1 2 3
5 6 7
8 9 0
Похожие функции, процедуры и команды
AssignFile — связывает дескриптор файла с бинарным или текстовым файлом.
BlockRead — читает блок записей данных из нетипизированного двоичного файла.
BlockWrite — записывает блок записей данных в нетипизированный двоичный файл.
Eof — возвращает true, если позиция курсора находится в конце файла открытого с помощью Reset.
File — определяет типизированный или нетипизированный файл.
Read — позволяет прочитать данные из двоичного или текстового файла.
ReadLn — позволяет прочитать полную строку данных из текстового файла.
Reset — открывает текстовый файл для чтения, или двоичный файл для чтения/записи.
TextFile — объявляет типа файл для того, чтобы сохранить строки текста.
Write — записывает данные в бинарный или текстовый файл.
WriteLn — записывает законченную строку данных в текстовый файл.