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