2021年5月17日 星期一

msgpack和TParams互相转换 - delphi中间件

delphi中间件| 博客园_咏南中间件和开发框架 |20:02:00

msgpack和TParams互相转换 procedure msgpack2params(const Source: TMsgPack; Dest: TParams); var ps: TParams; p: TParam; i: Integer; begin ps := TParams.Creat

一秒可生成500万ID的分布式自增ID算法—雪花算法 (Snowflake，Delphi 版) - 红鱼儿

红鱼儿| 博客园_红鱼儿 |13:33:00

这是全能做的分布式自增ID算法，转贴过来，向他的分享表示感谢。 原文地址：一秒可生成500万ID的分布式自增ID算法—雪花算法 (Snowflake，Delphi 版) 概述 分布式系统中，有一些需要使用全局唯一ID的场景，这种时候为了防止ID冲突可以使用36位的UUID，但是UUID有一些...

测试delphi支持的线程锁的效率 - 红鱼儿

红鱼儿| 博客园_红鱼儿 |13:19:00

TCriticalSection TMutex TSpinlock TMonitor 直接上图：运行结果如下： 如 代码如下 ： unit Unit5; interface uses System.SysUtils, System.Types, System.UITypes, System.Clas