| Описание |
Процедура Flush сбрасывает на диск незаписанные данные текстового файла на диск.
Тот же самый эффект может быть достигнут, закрытием файла.
|
|
| Похожие команды |
AssignFile Связывает дескриптор файла с бинарным или текстовым файлом
CloseFile Закрывает открытый файл
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;
|
Hello
World
|
|
