Главная страница
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.015 c
1-51752
eruc
2002-12-04 17:32
2002.12.16
как остановить курсор мыши ?


14-51923
han_malign
2002-11-25 12:58
2002.12.16
Opera 7+ Win98+ UniCirillic


1-51829
Andriano
2002-12-05 15:00
2002.12.16
CLX, чтоб его...


1-51724
Valentain
2002-12-05 18:26
2002.12.16
Динамический файл


6-51872
Михаил
2002-10-22 11:43
2002.12.16
Как прослушать на локальной машине порт 12000 ?