![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как правильно скопировать массив Byte в TMemory Stream [D5, D6]
max2057 © (2002-10-14 13:39:00)Пожалуста см. Сабж
max2057 (2002-10-15 10:42:00) [1]ага спасибо
Developer (2002-10-15 10:13:00) [2]Массив байт и так packed, packed тока для рекордов надо писать.
С начала хотел написать так:
procedure MoveToStream(AStream: TMemoryStream; const ABuf; ASize: Integer);
begin
AStream.SetCapacity(AStream.Position + Size);
Move(ABuf, AStream.Memory^, Size);
end;
потом посмотрел в classes там в принципе тоже самое только с обработкой исключений. Так что лучше как Мах2057 говорит.
Юрий Зотов (2002-10-14 23:05:00) [3]Набрал, нажал F1, получил. На все ушло 5 секунд.
См. топик "packed (reserved word)".
max2057 (2002-10-14 22:20:00) [4]packed - это че?
Юрий Зотов (2002-10-14 17:52:00) [5]И не забудьте, что массив должен быть packed.
Best Before 2024 (2002-10-14 14:18:00) [6]MemoryStream.Write(Buffer, Count) : integer
max2057 (2002-10-14 14:16:00) [7]var
p : PByte;
ms : TMemoryStream;
begin
ms := TMemoryStream.Create;
GetMem(p,xxxx);
Как-то его заполняю
......
end;
так вот как p засунуть в ms?
MBo (2002-10-14 13:52:00) [8]покажи, как объявлен массив байтов