Показать сообщение отдельно
  #4  
Старый 24.09.2018, 11:32
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,036
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Ну так и читать. Собственно, тут и делать ничего на самом деле не надо.
Просто окрываешь файл через стандартные средства паскаля (AssignFile/Reset/CloseFile), Библиотека сама закеширует.
Если же хочется самому контролировать процесс, то можно примерно так:
1. Открываем файл через TFileStream.
2. Читаем блок данных определенного размера в байтах.
3. Ищем ближайший конец строки (#13#10) с конца файла.
4. Смещаем указатель в потоке на найденную дистанцию (Stream.seek - параметры посмотри в справке - тебе нужно от текущей позиции назад).
5. Грузми прочитанный блок в TStringList или что-то подобное и начинаем обработку полученного блока.

ЗЫ. Код лень ваять в 3 часа ночи...
Ответить с цитированием