Загрузка ОЧЕНЬ большого текста

[chertovich]

var
  Buffer: TBytes; {TBytes = array of Byte}
begin
  //... Создания экземпляра класса
  SetLength(Buffer, FileStream.Size);
  FileStream.Position := 0;
  FileStream.ReadBuffer(Buffer[0], FieldStream.Size);

[eoln]

Кстати, по умолчанию RichEdit1 может загрузить только определённое кол-во символов (кажется, 64 КБ). Поэтому перед загрузкой надо указать ему "вставляемый" размер

RichEdit1.Perform(EM_LIMITTEXT,size{кол-во вставляемого в байтах},0);Form1.RichEdit1.LInes.LoadFrom...

size может быть больше вставляемого.

[Dima DDM]

chertovich,а что делает этот код?Извините,но я не понял тк в этом плохо разбираюсь =(

[Пепел Феникса]

chertovich, а толку считать все в память?(тем более TMemoryStream там будет лучше)

[Dima DDM]

Я знаю что надо при прокрутке в потоках подгружать вниз куски по ~64 килобайта в RichEdit,а нижнии выгружать и потом оттуда все сохранять сохранять НО КАК !?!

[Armorer]

Сообщение от Dima DDM

Я знаю что надо при прокрутке в потоках подгружать вниз куски по ~64 килобайта в RichEdit,а нижнии выгружать и потом оттуда все сохранять сохранять НО КАК !?!

Например, при помощи класса TFileStream. Что именно не понятно?

[Dima DDM]

Непонятно как именно определять какой кусок подгружать а какой выгружать и потом же все это надо как-то складывать и сохранять!Вообще как читать конкретный кусок с помощью FileStream(у меня еть о нем в учебнике но я так и не понял как им пользоваться ...)

P.S.
Я порбовал играться с свойством

Form1.RichEdit.Perform(EM_LIMITTEXT, 0, $7FFFFFFF);

и

Form1.RichEdit.Perform(EM_LIMITTEXT, $7FFFFFFF, 0);

Разница между ними не заметна кстати.
Эти свойства ОЧЕНь странно работают... вроде с помощьюних быстрее начинает текст загружаться,но это работает почему-то только с уже существующим RichEdit,а динамический грузит так же медленно
Вот как я пробовал

// динамический
TRichEdit(Form1.PageControl1.ActivePage.Controls[0]).LInes.LoadFromFile
('имя файла');
TRichEdit(Form1.PageControl1.ActivePage.Controls[0]).Perform(EM_LIMITTEXT, 0, $7FFFFFFF);

// существующий RichEdit
Form1.RichEdit1.LInes.LoadFromFile
('имя файла');
Form1.RichEdit1.Perform(EM_LIMITTEXT, 0, $7FFFFFFF);