вопрос | ответ |
Обратите внимание, что в данном случае идя определения размера передаваемого потока необходимо использовать свойство stream, size, которое дает реальн | procedure TForml.CopyBtnClick(Sender: TObject); var Streaml, Stream2: TFileStream; begin if Not OpenDlg.Execute then E |
TFileStream | При необходимости копирования одного файла в другой целиком используется метод CopyFrom, унаследованный от класса Tstream: |
Обратите внимание, что в данном фрагменте кода функция seek используется для записи данных в конец файлового потока. | procedure TForml.CopyBtnClick(Sender: TObject); var Streaml, Stream2: TFileStream; IntBuf: array[0..9] of Integer/begin |
TFileStream | Для чтения и записи из потока используются методы Read и write, унаследованные от класса THandleStream: |
constructor Createfconst FileName: string; Mode: Word); | И флагов режима совместного использования: fmShareExciusive - файл недоступен для открытия другими приложениями; fmShareDenyWrite - другие приложения |
constructor Createfconst FileName: string; Mode: Word); | Параметр Mode определяет режим работы с файлом. Он составляется из флагов режима открытия: fmCreate - файл создается; fmOpenRead - фа |
Полное имя файла задается в параметре FileName при создании потока: | constructor Createfconst FileName: string; Mode: Word); |
TFileStream | позволяет создать поток для работы с файлами. При этом поток работает с файлом без учета типа хранящихся в нем данных |