Bufer

← →
P@vel (2004-08-25 14:22) [0]

Ув. Мастера. Дело такое. Надо сделать такую процедуру, что бы она добавляла буфер в MemoryStream. Причём неизвестно какого типа этот буфер. Придумал такое решение.

procedure (Bufer: Pointer);
var
Len:word;
stream:TMemoryStream;
begin
stream:= TmemoryStream.Create;
Len := SizeOf(Bufer);
Stream.Write(Bufer,Len)
end;
Только вот берёт он размер указателя. Как правельно реализовать эту задумку?

← →
Ega23 © (2004-08-25 14:30) [1]

SizeOf(Bufer^)

← →
begin...end © (2004-08-25 14:31) [2]

Размер того, что ты разместил по адресу Bufer, знаешь только ты.

← →
афвуд (2004-08-25 14:32) [3]

Ну нифига се. А откудова он размер то возьмёт того, чего кладёт? Передавай в функцию размер.

← →
Ega23 © (2004-08-25 14:33) [4]

На [1] внимания не обращать, ибо бред.

Сделай типизированный указатель, и [1]

← →
P@vel (2004-08-25 20:09) [6]

Сенкс. Буду размер передовать. А типизированый не подходит ибо я не знаю, что за тип.

Bufer Найти похожие ветки