Var ms: TMemoryStream;
r: Rec;
begin
...
ms.Write(r,SizeOf(r));
...
end;
как Record поместить в TMemoryStream
(Rec = Record ... end;)
можно ли ее поместить в TMemoryStream, если да то как :) Помогите плз.
Цитата:
Originally posted by Poltos
У меня есть запись
(Rec = Record ... end;)
можно ли ее поместить в TMemoryStream, если да то как :) Помогите плз.
У меня есть запись
(Rec = Record ... end;)
можно ли ее поместить в TMemoryStream, если да то как :) Помогите плз.
Код:
Сам не пробовал. Если будет ругаться компилятор, попробуй так.
Код:
Var ms: TMemoryStream;
r: Rec;
begin
...
ms.Write(@r,SizeOf(r));
...
end;
r: Rec;
begin
...
ms.Write(@r,SizeOf(r));
...
end;
Код:
Var ms: TMemoryStream;
r: Rec;
begin
...
ms.Write(r,SizeOf(r));
...
end;
r: Rec;
begin
...
ms.Write(r,SizeOf(r));
...
end;
Спасибо большое вот этот вариант работает))