Облака / Clouds
    Go to Copy.com
    Copy.com
    The bast cloud service
    Get 20 GB free!!!
    Support WebDav.
    Show more >>

    Go to Dropbox.com
    Dropbox.com
    time-tested cloud storage
    Support WebDav.
Все бесплатно
    Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.



Вопросы
  Изменить структуру ABS (AbsoluteDB)
   Категория: Базы данных
  Процедуры и функции для рабты с файлами
   Категория: Файловая система
  Округление в меньшую сторону
   Категория: Математика
  Числовой формат ячейки в Excel
   Категория: Базы данных
  Сохраняем Bitmap в поле dbase
   Категория: Базы данных
  Добавить данные в EXE файл и получить их
   Категория: Файловая система
  Listbox - элементы вверх-вниз
   Категория: Компоненты
  Определение размера каталога
   Категория: Файловая система

Delphi - Справочник: Flush

ABCDEFGHIJKLMNOPQRSTUVWXYZ

  << Вернуться  

 Flush
procedure Flush ( var FileHandle : TextFile ) ;
Процедура (Unit System)
Сбрасывает буферизованные данные текстового файла в файл
Описание:
Процедура Flush сбрасывает на диск незаписанные данные текстового файла на диск.

Тот же самый эффект может быть достигнут, закрытием файла.
Пример кода: Сбрасывание на диск после записи строк в файл

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

  << Вернуться