Есть ли замена для TMemoryStream

← →
gray_falcon © (2007-05-29 16:07) [0]

Есть ли еще какие-либо механизмы управления помятью в Delphi, кроме Stream`ов, для хранения данных больших объемов.

← →
MBo © (2007-05-29 16:13) [1]

массивы? ;)

← →
Сергей М. © (2007-05-29 16:22) [2]

> gray_falcon © (29.05.07 16:07)

Насколько больших ?
Чем TMemoryStream не устраивает ?
Почему именно TMemoryStream упомянут ?

← →
Johnmen © (2007-05-29 20:17) [3]

Таки для управления механизм или для хранения нечто?

← →
Rouse_ © (2007-05-29 21:40) [4]

Есть конечно, GеtMem тот-же... сурово и со вкусом...

← →
gray_falcon © (2007-05-30 23:07) [5]

Допустим у меня есть некоторый файл

← →
homm © (2007-05-30 23:14) [6]

> Есть ли замена для TMemoryStream

> Допустим у меня есть некоторый файл

TFileStream ???

← →
oxffff © (2007-05-30 23:20) [7]

> gray_falcon © (30.05.07 23:07) [5]
> Допустим у меня есть некоторый файл

CreateFileMapping?

← →
gray_falcon © (2007-05-30 23:40) [8]

связь прервалась, недопередолось :-)
Допустим у меня есть некоторый файл содержание которого заранее неизвестно, начиная от небольшого текста, заканчивая коллекцией картинок. Он помещается в память, а затем обрабатывается и данные с нужными адресами записываются в другой поток.
При дальнейшей работе часто вызывается сначала один поток, затем по полученным данным устанавливается позиция во второй поток. Так при частом TMemoryStream.position загружается процессор.
Поэтому мне и стало интересно узнать, что еще можно применять в подобных случаях, т.к. сам я применял эти самые потоки и когда-то AssignFile

← →
SlymRO © (2007-05-31 05:48) [9]

gray_falcon © (30.05.07 23:40) [8]
TMemoryStream.position загружается процессор.
Интересно чем?
function TCustomMemoryStream.Seek(Offset: Longint; Origin: Word): Longint; begin case Origin of soFromBeginning: FPosition := Offset; soFromCurrent: Inc(FPosition, Offset); soFromEnd: FPosition := FSize + Offset; end; Result := FPosition; end;

← →
Palladin © (2007-05-31 10:03) [10]

> SlymRO © (31.05.07 05:48) [9]

> Интересно чем?

:)

For i:=0 to theFStream.Size-1 Do theFStream.Position:=i;

← →
gray_falcon © (2007-05-31 21:00) [11]

> For i:=0 to theFStream.Size-1 Do theFStream.Position:=i;

доходило и до такого :-]
просто как-то работал с потоком размером 16777216 где читался не поочередно каждый байт!!! Все это по-моему вообще стоило реализовать на assembler"е

← →
homm © (2007-05-31 21:16) [12]

> просто как-то работал с потоком размером 16777216 где читался
> не поочередно каждый байт!!! Все это по-моему вообще стоило
> реализовать на assembler"е

Имхо, выйигрыш был бы не более 10%. Дело в том, что при непоследовательном доступе, когда каждый следующий байт читаеться из новой страницы памяти (вся память поделена на блоки, по 4кб, называемые страницами), основное время уходит как раз на открытие этих страниц. Здесь помогаеть только изменение алгоритма работы.

> (вся память поделена на блоки, по 4кб, называемые страницами),
>

Вы знаете страницы бывают еще и по 2Mb и 4Mb.

PSE (page size extensions) flag, bit 4 of CR4 (introduced in the Pentium® and Pentium® Pro processors).
The PSE flag enables large page sizes: 4-MByte pages or 2-MByte pages (when the PAE flag is set)

> Вы знаете страницы бывают еще и по 2Mb и 4Mb.

Мы же вроде как о win32 on Intel PC разговор ведем :)

ЗЫ Блин, что случилось, почему меня вдруг все стали на «Вы» называть? Или я просто раньше внимания не обращал.

> homm (31.05.2007 22:35:14) [14]

Дожил

> Вы знаете страницы бывают еще и по 2Mb и 4Mb.

А программисту прикладной программы на ОС с SVS не фиолетово ?

> ANB © (01.06.07 13:20) [16]
>
> > Вы знаете страницы бывают еще и по 2Mb и 4Mb.
>
> А программисту прикладной программы на ОС с SVS не фиолетово
> ?

Перечитай еще раз

Вообще почем зря TMemoryStream использовать не стоит - может все сурово глюкануть (Не хватит памяти - и все). Не зря верь try TMemoryStream.Create пишут. ИМХО для чего-то большого изумительно TFileStream подходит.

Есть ли замена для TMemoryStream Найти похожие ветки