Объявляет типа файл для того, чтобы сохранить строки текста
System unit
var TextFile;
Описание
Тип TextFile определяет тип файла для содержания текстовых данных.
Текстовые файлы обеспечивают простой и удобный способ сохранения текстовых данных. Они обеспечивают простой механизм для чтения и записи численных данных, сохраненных как текст (см. Write), но более безопасно и более разумно использовать для этого структурированные записи, при сохранении чего-нибудь отличного от простых текстовых строк.
Однако текстовые файлы позволяют делать записи различной длины.
Похожие команды
Append Открывает текстовый файл, для добавления записей в файл (добавляет в конец файла)
AssignFile Связывает дескриптор файла с бинарным или текстовым файлом
File Определяет типизированный или нетипизированный файл
Reset Открывает текстовый файл для чтения, или двоичный файл для чтения/записи
ReWrite Открывает текстовый или двоичный файл для записи
Пример кода : Запись и чтение из Текстового файла
var
myFile : TextFile;
text : string;
begin // Попытка открыть Test.txt файл для записи
AssignFile(myFile, 'Test.txt');
ReWrite(myFile); // Запись нескольких известных слов в этот файл
WriteLn(myFile, 'Hello World'); // Закрытие файла
CloseFile(myFile); // Повторное открытие файла для чтения
Reset(myFile); // Отображение содержимого файла
while not Eof(myFile) do
begin
ReadLn(myFile, text);
ShowMessage(text);
end; // Закрытие файла в последний раз
CloseFile(myFile);
end;