摘要: 现在的DELPHI因为支持泛型的语法,所以也能支持模板编程了。// 标准模板unit UntPools;interfaceuses Classes, SysUtils, UntThreadTimer;type { 这是一个对像池, 可以池化所有 TObject 对像 } { 用法: 在一个全局的地方定义 var Pooler: TObjectPool; 用到的地方 obj := Pooler.LockObject as Txxx; try finally Pooler.UnlockObject; end; 初始化 initialization Pool... 阅读全文
posted @ 2013-07-15 17:43 delphi中间件 阅读(4539) 评论(2) 推荐(2) 编辑