DELPHI
huixch
上有庙堂之高,下有江湖之远!
展开
-
Delphi对象池
//http://www.cnblogs.com/DKSoft/p/3564983.htmlunit uMyObjectPool;interfaceuses SyncObjs, Classes, Windows, SysUtils;type TObjectBlock = record private FObject:TObject; FUsing:Boole转载 2016-05-12 01:02:36 · 788 阅读 · 0 评论 -
DELPHI基于线程的定时器和一个泛型对象池
笔记unit ThreadTimer;//次编译指令仅在测试时使用,请勿在Release版本中打开{$DEFINE RunInMainThread}interfaceuses SysUtils, Classes, SyncObjs;type TThreadTimer = class(TObject) private FEnabled: Boolean;转载 2016-05-12 01:13:05 · 1486 阅读 · 0 评论