function ComponentToStr(AComponent: TComponent): string;
var
BinStream: TMemoryStream;
StrStream: TStringStream;
s: string;
begin
BinStream := TMemoryStream.Create;
try
StrStream := TStringStream.Create(s);
try
BinStream.WriteComponent(AComponent);
BinStream.Seek(0, soFromBeginning);
ObjectBinaryToText(BinStream, StrStream);
StrStream.Seek(0, soFromBeginning);
Result := StrStream.DataString;
finally
StrStream.Free;
end;
finally
BinStream.Free
end;
end;
function StrToComponent(const Value: string;
Instance: TComponent): TComponent;
var
StrStream: TStringStream;
BinStream: TMemoryStream;
begin
StrStream := TStringStream.Create(Value);
try
BinStream := TMemoryStream.Create;
try
ObjectTextToBinary(StrStream, BinStream);
BinStream.Seek(0, soFromBeginning);
Result := BinStream.ReadComponent(Instance);
finally
BinStream.Free;
end;
finally
StrStream.Free;
end;
end;
分享到:
相关推荐
序列化 (serialization):将对象的状态信息转换为可以存储或传输的形式的过程...在Delphi中 只要从 TPersistent继承后就会有序列化的功能。 在TPersistent中的定义 procedure DefineProperties(Filer: TFiler); virtual;
IOCP包是07年底帮一个朋友做的修改,原代码好像是基于codeproject,修改了些bug,并重构了下,对高并发的朋友可以看看。另我自己已经很少用delphi了,虽然我是cnpack的老成员,现在却很少参与开发了
Hprose (High Performance Remote Object Service Engine)是一款高性能跨语言跨平台的远程对象服务引擎,它支持众多语言和平台,包括主流的.NET、Java、PHP、Python、Ruby、JavaScript、ActionScript、Delphi、...
DelphiJson 序列化一个 JSON 序列化库,用于精细控制从 Delphi 对象、接口和记录生成的 JSON 的结构。 我构建了这个库,所以我可以在我的应用程序中使用普通的旧 Delphi 对象,然后将它们流式传输到有效的 REST/JSON...
序列化和反序列化的结果与JSON结构相同! 自动检测日期/时间部分并将其映射到TDate/TDateTime(只要日期符合ISO8601标准); 将所有数字映射为Double; 将true/false值映射为Boolean; 允许更改属性名(键); 允许...
Delphi7 setup 开发程序工具安装软件(已...Delphi7具有许多特点,比如可视化编程、面向对象编程、可移植性、易学易用等等。它可以用于开发各种类型的应用程序,包括桌面应用程序、Web应用程序、数据库应用程序等等。
Delphi-JsonToDelphiClass 根据JSON字符串生成Delphi类。 就像XML数据绑定一样,但用于... 序列化和反序列化导致相同的JSON结构! 自动检测日期/日期时间部分并将它们映射到TDate / TDateTime(只要日期符合ISO8601)
JWT(JSON Web 令牌)和 JOSE(JSON 对象签名和加密)规范套件的 Delphi 实现。该库支持具有多种 JOSE 算法的 JWS(计划支持 JWE)紧凑序列化。
该库通过几种JOSE算法支持JWS(已计划JWE支持)紧凑序列化。 :books: 有关使用Delphi-JOSE的文章 -JWT和身份验证技术介绍(使用Delphi) -了解JSON Web令牌 -使用Delphi-JOSE-JWT生成和验证JWT令牌 -使用JWT...
序列化:将对象与json / Yaml进行序列化。 计划:计划任务重试策略作为独立线程启动。 线程化:简化多线程后台任务,线程安全列表,队列等的运行和控制 数据:灵活的数据交换和存储,允许多种输入输出类型。 云...
流利的JSON for Delphi 这只是用于生成JSON的简单流利的api。 它不会序列化对象或解析json。
序列化/反序列化 对象以 JSON 格式传输。 要正常运行,必须按如下方式声明对象,并带有公共字段。 TPerson = class (TObject) public (* Reflect the server side object field names, for Java must be case-...
SaveClass:Классдлябыстройсериализациидесериализацииобъектов类,用于对象的快速序列化反序列化
#Delphi-Serialization Delphi-Serialization 提供将对象序列化和反序列化为(目前仅)XML 的功能。路线图(粗略) 更多测试更灵活序列化/反序列化为 JSON 和更多项目依赖DunitX(测试框架) 夏普弹簧4D例子 var ...
序列化:对象/数组到json / Yaml的序列化。 计划:计划任务重试策略作为独立线程启动。 数据库:易于使用SQLite,MSSQL等的实体框架用户管理: 缓存::缓存字符串或对象以便以后快速检索。 MVC Web:创建自己的Api...
它已经把大多数操作都封装好了,而且还具有把任意对象序列化的能力。 比如,你能把整个Form通过 TsdXmlObjectWriter = class(TPersistent) 类存入一个XML文件,下次再读取。这样使得远程传输对象变得很简单了。 ...
它提供了高效的序列化和反序列化库,并在此基础上提供了方便灵活的RPC引擎。 Hprose支持众多编程语言,例如: AAuto Quicker ActionScript ASP C++ Dart Delphi/Free Pascal dotNET(C#, Visual Basic...) Golang ...
适用于Delphi的pyeKVS PyeKVS是用于数据序列化的键值存储格式。 该格式对应于JSON格式,但是值是二进制编码的。pyeKVS格式规范见 版本:1.0 日期:01.03.2021 执照:主页:特征将对象存储为一组键和值键表示为...
Java生成密钥、保存密钥的实例源码,通过本源码可以了解到Java如何产生单钥加密的密钥(myKey)、产生双钥的密钥对(keyPair)、如何保存公钥的字节数组、保存私钥到文件privateKey.dat、如何用Java对象序列化保存私钥...