Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.12.16;
Скачать: CL | DM;

Вниз

Как правильно скопировать массив Byte в TMemory Stream   Найти похожие ветки 

 
max2057 ©   (2002-10-14 13:39) [0]

Пожалуста см. Сабж


 
MBo ©   (2002-10-14 13:52) [1]

покажи, как объявлен массив байтов


 
max2057 ©   (2002-10-14 14:16) [2]

var
p : PByte;
ms : TMemoryStream;
begin
ms := TMemoryStream.Create;
GetMem(p,xxxx);
Как-то его заполняю
......
end;

так вот как p засунуть в ms?






 
Best Before 2024   (2002-10-14 14:18) [3]

MemoryStream.Write(Buffer, Count) : integer


 
Юрий Зотов ©   (2002-10-14 17:52) [4]

И не забудьте, что массив должен быть packed.


 
max2057 ©   (2002-10-14 22:20) [5]

packed - это че?


 
Юрий Зотов ©   (2002-10-14 23:05) [6]

Набрал, нажал F1, получил. На все ушло 5 секунд.

См. топик "packed (reserved word)".


 
Developer   (2002-10-15 10:13) [7]

Массив байт и так packed, packed тока для рекордов надо писать.
С начала хотел написать так:
procedure MoveToStream(AStream: TMemoryStream; const ABuf; ASize: Integer);
begin
AStream.SetCapacity(AStream.Position + Size);
Move(ABuf, AStream.Memory^, Size);
end;
потом посмотрел в classes там в принципе тоже самое только с обработкой исключений. Так что лучше как Мах2057 говорит.



 
max2057 ©   (2002-10-15 10:42) [8]

ага спасибо



Страницы: 1 вся ветка

Текущий архив: 2002.12.16;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.017 c
14-51890
Blarior
2002-11-22 22:32
2002.12.16
Где?


3-51635
adolf_99
2002-11-28 12:51
2002.12.16
Помогите


14-51943
LongIsland
2002-11-25 18:21
2002.12.16
Ну, оказия...


3-51577
Yury
2002-11-27 11:19
2002.12.16
Connect to Exchange Server


1-51801
Zipper
2002-12-05 11:01
2002.12.16
Как определить координаты каретки