Показать сообщение отдельно
  #10  
Старый 07.08.2012, 18:35
Аватар для cotseec
cotseec cotseec вне форума
Активный
 
Регистрация: 16.07.2008
Сообщения: 353
Версия Delphi: D7,TDE06,RAD09
Репутация: 1443
По умолчанию

TFileStream его методом ReadBuffer читать в буфер (кусками или сразу весь файл - как не жалко памяти и на сколько большой файл), начиная с места после заголовка и следя за IOError (когда уже в конце файла, а TFileStream читать просим), затем писать через WriteBuffer в другой файл (чтобы получился идентичный файл - записываем тот же заголовок), перед этим "извращаясь" с буфером как хочется или без извращений - один в один
__________________
Понять, что хочет заказчик - бесценно, ведь он платит MasterCard
Ответить с цитированием