Delphi 怎样 把TParams 或 record写到流里面
怎样 把TParams 或 record写到流里面
[解决办法]
record只不过是内存里面的一段数据而已,根据record大小,直接从record的地址从内存中读取
[解决办法]
record写到流里面
可以直接转换阿...
[解决办法]
type
TRec=Record
msg:string;
end;
procedure TForm1.Button1Click(Sender: TObject);
var
ms:TMemoryStream;
Rec1,Rec2:TRec;
begin
Rec1.msg:='Hello World';
ms:=TMemoryStream.Create;
ms.Write(Rec1,SizeOf(Rec1));
ms.Position:=0;
ms.Read(Rec2,SizeOf(Rec2));
ms.Free;
ShowMessage(Rec2.msg);
end;